SHIROのIchigoJam日記

マイコン「IchigoJam」(イチゴジャム)の電子工作とプログラミングをメインに

鏡の国のかわくだり

FacebookのPCNグループで、「かわくだり魔改造グランプリ」という作品募集企画が行われたのですが、そこに出して投票で1位をいただいたプログラム「鏡の国のかわくだり」を紹介します。
f:id:shiro0922:20190511221843p:plain

遊び方

自分のキャラが「イチゴ」と「ネコ」の2体出てきます。カーソルキーの左右で操作してください。
イチゴちゃんは素直なのでそのまま左右に動きますが、ネコは気まぐれなので左右逆に動きます。画面の端に行くと、両者とも反対側にワープします。
2体とも岩に当たらないように動かして、川を下ってください。

プログラム

既存のかわくだりゲームをちょっと改造すればすぐ作れます。

1 '*Kawakudari Mirroring
10 CLS:CLT:X=10:Y=21
20 X=X-BTN(28)+BTN(29)
22 X=X&31
25 Y=Y+BTN(28)-BTN(29)
27 Y=Y&31
30 IF SCR(X,5) OR SCR(Y,5) ?TICK()/60:END
40 LC X,5:?CHR$(255)
45 LC Y,5:?CHR$(236)
50 LC RND(32),23:?"*"
60 WAIT 5
70 GOTO 20

Web版はこちら。

他の方が「自キャラを2体にする」プログラムを出していたので、そこからアイデアをいただきました。それで投票1位をいただいてしまったのは、ちょっと申し訳ない気もするのですが…。
タイトルからわかるとおり「鏡の国のアリス」からもヒントを得ています。