Enjoy programming more!
Kidspod is a post site which supports young programmers.
First step to join us.
Register as a member
For members

2023/03/20 11:37:44

MixJuice GET URL : kidspod.club/mj/2199

呼び込み君 人感センサー対応

呼び込み君を再現しました。音楽は終わらずループさせています。
POKEを多用して見た目も再現しています。
本家と同じく人感センサーに対応！
人感センサーをつなげていない場合はずっと音が鳴り、つなげている場合は人感センサーが認識すると音が鳴ります。感度や一度認識してからどのくらい信号を出し続けるかなどは人感センサーのつまみでいじってください。
Ichigo-iceなどを使えばよりそれっぽくなるかも。
歌詞
ポポーポポポポーポポーポポポポー
ポポーポポーポポーポポーポポーポポーポポーポポーポポーポポーポーポーポーポーポ

SOURCE CODE

1 'ヨヒ゛コミクン シ゛ンカンセンサーハ゛ーシ゛ョン
5 VIDEO2:CLS:A=0
11 POKE #778,#60,#90,#88,#B4,#5C,#7C,#7C,#28
12 POKE #750,#06,#09,#11,#2D,#3A,#3E,#3E,#14
13 POKE #758,#24,#00,#00,#18,#66,#81,#66,#18
14 POKE #740,#3C,#6A,#D5,#AB,#D5,#AB,#56,#3C
15 POKE #700,1,102,170,163,174,194,130,6
16 POKE #700,6,248,234,200,254,8,24,0
17 POKE #708,42,228,38,68,68,68,56,0
18 POKE #710,152,72,8,212,98,64,190,0
19 POKE #718,112,16,36,124,166,196,24,0
20 POKE #720,124,20,254,20,62,226,62,0
30  ?"   (#98)(#91)(#91)(#91)(#91)(#91)(#99)   "
40  ?"   (#92) (#EF) (#EA) (#92)   "
50  ?"   (#92)(#E8) (#EB) (#E8)(#92)   "
60  ?" (#98)(#91)(#96)(#91)(#91)(#91)(#91)(#91)(#96)(#91)(#99) "
70  ?" (#92) (#92)  (#E9)  (#92) (#92) "
80  ?" (#9A)(#91)(#94)     (#95)(#91)(#9B) "
90  ?"   (#92) (#86)(#86)(#86) (#92)   "
100 ?"   (#92) (#86)(#86)(#86) (#92)   "
110 ?"   (#92) (#86)(#86)(#86) (#92)   "
120 ?"   (#92)(#E0)(#E1)(#E2)(#E3)(#E4)(#92)   "
130 ?"  (#98)(#9B)     (#9A)(#99)  "
140 ?"(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)(#8F)"
200 IFIN(1)=1&&A=0PLAY "T240$AARBAF+ARAARBAF+ARDDREFRRDFRRAARRRDDREFRRRDDREFRRREEREERF+RARGRG-RER":A=1
205 IFIN(1)=0PLAY:A=0
210 WAIT1:GOTO200

COMMENT