;
;START WAIT
;WAIT(200)
;1秒待たせてる、これは移動プログラムで停止で終了して戻ってきた場合に
;停止ボタンに反応しないため
;このためプログラムに戻ってきた直後のボタン操作に反応しない事がある
;************************
JUMPIF(V109,=,100,MAINKEYWAIT)
;初回(電源投入時)以外の時MAINKEYWAITへ
;JUMPIF(V126,=,100,MAINKEYWAIT) V126は無線データの7バイト目が入るので空いてるV109を使う
;************************
;************************
;ここから以下は電源投入時に一回のみ通る
:START
V0=0
V1=0
V2=0
V3=0
V4=0
SOUND
;電源入れた時のチャラララァ
V109=100
;2回目のパス以降V117=100で電源投入時の動作をスキップする
;V126=100
;
V25=0-5120
;赤外線リモコンAモードの為の電源マークボタンの値-5120をV25に格納
V26=0-5099
;赤外線リモコンBモードの為の電源マークボタンの値-5099をV26に格納
V27=0-5078
;赤外線リモコンCモードの為の電源マークボタンの値-5078をV27に格納
:STARTKEYCHECK
V130=0
;初期値0 V130とV131(不使用)は赤外線リモコンの押されたボタンの値が入る
V120=0
;初期値0 PS3/SBDBT5Vデータの2バイト目 PS3ボタンの1バイト目(*256)
V121=0
;初期値0 PS3/SBDBT5Vデータの3バイト目 PS3ボタンの2バイト目
V122=64
;初期値64 PS3/SBDBT5Vデータの4バイト目 左ジョイスティック 左右(左1中点64右が127)
V123=64
;初期値64 PS3/SBDBT5Vデータの5バイト目 左ジョイスティック 上下(上1中点64下が127)
V124=64
;初期値64 PS3/SBDBT5Vデータの6バイト目 右ジョイスティック 左右(左1中点64右が127)
V125=64
;初期値64 PS3/SBDBT5Vデータの7バイト目 右ジョイスティック 左右(上1中点64下が127)
V126=64
;初期値0 PS3/SBDBT5Vデータの8バイト目 チェックサム
V95=0
;初期値0 V95=V120*256+V121(ビッグエンディアン) V95が空いてるので使う
V98=0
;ジャイロ オンとオフの区別に使用
;************************
;START KEY WAIT
:STARTKEYWAIT
JUMPIF(V130,#,0,STARTKEYANZ)
;赤外線リモコンのいづれかのボタンが押された時
V95=V120*256+V121
;PS3コントローラーボタンデータ算出
JUMPIF(V95,#,0,STARTKEYANZ)
;PS3コントローラーのいづれかのボタンが押された時
JUMP(STARTKEYWAIT)
;************************
;
; START KEY ANALYZE
;
:STARTKEYANZ
JUMPIF(V130,=,V25,MODEAT)
;押されたボタンが電源マークで値が-5120の時MODEATへ
JUMPIF(V130,=,V26,MODEBT)
;押されたボタンが電源マークで値が-5099の時MODEBTへ
JUMPIF(V130,=,V27,MODECT)
;押されたボタンが電源マークで値が-5078の時MODECTへ
JUMPIF(V95,=,3,MODEBTOOTH)
;PS3コントローラーのSTARTボタンが押された時MODEBTOOTHへ
CALL(ERRBEEP)
;赤外線リモコンの電源マークボタン/PS3コントローラーのSTARTボタンではない時ブブッ
JUMP(STARTKEYCHECK)
;ボタンの値をクリアして赤外線リモコンの電源マークボタン/PS3コントローラーのSTARTボタンを待つ
;
;************************
:MODEAT
V25=0-5120
;赤外線リモコンAモードの時の電源マークボタンの値-5120をV25に再度格納
JUMP(KEYDATASET)
;ボタン値を設定するためKEYDATASETへ
:MODEBT
V25=0-5099
;赤外線リモコンBモードの時の電源マークボタンの値-5099をV25に格納
JUMP(KEYDATASET)
;ボタン値を設定するためKEYDATASETへ
:MODECT
V25=0-5078
;赤外線リモコンCモードの時の電源マークボタンの値-5078をV25に格納
JUMP(KEYDATASET)
;ボタン値を設定するためKEYDATASETへ
;PS3コントローラー対応
:MODEBTOOTH
V25=0-21
JUMP(KEYDATASET)
;************************
;
;KEYDATA SET Aモード時ボタン21個を(左から右、上から下に)‐5120~-5190でV25~V45に割り当てる
;KEYDATA SET Bモード時ボタン21個を(左から右、上から下に)‐5099~-5079でV25~V45に割り当てる
;KEYDATA SET Cモード時ボタン21個を(左から右、上から下に)‐5078~-5058でV25~V45に割り当てる
;KEYDATA SET PS3コントローラーの時 ボタン21個を-21~-1の番号でV25~V45に割振る(PS3ボタンには該当させないため)
;
:KEYDATASET
V00=21
V01=25
V02=26
:KEYDATASETLOOP
(V02=(V01 + 1
V01=V01 + 1
V02=V02 + 1
V00=V00 - 1
JUMPIF(V00,>,0,KEYDATASETLOOP)
;************************
;
;HOME SET&POWER ON 赤外線リモコンの電源マークボタンor PS3コントローラーのSTARTボタンが押されたから
; SDカードからファイルを読み出しHOMEポジションでサーボ電源入れる
;
;
;READ FROM file63- sector64
;
V00=1
V01=63
;63番ファイルのセクタ64のデータをV133からV388に書き込む
V02=64
V03=0
SDREAD
V00=24
;V133からの24個分をV457からにセットする(ホームポジ)
V01=133
V02=457
:HSETLOOP
(V02 = (V01
;V133の値をV457に代入
V01=V01+1
;V01,V02 に1を加え、V00から1を引く
V02=V02+1
V00=V00-1
JUMPIF(V00,>,0,HSETLOOP)
;V457-V480にホームポジ関連データ入る
HOMEPOS
;ホームポジにする
WAIT(200)
V00=200
MOTORSPEED
;モータースピード遅くする
V00=1
;サーボオン 24個
V01=1
V02=1
V03=1
V04=1
V05=1
V06=1
V07=1
V08=1
V09=1
V10=1
V11=1
V12=1
V13=1
V14=1
V15=1
V16=1
V17=1
V18=1
V19=1
V20=1
V21=1
V22=1
V23=1
POWER
WAIT(200)
WAIT(200)
WAIT(200)
V00=0
MOTORSPEED
;モータースピード速くする
WAIT(50)
CALL(OKBEEP)
CALL(OKBEEP)
CALL(OKBEEP)
;
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1300)
;ここまでは電源投入時に一回だけ通る
;************************
;************************
;
;************************
;MAIN KEY WAIT なんらかの(動作を実行するための)キーが押されるまで繰り返し待つ
;
:MAINKEYWAIT
V130=0
;PS3コントローラー対応
V120=0
V121=0
V122=64
V123=64
V124=64
V125=64
V126=0
V95=0
:MAINKEYWAITLOOP
V00=INPUTADC(1)
JUMPIF(V00,<,105,BATTERYERRROR)
;JUMPIF(V00,<,115,BATTERYERRROR)
;電圧低い時,BATTERYERROR 5vレギュレータ(0v－5v)に対して105は4.1v相当(105=4.1*256/10)。4.5vにしたいので115に設定
JUMPIF(V130,#,0,MAINKEYANZ)
V95=V120*256+V121
;PS3コントローラー対応
JUMPIF(V95,#,0,MAINKEYANZ)
JUMPIF(V122,#,64,MAINKEYANZ)
JUMPIF(V123,#,64,MAINKEYANZ)
JUMPIF(V124,#,64,MAINKEYANZ)
JUMPIF(V125,#,64,MAINKEYANZ)
JUMP(MAINKEYWAITLOOP)
;V130,V120,V121,V122,V123,V124,V125の値を取り込みながら繰り返し待つ(V126チェックサム不使用)
;************************
;
; START KEY ANALYZE 2 ;キーが打たれたら何のキーかアナライズ
;
;************************
:MAINKEYANZ
;
; STANDARD KEY CHECK
;
JUMPIF(V130,=,V26,FWD)
;赤外線リモコン用 ^ボタン
JUMPIF(V130,=,V28,LTURN)
;赤外線リモコン用 <ボタン
JUMPIF(V130,=,V30,RTURN)
;赤外線リモコン用 >ボタン
JUMPIF(V130,=,V32,BACK)
;赤外線リモコン用 vボタン
JUMPIF(V130,=,V31,LSTEP)
;赤外線リモコン用 0ボタン
JUMPIF(V130,=,V33,RSTEP)
;赤外線リモコン用 -ボタン
;
JUMPIF(V130,=,V25,EXIT)
;赤外線リモコン用 電源マークボタン
JUMPIF(V130,=,V29,WAKEUP)
;赤外線リモコン用 赤丸ボタン
;
JUMPIF(V130,=,V34,KEY1)
;赤外線リモコン用 1ボタン
JUMPIF(V130,=,V35,KEY2)
;赤外線リモコン用 2ボタン
JUMPIF(V130,=,V36,KEY3)
;赤外線リモコン用 3ボタン
JUMPIF(V130,=,V37,KEY4)
;赤外線リモコン用 4ボタン
JUMPIF(V130,=,V38,KEY5)
;赤外線リモコン用 5ボタン
JUMPIF(V130,=,V39,KEY6)
;赤外線リモコン用 6ボタン
JUMPIF(V130,=,V40,KEY7)
;赤外線リモコン用 7ボタン
JUMPIF(V130,=,V41,KEY8)
;赤外線リモコン用 8ボタン
JUMPIF(V130,=,V42,KEY9)
;赤外線リモコン用 9ボタン
;
;PS3コントローラー KEY CHECK
JUMPIF(V95,=,1,KEYB9)
;PS3コントローラー用 ^ボタン 阿波踊りその他
JUMPIF(V95,=,2,KEYB1)
;PS3コントローラー用 vボタン 前転、後転、ほふく ｖ＋R1,ｖ＋R2,ｖ＋L1
JUMPIF(V95,=,8,KEYC15)
;PS3コントローラー用 <ボタン ダンス、ブレークダンスその他
JUMPIF(V95,=,4,KEYC16)
;PS3コントローラー用 >ボタン 腕立て、体操、スクワットその他
JUMPIF(V95,=,1024,KEY1)
;PS3コントローラー用 L2ボタン左アッパー
JUMPIF(V95,=,4096,KEY3)
;PS3コントローラー用 R2ボタン右アッパー
JUMPIF(V95,=,512,KEY4)
;PS3コントローラー用 L1ボタン左フック
JUMPIF(V95,=,2048,KEY6)
;PS3コントローラー用 R1ボタン右フック
;
JUMPIF(V95,=,12,KEYGYROONOFF)
;PS3コントローラー用 SELECTボタン ジャイロオンオフ
JUMPIF(V95,=,3,EXIT)
;PS3コントローラー用 STARTボタン ホームポジション立つ、座る
;
JUMPIF(V95,=,16,KEY2)
;PS3コントローラー用 三角ボタン ワンツーパンチ
JUMPIF(V95,=,32,WAKEUP)
;PS3コントローラー用 バツXボタン 自動起き上がり・停止
JUMPIF(V95,=,256,KEY8)
;PS3コントローラー用 四角ボタン 挑発・押忍
JUMPIF(V95,=,64,KEYA2)
;PS3コントローラー用 丸ボタン 空手チョップ
;
JUMPIF(V123,=,1,FWD)
;PS3左アナログ 上 前進
JUMPIF(V123,=,127,BACK)
;PS3左アナログ 下 後進
;
JUMPIF(V124,=,1,LTURN)
;PS3右アナログ 左 左旋回
JUMPIF(V124,=,127,RTURN)
;PS3右アナログ 右 右旋回
;
JUMPIF(V122,=,1,LSTEP)
;PS3左アナログ 左 左横移動
JUMPIF(V122,=,127,RSTEP)
;PS3左アナログ 右 右横移動
;
JUMPIF(V125,=,1,KEYB7)
;PS3右アナログ 上 駆け足
JUMPIF(V125,=,127,KEYA03)
;PS3右アナログ 下 障害物検知歩行 Xで停止
;
;
; FUNCTION KEY CHECK
;
JUMPIF(V130,=,V43,MODEA)
;赤外線リモコン用 Aボタン (必ず次のボタンがくる)
JUMPIF(V130,=,V44,MODEB)
;赤外線リモコン用 Bボタン (必ず次のボタンがくる)
JUMPIF(V130,=,V45,MODEC)
;赤外線リモコン用 Cボタン (必ず次のボタンがくる)
;
;
CALL(ERRBEEP)
JUMP(MAINKEYWAIT)
;KEYが割り当てられた実行に該当しない場合はMAINKEYWAITに戻って繰り返し、該当するまで行う
;
;MODEA CHECK Aボタンの後に続く番号のチェック
;
:MODEA
CALL(OKBEEP)
:MODEALOOP
V130=0
:MODEAWAITLOOP
JUMPIF(V130,#,0,MODEAANZ)
;Aボタンの後に何か押されたらMODEAANZ
JUMP(MODEAWAITLOOP)
;
; KEY CHECK
;
:MODEAANZ
JUMPIF(V130,=,V31,KEYA0)
;赤外線リモコン用 0ボタン A0の後には必ず次の数字ボタンが来る
V01=0
JUMPIF(V130,=,V34,KEYA1)
;赤外線リモコン用 1ボタン 結果 A1
JUMPIF(V130,=,V35,KEYA2)
;赤外線リモコン用 2ボタン 結果 A2
JUMPIF(V130,=,V36,KEYA3)
;赤外線リモコン用 3ボタン 結果 A3
JUMPIF(V130,=,V37,KEYA4)
;赤外線リモコン用 4ボタン 結果 A4
JUMPIF(V130,=,V38,KEYA5)
;赤外線リモコン用 5ボタン 結果 A5
JUMPIF(V130,=,V39,KEYA6)
;赤外線リモコン用 6ボタン 結果 A6
JUMPIF(V130,=,V40,KEYA7)
;赤外線リモコン用 7ボタン 結果 A7
JUMPIF(V130,=,V41,KEYA8)
;赤外線リモコン用 8ボタン 結果 A8
JUMPIF(V130,=,V42,KEYA9)
;赤外線リモコン用 9ボタン 結果 A9
CALL(ERRBEEP)
JUMP(MODEALOOP)
;
; OPTIN EXTEND
;
:KEYA0
CALL(OKBEEP)
:MODEA0LOOP
V130=0
:MODEA0WAITLOOP
JUMPIF(V130,#,0,MODEA0ANZ)
;赤外線リモコン用ボタン A0の後になにか次の数字ボタンが来たら
JUMP(MODEA0WAITLOOP)
;
; KEY CHECK Aボタン‐0ボタンの後に続く番号のチェック
;
:MODEA0ANZ
JUMPIF(V130,=,V34,KEYA01)
;赤外線リモコン用 1ボタン 結果 A01 ジャイロ オン
JUMPIF(V130,=,V35,KEYA02)
;赤外線リモコン用 2ボタン 結果 A02 ジャイロ オフ
JUMPIF(V130,=,V36,KEYA03)
;赤外線リモコン用 3ボタン 結果 A03 短距離センサー検知歩行
CALL(ERRBEEP)
JUMP(MODEA0ANZ)
;ジャイロ オンオフ(PS3時にここに来る)
:KEYGYROONOFF
JUMPIF(V98,=,1,KEYA02)
;すでにジャイロオンだったらA02へ
;ジャイロ オン(赤外線リモコン時は直接ここに来る)
:KEYA01
(N389 = 0
(N393 = 73
(N394 = 73
(N396 = 0-8
(N398 = 8
(N397 = 8
(N399 = 0-8
(N401 = 0
(N403 = 0
(N402 = 0-10
(N404 = 0-10
(N389 = 1
V00=60
V01=8390
V02=0
V03=100
V04=0
SOUND
V98=1
;次回PS3のSELECTボタン押したらジャイロオフへ(赤外線リモコン時V98は不使用)
JUMP(MAINKEYWAIT)
;実行ファイルはないのでオン設定したら戻って次の実行KEYを待つ
;ジャイロ オフ(赤外線リモコン時は直接ここに来る)
:KEYA02
(N389 = 0
(N393 = 73
(N394 = 73
(N396 = 0
(N398 = 0
(N397 = 0
(N399 = 0
(N401 = 0
(N403 = 0
(N402 = 0
(N404 = 0
(N389 = 0
V00=60
V01=8610
V02=0
V03=100
V04=0
SOUND
V98=0
;次回PS3のSELECTボタン押したらジャイロオンへ(赤外線リモコン時V98は不使用)
JUMP(MAINKEYWAIT)
;実行ファイルではないのでオフ設定したら戻って次の実行KEYを待つ
;
;MODEB CHECK Bボタンの後に続く番号のチェック
;
:MODEB
CALL(OKBEEP)
:MODEBLOOP
V130=0
:MODEBWAITLOOP
JUMPIF(V130,#,0,MODEBANZ)
JUMP(MODEBWAITLOOP)
;
; KEY CHECK
;
:MODEBANZ
JUMPIF(V130,=,V34,KEYB1)
;赤外線リモコン用 1ボタン 結果 B1
JUMPIF(V130,=,V35,KEYB2)
;赤外線リモコン用 2ボタン 結果 B2
JUMPIF(V130,=,V36,KEYB3)
;赤外線リモコン用 3ボタン 結果 B3
JUMPIF(V130,=,V37,KEYB4)
;赤外線リモコン用 4ボタン 結果 B4
JUMPIF(V130,=,V38,KEYB5)
;赤外線リモコン用 5ボタン 結果 B5
JUMPIF(V130,=,V39,KEYB6)
;赤外線リモコン用 6ボタン 結果 B6
JUMPIF(V130,=,V40,KEYB7)
;赤外線リモコン用 7ボタン 結果 B7
JUMPIF(V130,=,V41,KEYB8)
;赤外線リモコン用 8ボタン 結果 B8
JUMPIF(V130,=,V42,KEYB9)
;赤外線リモコン用 9ボタン 結果 B9
CALL(ERRBEEP)
JUMP(MODEBLOOP)
;
;MODEC CHECK Cボタンの後に続く番号のチェック
;
:MODEC
CALL(OKBEEP)
:MODECLOOP
V130=0
:MODECWAITLOOP
JUMPIF(V130,#,0,MODECANZ)
JUMP(MODECWAITLOOP)
;
; KEY CHECK
;
:MODECANZ
JUMPIF(V130,=,V34,KEYCU1)
;赤外線リモコン用 1ボタン 結果 C1で次の番号を待つ
JUMPIF(V130,=,V35,KEYCU2)
;赤外線リモコン用 2ボタン 結果 C2で次の番号を待つ
JUMPIF(V130,=,V36,KEYCU3)
;赤外線リモコン用 3ボタン 結果 C3で次の番号を待つ
CALL(ERRBEEP)
JUMP(MODECLOOP)
;
; MODE-C1x
;
:KEYCU1
CALL(OKBEEP)
:MODEC1ULOOP
V130=0
:MODEC1UWAITLOOP
JUMPIF(V130,#,0,MODEC1UANZ)
JUMP(MODEC1UWAITLOOP)
;
; KEY CHECK Cボタン‐1ボタンの後に続く番号のチェック
;
:MODEC1UANZ
JUMPIF(V130,=,V34,KEYC11)
;赤外線リモコン用 1ボタン 結果 C11
JUMPIF(V130,=,V35,KEYC12)
;赤外線リモコン用 2ボタン 結果 C12
JUMPIF(V130,=,V36,KEYC13)
;赤外線リモコン用 3ボタン 結果 C13
JUMPIF(V130,=,V37,KEYC14)
;赤外線リモコン用 4ボタン 結果 C14
JUMPIF(V130,=,V38,KEYC15)
;赤外線リモコン用 5ボタン 結果 C15
JUMPIF(V130,=,V39,KEYC16)
;赤外線リモコン用 6ボタン 結果 C16
JUMPIF(V130,=,V40,KEYC17)
;赤外線リモコン用 7ボタン 結果 C17
JUMPIF(V130,=,V41,KEYC18)
;赤外線リモコン用 8ボタン 結果 C18
JUMPIF(V130,=,V42,KEYC19)
;赤外線リモコン用 9ボタン 結果 C19
CALL(ERRBEEP)
JUMP(MODEC1ULOOP)
;
; MODE-C2x
;
:KEYCU2
CALL(OKBEEP)
:MODEC2ULOOP
V130=0
:MODEC2UWAITLOOP
JUMPIF(V130,#,0,MODEC2UANZ)
JUMP(MODEC2UWAITLOOP)
;
; KEY CHECK Cボタン‐2ボタンの後に続く番号のチェック
;
:MODEC2UANZ
JUMPIF(V130,=,V34,KEYC21)
;赤外線リモコン用 1ボタン 結果 C21
JUMPIF(V130,=,V35,KEYC22)
;赤外線リモコン用 2ボタン 結果 C22
JUMPIF(V130,=,V36,KEYC23)
;赤外線リモコン用 3ボタン 結果 C23
JUMPIF(V130,=,V37,KEYC24)
;赤外線リモコン用 4ボタン 結果 C24
JUMPIF(V130,=,V38,KEYC25)
;赤外線リモコン用 5ボタン 結果 C25
JUMPIF(V130,=,V39,KEYC26)
;赤外線リモコン用 6ボタン 結果 C26
JUMPIF(V130,=,V40,KEYC27)
;赤外線リモコン用 7ボタン 結果 C27
JUMPIF(V130,=,V41,KEYC28)
;赤外線リモコン用 8ボタン 結果 C28
JUMPIF(V130,=,V42,KEYC29)
;赤外線リモコン用 9ボタン 結果 C29
CALL(ERRBEEP)
JUMP(MODEC2ULOOP)
;
; MODE-C3x
;
:KEYCU3
CALL(OKBEEP)
:MODEC3ULOOP
V130=0
:MODEC3UWAITLOOP
JUMPIF(V130,#,0,MODEC3UANZ)
JUMP(MODEC3UWAITLOOP)
;
; KEY CHECK Cボタン‐3ボタンの後に続く番号のチェック
;
:MODEC3UANZ
JUMPIF(V130,=,V34,KEYC31)
;赤外線リモコン用 1ボタン 結果 C31
JUMPIF(V130,=,V35,KEYC32)
;赤外線リモコン用 2ボタン 結果 C32
JUMPIF(V130,=,V36,KEYC33)
;赤外線リモコン用 3ボタン 結果 C33
JUMPIF(V130,=,V37,KEYC34)
;赤外線リモコン用 4ボタン 結果 C34
CALL(ERRBEEP)
JUMP(MODEC3ULOOP)
;
; EXECUTE
;
:FWD
V00=6
FJUMP
:LTURN
V00=7
FJUMP
:RTURN
V00=9
FJUMP
:BACK
V00=11
FJUMP
;
:LSTEP
V00=10
FJUMP
:RSTEP
V00=12
FJUMP
;
:WAKEUP
V00=8
FJUMP
;
:KEY1
V00=13
FJUMP
:KEY2
V00=14
FJUMP
:KEY3
V01=0
V00=15
FJUMP
:KEY4
;V01=0
V00=16
FJUMP
:KEY5
;V01=0
V00=17
FJUMP
:KEY6
;V01=0
V00=18
FJUMP
:KEY7
;V01=0
V00=19
FJUMP
:KEY8
;V01=0
V00=20
FJUMP
:KEY9
;V01=0
V00=21
FJUMP
;
:KEYA1
V00=22
FJUMP
:KEYA2
V00=23
FJUMP
:KEYA3
V00=24
FJUMP
:KEYA4
V00=25
FJUMP
:KEYA5
V00=26
FJUMP
:KEYA6
V00=27
FJUMP
:KEYA7
V00=28
FJUMP
:KEYA8
V00=29
FJUMP
:KEYA9
V00=30
FJUMP
;
;短距離センサー検知歩行
:KEYA03
V01=1
V00=15
FJUMP
;
;
:KEYB1
V00=31
FJUMP
:KEYB2
V00=32
FJUMP
:KEYB3
V00=33
FJUMP
:KEYB4
V00=34
FJUMP
:KEYB5
V00=35
FJUMP
:KEYB6
V00=36
FJUMP
:KEYB7
V00=37
FJUMP
:KEYB8
V00=38
FJUMP
:KEYB9
V00=39
FJUMP
;
:KEYC11
V00=40
FJUMP
:KEYC12
V00=41
FJUMP
:KEYC13
V00=42
FJUMP
:KEYC14
V00=43
FJUMP
:KEYC15
V00=44
FJUMP
:KEYC16
V00=45
FJUMP
:KEYC17
V00=46
FJUMP
:KEYC18
V00=47
FJUMP
:KEYC19
V00=48
FJUMP
;
:KEYC21
V00=49
FJUMP
:KEYC22
V00=50
FJUMP
:KEYC23
V00=51
FJUMP
:KEYC24
V00=52
FJUMP
:KEYC25
V00=53
FJUMP
:KEYC26
V00=54
FJUMP
:KEYC27
V00=55
FJUMP
:KEYC28
V00=56
FJUMP
:KEYC29
V00=57
FJUMP
;
:KEYC31
V00=58
FJUMP
:KEYC32
V00=59
FJUMP
:KEYC33
V00=60
FJUMP
:KEYC34
V00=61
FJUMP
;
:OKBEEP
V00=62
V01=192
V02=0
V03=20
V04=0
SOUND
WAIT(100)
RETURN
:ERRBEEP
V00=62
V01=213
V02=0
V03=20
V04=0
SOUND
RETURN
:BATTERYERRROR
V00=62
V01=42
V02=0
V03=53
V04=0
SOUND
WAIT(200)
WAIT(200)
WAIT(200)
SOUND
WAIT(200)
WAIT(200)
WAIT(200)
SOUND
WAIT(200)
WAIT(200)
WAIT(200)
:EXIT
Move(128,-226,2,333,1,141,-9,768,589,-1000,-36,-1095,1065,92,979,-623,-818,97,13,-1,-385,-17,217,-166,3000)
WAIT(200)
V00=0
V01=0
V02=0
V03=0
V04=0
V05=0
V06=0
V07=0
V08=0
V09=0
V10=0
V11=0
V12=0
V13=0
V14=0
V15=0
V16=0
V17=0
V18=0
V19=0
V20=0
V21=0
V22=0
V23=0
POWER
V99=0
;データ初期化
JUMP(START)
V00=62
V01=0
V02=0
V03=21
V04=0
V05=V108 OR V107
;V108,V107は荷物持つとき使う
V130 = 0
V123 = 0
JUMPIF(V05,#,0,MFWD)
MOVE(0,0,700,0,0,0,-30,403,301,-300,-30,-301,301,30,300,-301,-403,30,0,0,0,-700,0,0,1500)
:MOTGENESTART1
MOVE(21,X,X,X,X,X,-119,332,280,-279,-119,-280,297,-60,295,-297,-349,-60,0,X,X,X,X,-4,200)
MOVE(-61,X,X,X,X,X,-130,414,362,-360,-130,-362,297,-60,295,-297,-349,20,0,X,X,X,X,-4,200)
:LOOP
V130 = 0
;V123はMOTGENESTART1の実行中にすでに前進値1を取り込んでるはず
:MOTGENELOOP1
JUMPIF(V123,=,0,MOTGENELOOP0)
;赤外線リモコン時V123,#,1を通らない、PS3時は1回下の動作してV123が1以外かどうかチェック
JUMPIF(V123,#,1,MOTGENELOOPCHECKEND1)
;PS3対応 左アナログが前進1から外れたら停止へ
V123 = 0
;初期化して以下の動作中にV123の入力を待つ
:MOTGENELOOP0
MOVE(-90,X,X,X,X,X,-135,443,391,-389,-135,-391,296,-60,326,-296,-316,60,0,X,X,X,X,-37,200)
MOVE(-109,X,X,X,X,X,-159,462,345,-278,-159,-345,285,-88,344,-285,-276,-8,-75,X,X,X,X,-77,200)
MOVE(-59,X,X,X,X,X,-101,412,274,-185,-101,-274,287,-43,377,-287,-248,-43,-130,X,X,X,X,-105,200)
MOVE(-54,X,X,X,X,X,-14,407,297,-237,-14,-297,277,45,396,-277,-209,45,-150,X,X,X,X,-144,200)
SOUND
MOVE(-22,X,X,X,X,X,65,375,295,-265,65,-295,241,120,385,-241,-147,120,-130,X,X,X,X,-206,200)
MOVE(11,X,X,X,X,X,10,342,290,-288,90,-290,335,158,446,-335,-274,158,-75,X,X,X,X,-79,200)
MOVE(44,X,X,X,X,X,-30,309,289,-319,90,-289,380,168,378,-380,-432,168,0,X,X,X,X,79,200)
MOVE(77,X,X,X,X,X,8,276,285,-344,88,-285,345,159,278,-345,-462,159,75,X,X,X,X,109,200)
MOVE(105,X,X,X,X,X,43,248,287,-377,43,-287,274,101,185,-274,-412,101,130,X,X,X,X,59,200)
MOVE(144,X,X,X,X,X,-45,209,277,-396,-45,-277,297,14,237,-297,-407,14,150,X,X,X,X,54,200)
SOUND
MOVE(206,X,X,X,X,X,-120,147,241,-385,-120,-241,295,-65,265,-295,-375,-65,130,X,X,X,X,22,200)
MOVE(70,X,X,X,X,X,-128,283,346,-459,-128,-346,297,-60,295,-297,-349,20,75,X,X,X,X,-4,200)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP1)
;PS3の時はV130は0のままだからMOTGENELOOP1へ
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
MOVE(-61,X,X,X,X,X,-130,414,362,-360,-130,-362,297,-60,295,-297,-349,20,0,X,X,X,X,-4,200)
MOVE(0,X,X,X,X,X,-30,353,301,-300,-30,-301,301,30,300,-301,-353,30,0,X,X,X,X,0,200)
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1500)
V00=5
FJUMP
:MFWD
MOVE(X,X,X,X,X,X,-33,505,388,-321,-33,-388,388,33,321,-388,-505,33,X,X,X,X,X,X,1200)
:MOTGENESTART5
MOVE(X,X,X,X,X,X,-114,491,375,-309,-114,-375,387,-48,320,-387,-504,-48,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-129,580,456,-381,-129,-456,387,-48,320,-387,-504,12,X,X,X,X,X,X,200)
:LOOP2
V130 = 0
:MOTGENELOOP5
JUMPIF(V123,=,0,MOTGENELOOP4)
JUMPIF(V123,#,1,MOTGENELOOPCHECKEND5)
V123 = 0
:MOTGENELOOP4
MOVE(X,X,X,X,X,X,-137,615,486,-407,-137,-486,390,-48,357,-390,-474,42,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-178,622,425,-278,-178,-425,383,-99,381,-383,-435,-39,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-110,560,349,-188,-110,-349,390,-48,424,-390,-407,-48,X,X,X,X,X,X,200)
SOUND
WAIT(150)
MOVE(X,X,X,X,X,X,-16,557,374,-242,-16,-374,386,51,453,-386,-370,51,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,72,527,377,-278,72,-377,362,136,459,-362,-314,136,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,39,494,378,-312,99,-378,442,185,498,-442,-436,185,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,10,465,382,-349,100,-382,470,195,394,-470,-597,195,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,39,435,383,-381,99,-383,425,178,278,-425,-622,178,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,48,407,390,-424,48,-390,349,110,188,-349,-560,110,X,X,X,X,X,X,200)
SOUND
WAIT(150)
MOVE(X,X,X,X,X,X,-51,370,386,-453,-51,-386,374,16,242,-374,-557,16,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-136,314,362,-459,-136,-362,377,-72,278,-377,-527,-72,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-130,450,458,-515,-130,-458,387,-48,320,-387,-504,12,X,X,X,X,X,X,200)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP5)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
MOVE(X,X,X,X,X,X,-129,580,456,-381,-129,-456,387,-48,320,-387,-504,12,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-33,505,388,-321,-33,-388,388,33,321,-388,-505,33,X,X,X,X,X,X,200)
V00=5
FJUMP
V00=62
V01=21
V02=0
V03=21
V04=0
V05=V107 OR V108
;V108,V107は荷物持つとき使う
V130 = 0
V124 = 0
JUMPIF(V05,#,0,MLT)
MOVE(0,0,700,0,0,0,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,0,0,-700,0,0,1500)
:LOOP
V130 = 0
:MOTGENELOOP0
JUMPIF(V124,=,0,MOTGENESTART1)
JUMPIF(V124,#,1,MOTGENELOOPCHECKEND1)
;PS3対応 右アナログ 左旋回値1から外れたら停止へ
V124 = 0
:MOTGENESTART1
MOVE(-35,X,X,X,X,X,-239,418,440,-513,-109,-440,440,109,368,-440,-563,239,X,X,X,X,X,180,24)
SOUND
WAIT(1)
MOVE(0,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,0,720)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP0)
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1300)
V00=5
FJUMP
:MLT
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,1720)
:LOOP2
V130 = 0
:MOTGENELOOP4
JUMPIF(V124,=,0,MOTGENESTART6)
JUMPIF(V124,#,1,MOTGENELOOPCHECKEND5)
V124 = 0
:MOTGENESTART6
MOVE(X,X,X,X,X,X,-240,497,445,-443,-110,-445,426,107,283,-426,-619,237,X,X,X,X,X,X,24)
SOUND
WAIT(1)
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,720)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP4)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
V00=5
FJUMP
V00=62
V01=21
V02=0
V03=21
V04=0
V05=V107 OR V108
;V108,V107は荷物持つとき使う
V130 = 0
V124 = 0
JUMPIF(V05,#,0,MRT)
MOVE(0,0,700,0,0,0,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,0,0,-700,0,0,1500)
:LOOP
V130 = 0
:MOTGENELOOP0
JUMPIF(V124,=,0,MOTGENESTART1)
JUMPIF(V124,#,127,MOTGENELOOPCHECKEND1)
;PS3対応 右アナログ 右旋回値127を外れたら停止へ
V124 = 0
:MOTGENESTART1
MOVE(-180,X,X,X,X,X,-239,563,440,-368,-109,-440,440,109,513,-440,-418,239,X,X,X,X,X,35,24)
SOUND
WAIT(1)
MOVE(0,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,0,720)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP0)
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1300)
V00=5
FJUMP
:MRT
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,1720)
:LOOP2
V130 = 0
:MOTGENELOOP4
JUMPIF(V124,=,0,MOTGENESTART6)
JUMPIF(V124,#,127,MOTGENELOOPCHECKEND5)
V124 = 0
:MOTGENESTART6
MOVE(X,X,X,X,X,X,-237,619,426,-283,-107,-426,445,110,443,-445,-497,240,X,X,X,X,X,X,24)
SOUND
WAIT(1)
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,720)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP4)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
V00=5
FJUMP
V00=62
V01=0
V02=0
V03=21
V04=0
V05=V107 OR V108
;V108,V107は荷物持つとき使う
V130 = 0
V122 = 0
JUMPIF(V05,#,0,MLS)
MOVE(0,0,700,0,0,0,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,0,0,-700,0,0,1500)
:LOOP
V130 = 0
:MOTGENELOOP0
JUMPIF(V122,=,0,MOTGENESTART1)
JUMPIF(V122,#,1,MOTGENELOOPCHECKEND1)
;PS3対応 左アナログ 左横移動値0を外れたら停止へ
V122 = 0
:MOTGENESTART1
MOVE(13,X,X,X,X,X,-100,370,319,-317,-100,-319,330,-39,329,-330,-382,-39,X,X,X,X,X,-1,160)
MOVE(-79,X,X,X,X,X,-113,462,410,-408,-113,-410,330,-39,329,-330,-382,51,X,X,X,X,X,-1,160)
MOVE(14,X,X,X,X,X,-296,369,317,-315,-296,-317,330,-39,329,-330,-382,51,X,X,X,X,X,-1,160)
MOVE(125,X,X,X,X,X,-267,258,206,-204,-267,-206,330,-39,329,-330,-382,-39,X,X,X,X,X,-1,160)
SOUND
MOVE(35,X,X,X,X,X,-159,348,296,-294,-159,-296,323,85,321,-323,-374,85,X,X,X,X,X,-9,160)
MOVE(1,X,X,X,X,X,-39,382,330,-329,-39,-330,270,201,268,-270,-322,201,X,X,X,X,X,-61,160)
MOVE(9,X,X,X,X,X,85,374,323,-321,85,-323,144,303,142,-144,-196,303,X,X,X,X,X,-187,160)
MOVE(4,X,X,X,X,X,-28,379,327,-325,62,-327,297,316,295,-297,-349,316,X,X,X,X,X,-34,160)
MOVE(4,X,X,X,X,X,-28,379,327,-325,62,-327,404,138,402,-404,-455,138,X,X,X,X,X,72,160)
MOVE(-1,X,X,X,X,X,16,384,332,-330,16,-332,324,77,322,-324,-376,77,X,X,X,X,X,-7,160)
SOUND
MOVE(0,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,0,640)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP0)
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1300)
V00=5
FJUMP
:MLS
MOVE(X,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,X,1640)
:LOOP2
V130 = 0
:MOTGENELOOP4
JUMPIF(V122,=,0,MOTGENESTART7)
JUMPIF(V122,#,1,MOTGENELOOPCHECKEND5)
V122 = 0
:MOTGENESTART7
MOVE(X,X,X,X,X,X,-77,431,319,-258,-77,-319,327,-15,265,-327,-439,-15,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-80,466,352,-288,-80,-352,327,-15,265,-327,-439,15,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-201,416,305,-244,-201,-305,327,-15,265,-327,-439,15,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-194,378,269,-211,-194,-269,327,-15,265,-327,-439,-15,X,X,X,X,X,X,160)
SOUND
MOVE(X,X,X,X,X,X,-117,419,308,-247,-117,-308,321,67,259,-321,-433,67,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-36,437,325,-264,-36,-325,296,146,236,-296,-406,146,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,46,436,324,-262,46,-324,248,221,191,-248,-356,221,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,1,438,326,-264,31,-326,296,215,236,-296,-406,215,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,1,438,326,-264,31,-326,348,96,285,-348,-462,96,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-2,439,327,-265,-2,-327,322,62,260,-322,-434,62,X,X,X,X,X,X,160)
SOUND
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,640)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP4)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
V00=5
FJUMP
V00=62
V01=0
V02=0
V03=21
V04=0
V05=V107 OR V108
;V108,V107は荷物持つとき使う
V130 = 0
V123 = 0
JUMPIF(V05,#,0,MBK)
MOVE(0,0,700,0,0,0,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,0,0,-700,0,0,1500)
:MOTGENESTART1
MOVE(17,X,X,X,X,X,-114,366,314,-313,-114,-314,329,-53,327,-329,-381,-53,0,X,X,X,X,-2,200)
MOVE(-47,X,X,X,X,X,-123,430,378,-376,-123,-378,329,-53,327,-329,-381,7,0,X,X,X,X,-2,200)
:LOOP
V130 = 0
:MOTGENELOOP0
JUMPIF(V123,=,0,MOTGENELOOP1)
;赤外線リモコン時でも PS3用のV123は0だから下のV123,#,127の判定を通さない
;PS3時は以下の動作中にV123に入る値が0か127の時だけ以下の動作を繰り返す
JUMPIF(V123,#,127,MOTGENELOOPCHECKEND1)
;PS3対応 左アナログが後退127から外れたら停止へ
V123 = 0
:MOTGENELOOP1
MOVE(-70,X,X,X,X,X,-127,453,402,-400,-127,-402,328,-53,307,-328,-399,27,0,X,X,X,X,16,200)
MOVE(12,X,X,X,X,X,-150,371,367,-413,-150,-367,322,-79,280,-322,-413,-19,75,X,X,X,X,30,200)
MOVE(80,X,X,X,X,X,-98,303,314,-375,-98,-314,325,-37,263,-325,-437,-37,130,X,X,X,X,54,200)
MOVE(45,X,X,X,X,X,-16,338,330,-371,-16,-330,320,45,238,-320,-453,45,150,X,X,X,X,70,200)
SOUND
MOVE(26,X,X,X,X,X,58,357,327,-348,58,-327,298,117,197,-298,-448,117,130,X,X,X,X,65,200)
MOVE(8,X,X,X,X,X,20,375,324,-322,80,-324,362,150,286,-362,-488,150,75,X,X,X,X,105,200)
MOVE(-11,X,X,X,X,X,0,394,323,-303,80,-323,393,157,391,-393,-445,157,0,X,X,X,X,62,200)
MOVE(-30,X,X,X,X,X,19,413,322,-280,79,-322,367,150,413,-367,-371,150,-75,X,X,X,X,-12,200)
MOVE(-54,X,X,X,X,X,37,437,325,-263,37,-325,314,98,375,-314,-303,98,-130,X,X,X,X,-80,200)
MOVE(-70,X,X,X,X,X,-45,453,320,-238,-45,-320,330,16,371,-330,-338,16,-150,X,X,X,X,-45,200)
SOUND
MOVE(-65,X,X,X,X,X,-117,448,298,-197,-117,-298,327,-58,348,-327,-357,-58,-130,X,X,X,X,-26,200)
MOVE(-115,X,X,X,X,X,-122,498,371,-294,-122,-371,329,-53,327,-329,-381,7,-75,X,X,X,X,-2,200)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP0)
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
MOVE(-47,X,X,X,X,X,-123,430,378,-376,-123,-378,329,-53,327,-329,-381,7,0,X,X,X,X,-2,200)
MOVE(0,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,X,X,X,X,0,200)
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1500)
V00=5
FJUMP
:MBK
MOVE(X,X,X,X,X,X,-33,505,388,-321,-33,-388,388,33,321,-388,-505,33,X,X,X,X,X,X,1200)
:MOTGENESTART5
MOVE(X,X,X,X,X,X,-114,491,375,-309,-114,-375,387,-48,320,-387,-504,-48,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-129,580,456,-381,-129,-456,387,-48,320,-387,-504,12,X,X,X,X,X,X,200
:LOOP2
V130 = 0
:MOTGENELOOP4
JUMPIF(V123,=,0,MOTGENELOOP5)
JUMPIF(V123,#,127,MOTGENELOOPCHECKEND5)
V123 = 0
:MOTGENELOOP5
MOVE(X,X,X,X,X,X,-137,615,486,-407,-137,-486,385,-48,307,-385,-513,42,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-184,540,443,-396,-184,-443,375,-98,287,-375,-513,-38,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-114,461,378,-345,-114,-378,381,-48,281,-381,-530,-48,X,X,X,X,X,X,200)
SOUND
WAIT(100)
MOVE(X,X,X,X,X,X,-16,486,392,-347,-16,-392,378,50,267,-378,-538,50,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,73,490,385,-329,73,-385,356,135,238,-356,-524,135,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,39,494,378,-312,99,-378,433,182,318,-433,-597,182,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,9,503,376,-299,99,-376,470,195,394,-470,-597,195,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,38,513,375,-287,98,-375,443,184,396,-443,-540,184,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,48,530,381,-281,48,-381,378,114,345,-378,-461,114,X,X,X,X,X,X,200)
SOUND
WAIT(100)
MOVE(X,X,X,X,X,X,-50,538,378,-267,-50,-378,392,16,347,-392,-486,16,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-135,524,356,-238,-135,-356,385,-73,329,-385,-490,-73,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-127,616,448,-331,-127,-448,387,-48,320,-387,-504,12,X,X,X,X,X,X,200)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP4)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
MOVE(X,X,X,X,X,X,-129,580,456,-381,-129,-456,387,-48,320,-387,-504,12,X,X,X,X,X,X,200)
MOVE(X,X,X,X,X,X,-33,505,388,-321,-33,-388,388,33,321,-388,-505,33,X,X,X,X,X,X,200)
V00=5
FJUMP
V00=62
V01=0
V02=0
V03=21
V04=0
V05=V107 OR V108
;V108,V107は荷物持つとき使う
V130 = 0
V122 = 0
JUMPIF(V05,#,0,MRS)
MOVE(0,0,700,0,0,0,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,0,0,0,-700,0,0,1500)
:LOOP
V130 = 0
:MOTGENELOOP0
JUMPIF(V122,=,0,MOTGENESTART1)
JUMPIF(V122,#,127,MOTGENELOOPCHECKEND1)
;PS3対応 左アナログ 右横移動値127を外れたら停止へ
V122 = 0
:MOTGENESTART1
MOVE(1,X,X,X,X,X,39,382,330,-329,39,-330,319,100,317,-319,-370,100,X,X,X,X,X,-13,160)
MOVE(1,X,X,X,X,X,-51,382,330,-329,39,-330,410,113,408,-410,-462,113,X,X,X,X,X,79,160)
MOVE(1,X,X,X,X,X,-51,382,330,-329,39,-330,317,296,315,-317,-369,296,X,X,X,X,X,-14,160)
MOVE(1,X,X,X,X,X,39,382,330,-329,39,-330,206,267,204,-206,-258,267,X,X,X,X,X,-125,160)
SOUND
MOVE(9,X,X,X,X,X,-85,374,323,-321,-85,-323,296,159,294,-296,-348,159,X,X,X,X,X,-35,160)
MOVE(61,X,X,X,X,X,-201,322,270,-268,-201,-270,330,39,329,-330,-382,39,X,X,X,X,X,-1,160)
MOVE(187,X,X,X,X,X,-303,196,144,-142,-303,-144,323,-85,321,-323,-374,-85,X,X,X,X,X,-9,160)
MOVE(34,X,X,X,X,X,-316,349,297,-295,-316,-297,327,-62,325,-327,-379,28,X,X,X,X,X,-4,160)
MOVE(-72,X,X,X,X,X,-138,455,404,-402,-138,-404,327,-62,325,-327,-379,28,X,X,X,X,X,-4,160)
MOVE(7,X,X,X,X,X,-77,376,324,-322,-77,-324,332,-16,330,-332,-384,-16,X,X,X,X,X,1,160)
SOUND
MOVE(0,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,0,640)
:MOTGENELOOPCHECK1
JUMPIF(V130,=,0,MOTGENELOOP0)
JUMPIF(V130,#,V29,LOOP)
;赤外線リモコン時V130がV29だったら停止へ
:MOTGENELOOPCHECKEND1
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1300)
V00=5
FJUMP
:MRS
MOVE(X,X,X,X,X,X,-31,383,331,-329,-31,-331,331,31,329,-331,-383,31,X,X,X,X,X,X,640)
:LOOP2
V130 = 0
:MOTGENELOOP4
JUMPIF(V122,=,0,MOTGENESTART7)
JUMPIF(V122,#,127,MOTGENELOOPCHECKEND5)
V122 = 0
:MOTGENESTART7
MOVE(X,X,X,X,X,X,15,439,327,-265,15,-327,319,77,258,-319,-431,77,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-15,439,327,-265,15,-327,352,80,288,-352,-466,80,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-15,439,327,-265,15,-327,305,201,244,-305,-416,201,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,15,439,327,-265,15,-327,269,194,211,-269,-378,194,X,X,X,X,X,X,160)
SOUND
MOVE(X,X,X,X,X,X,-67,433,321,-259,-67,-321,308,117,247,-308,-419,117,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-146,406,296,-236,-146,-296,325,36,264,-325,-437,36,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-221,356,248,-191,-221,-248,324,-46,262,-324,-436,-46,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-215,406,296,-236,-215,-296,326,-31,264,-326,-438,-1,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-96,462,348,-285,-96,-348,326,-31,264,-326,-438,-1,X,X,X,X,X,X,160)
MOVE(X,X,X,X,X,X,-62,434,322,-260,-62,-322,327,-2,265,-327,-439,-2,X,X,X,X,X,X,160)
SOUND
MOVE(X,X,X,X,X,X,-31,438,326,-264,-31,-326,326,31,264,-326,-438,31,X,X,X,X,X,X,640)
:MOTGENELOOPCHECK5
JUMPIF(V130,=,0,MOTGENELOOP4)
JUMPIF(V130,#,V29,LOOP2)
:MOTGENELOOPCHECKEND5
V00=5
FJUMP
JUMPIF(V01,=,0,SKIP)
;
:RESTART
V130=0
V120=0
V121=0
V95=0
:SENSORWALKMAIN
V95=V120*256+V121+V130
JUMPIF(V95,=,0,GOWALK)
JUMPIF(V95,=,V29,STOPWALK)
JUMPIF(V95,=,32,STOPWALK)
JUMP(RESTART)
:GOWALK
V130=0
V120=0
V121=0
MOVE(0,0,700,0,0,0,-54,406,390,-423,-54,-390,390,54,423,-390,-406,54,0,0,0,-700,0,0,2400)
V00=INPUTADC(7)
JUMPIF(V00,>,70,BKTURN)
Move(0,0,700,0,0,-400,-54,556,390,-273,-54,-390,390,54,273,-390,-556,54,0,0,0,-700,0,0,2400)
WAIT(100)
V00=INPUTADC(7)
JUMPIF(V00,<,30,BKTURN)
MOVE(0,0,700,0,0,0,-54,406,390,-423,-54,-390,390,54,423,-390,-406,54,0,0,0,-700,0,0,2400)
:MOTGENESTART19R
MOVE(10,X,X,X,X,X,-111,396,379,-412,-111,-379,393,-5,426,-393,-409,-5,0,X,X,X,X,3,60)
MOVE(-67,X,X,X,X,X,-126,473,460,-498,-126,-460,393,-5,426,-393,-409,55,0,X,X,X,X,3,60)
V02 = 3
:MOTGENELOOP19R
MOVE(-94,X,X,X,X,X,-134,500,490,-530,-134,-490,390,-5,451,-390,-380,85,0,X,X,X,X,-26,60)
MOVE(-121,X,X,X,X,X,-162,527,452,-426,-162,-452,384,-38,471,-384,-347,22,-50,X,X,X,X,-59,60)
MOVE(-70,X,X,X,X,X,-104,476,380,-333,-104,-380,380,2,493,-380,-317,2,-87,X,X,X,X,-89,60)
MOVE(-56,X,X,X,X,X,-34,462,392,-372,-34,-392,367,71,504,-367,-279,71,-100,X,X,X,X,-127,60)
MOVE(-31,X,X,X,X,X,25,437,393,-400,25,-393,344,126,504,-344,-234,126,-87,X,X,X,X,-172,60)
MOVE(-1,X,X,X,X,X,-20,407,391,-425,40,-391,434,160,573,-434,-346,160,-50,X,X,X,X,-60,60)
MOVE(28,X,X,X,X,X,-50,378,388,-449,40,-388,480,174,519,-480,-491,174,0,X,X,X,X,85,60)
MOVE(59,X,X,X,X,X,-22,347,384,-471,38,-384,452,162,426,-452,-527,162,50,X,X,X,X,121,60)
MOVE(89,X,X,X,X,X,-2,317,380,-493,-2,-380,380,104,333,-380,-476,104,87,X,X,X,X,70,60)
MOVE(127,X,X,X,X,X,-71,279,367,-504,-71,-367,392,34,372,-392,-462,34,100,X,X,X,X,56,60)
MOVE(172,X,X,X,X,X,-126,234,344,-504,-126,-344,393,-25,400,-393,-437,-25,87,X,X,X,X,31,60)
MOVE(53,X,X,X,X,X,-123,353,444,-585,-123,-444,393,-5,426,-393,-409,55,50,X,X,X,X,3,60)
:MOTGENELOOPCHECK19R
V02 = V02 - 1
JUMPIF(V02,>,0,MOTGENELOOP19R)
:MOTGENELOOPCHECKEND19R
MOVE(-67,X,X,X,X,X,-126,473,460,-498,-126,-460,393,-5,426,-393,-409,55,0,X,X,X,X,3,60)
MOVE(0,X,X,X,X,X,-54,406,390,-423,-54,-390,390,54,423,-390,-406,54,0,X,X,X,X,0,60)
JUMP(SENSORWALKMAIN)
:BKTURN
MOVE(0,0,700,0,0,0,-54,406,390,-423,-54,-390,390,54,423,-390,-406,54,0,0,0,-700,0,0,2400)
:MOTGENESTART22R
MOVE(X,X,X,X,X,X,-111,482,381,-379,-111,-381,394,-5,392,-394,-496,-5,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-126,563,461,-459,-126,-461,394,-5,392,-394,-496,55,X,X,X,X,X,X,60)
V02 = 3
:MOTGENELOOP22R
MOVE(X,X,X,X,X,X,-134,593,491,-490,-134,-491,394,-5,376,-394,-512,85,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-162,509,451,-492,-162,-451,391,-38,355,-391,-527,22,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-104,426,379,-432,-104,-379,391,3,337,-391,-545,3,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-34,456,391,-427,-34,-391,383,73,312,-383,-554,73,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,25,475,393,-411,25,-393,366,129,279,-366,-553,129,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-20,494,392,-390,40,-392,447,164,378,-447,-617,164,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-50,510,392,-374,40,-392,482,174,480,-482,-583,174,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-22,527,391,-355,38,-391,451,162,492,-451,-509,162,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-3,545,391,-337,-3,-391,379,104,432,-379,-426,104,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-73,554,383,-312,-73,-383,391,34,427,-391,-456,34,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-129,553,366,-279,-129,-366,393,-25,411,-393,-475,-25,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-125,628,457,-387,-125,-457,394,-5,392,-394,-496,55,X,X,X,X,X,X,60)
:MOTGENELOOPCHECK22R
V02 = V02 - 1
JUMPIF(V02,>,0,MOTGENELOOP22R)
:MOTGENELOOPCHECKEND22R
MOVE(X,X,X,X,X,X,-126,563,461,-459,-126,-461,394,-5,392,-394,-496,55,X,X,X,X,X,X,60)
MOVE(X,X,X,X,X,X,-54,493,391,-389,-54,-391,391,54,389,-391,-493,54,X,X,X,X,X,X,60)
V02 = 3
:MOTGENESTART20R
MOVE(X,X,X,X,X,X,-245,390,472,-603,-155,-472,483,159,428,-483,-588,249,X,X,X,X,X,X,24)
WAIT(1)
MOVE(X,X,X,X,X,X,-54,406,390,-423,-54,-390,390,54,423,-390,-406,54,X,X,X,X,X,X,720)
V02=V02-1
JUMPIF(V02,>,0,MOTGENESTART20R)
JUMP(SENSORWALKMAIN)
:STOPWALK
Move(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2700)
V00=5
FJUMP
:SKIP
;右アッパー
MOVE(0,0,656,0,0,0,-67,471,388,-355,-67,-388,388,67,355,-388,-471,67,0,0,0,-656,0,0,1200)
MOVE(-441,-166,916,-957,0,-39,-30,482,440,-438,-32,-440,441,26,432,-441,-486,24,-35,0,965,-986,326,387,1200)
MOVE(-439,-166,916,-956,0,-45,-39,726,772,-865,-57,-772,759,134,766,-759,-798,149,-30,0,966,-986,326,387,1200)
MOVE(-438,-166,916,-956,0,-90,-41,732,773,-872,-58,-773,760,138,773,-760,-799,155,-441,0,225,-1292,317,-146,1200)
MOVE(-435,-168,918,-955,0,138,-167,106,254,-372,-167,-254,241,218,293,-241,-151,215,-359,0,124,-729,67,-1010,694)
MOVE(-435,-168,918,-955,0,138,-167,106,254,-372,-167,-254,241,218,293,-241,-151,215,-359,0,124,-729,67,-1010,1200)
MOVE(-435,-168,918,-955,0,138,-167,106,254,-372,-167,-254,241,218,293,-241,-151,215,-359,0,124,-729,67,-1010,1200)
MOVE(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2400)
V00=5
FJUMP
CALL(OKBEEP)
:WAIT1
V130=0
V120=0
V121=0
:WAIT2
V130=V120*256+V121+V130
JUMPIF(V130,=,0,WAIT2)
JUMPIF(V130,=,V34,KEY1)
JUMPIF(V130,=,V35,KEY2)
JUMPIF(V130,=,V36,KEY3)
JUMPIF(V130,=,V37,KEY4)
JUMPIF(V130,=,V38,KEY5)
JUMPIF(V130,=,V39,KEY6)
JUMPIF(V130,=,V40,KEY7)
JUMPIF(V130,=,V41,KEY8)
JUMPIF(V130,=,V42,KEY9)
JUMPIF(V130,=,2050,KEY1)
;v押したままのR1で前転
JUMPIF(V130,=,4098,KEY2)
;v押したままのR2で後転
JUMPIF(V130,=,514,KEY3)
;v押したままのL1でほふく前進
;
CALL(ERRBEEP)
JUMP(WAIT1)
:KEY1
;前転
MOVE(172,-384,888,413,1430,-32,2,2,2,3,-6,-1,4,3,2,-4,2,-3,0,-1406,-272,-754,348,-200,1500)
MOVE(330,-365,891,382,1428,-62,71,776,996,-941,47,-701,461,59,837,-1188,-845,52,21,-1405,-96,-757,326,-249,1500)
MOVE(635,-362,888,-352,1428,-684,54,874,1042,-1025,3,-676,627,20,962,-1111,-951,43,4,-1414,439,-979,351,-598,1500)
MOVE(1031,-412,966,-1013,1428,-1008,34,597,597,-878,3,-693,412,-26,802,-845,-670,0,-3,-1412,1000,-940,392,-1052,1500)
MOVE(1508,-410,962,-1015,1428,-1021,29,566,23,-418,-2,142,-239,-33,417,-124,-588,-10,-5,-1415,1001,-907,396,-1522,1500)
MOVE(1642,-409,957,-1016,1428,-940,33,-225,592,68,7,63,-242,-33,123,-51,-702,-8,1,-1414,1002,-908,396,-1654,1500)
MOVE(1648,-406,951,-1015,1428,-911,-71,-230,637,11,28,-195,-298,-31,-126,-698,60,59,-11,-1414,1002,-907,396,-1661,2400)
MOVE(1648,-406,951,-1015,1428,-911,-71,-20,637,11,28,155,-298,-31,-126,-698,60,59,-11,-1414,1002,-907,396,-1661,1500)
MOVE(1665,-410,934,-1015,1429,134,39,-159,898,37,-32,-75,-288,-59,-155,-1137,169,2,-45,-1415,1001,-884,394,-1678,3000)
MOVE(1937,-445,875,-234,1428,146,19,-226,933,-330,-24,-83,-30,-63,330,-1033,231,-27,-33,-1414,107,-928,394,-1932,3000)
MOVE(2078,-423,919,68,1423,158,14,-227,869,-759,-6,-436,450,-59,762,-847,232,-33,-40,-1406,-227,-956,361,-2182,3000)
MOVE(2400,-418,923,55,1423,159,52,-225,879,-986,4,-429,459,-30,998,-844,232,10,-39,-1405,-226,-955,361,-2400,3000)
MOVE(920,-418,923,55,1423,159,52,-225,879,-986,4,-429,459,-30,998,-844,232,10,-39,-1405,-226,-955,361,-920,1500)
MOVE(442,-445,925,-382,1423,-360,15,-225,870,-918,-6,-441,450,-58,928,-846,233,-32,-27,-1416,149,-849,359,-590,1500)
MOVE(-14,-445,925,-381,1423,265,-21,549,896,-893,-7,-531,452,-59,885,-931,-527,-57,-11,-1416,148,-849,361,-191,1500)
MOVE(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,3000)
V00=5
FJUMP
:KEY2
;こうてん
MOVE(-171,-272,896,-23,0,9,5,-6,6,-6,-7,-9,6,4,-8,-3,-5,-4,4,0,-54,-884,223,44,2400)
MOVE(-172,-272,896,-22,0,-380,-122,596,969,-600,-134,-391,186,109,517,-1151,-680,104,-4,1,-56,-884,224,51,2400)
MOVE(1921,-441,930,-258,0,-230,-145,586,1017,-617,-133,-434,254,123,526,-1161,-671,113,25,0,336,-1023,382,-1802,2400)
MOVE(1764,-446,924,-966,1,96,-15,-225,701,-197,6,-289,94,-7,202,-889,217,-47,-4,0,844,-863,420,-1799,2400)
MOVE(1705,-445,925,-966,0,83,-36,918,-202,94,5,-216,154,15,65,-881,210,-54,-10,0,885,-937,432,-1794,2400)
MOVE(1954,-454,893,-365,1,149,-42,857,-203,91,7,-214,31,10,813,-981,214,-51,-12,-3,440,-932,394,-1888,2400)
MOVE(1301,-450,925,-807,1,-18,-1,948,-165,63,0,-266,-312,7,-133,-236,-947,-34,19,-2,764,-876,442,-1354,2400)
MOVE(1658,-451,915,-650,1,-714,-2,894,-149,31,9,208,-310,10,-59,132,-885,-60,-5,0,642,-929,440,-1665,2400)
MOVE(1322,-453,963,-152,1,-453,12,883,-157,253,-7,231,-235,-14,-233,144,-872,-60,-38,-1,219,-933,427,-1308,2400)
MOVE(1573,-342,902,279,0,-905,2,746,-154,254,-7,-31,40,5,-232,127,-755,-11,13,0,-337,-893,386,-1613,2400)
MOVE(801,-295,903,279,1,-1012,-25,196,-172,254,-9,-17,-183,-7,-232,-121,-279,-28,-11,1,-332,-784,329,-907,2400)
MOVE(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2400)
V00=5
FJUMP
:KEY3
;ほふくぜんしん
MOVE(862,86,-112,-278,0,0,4,-2,6,5,-4,-10,6,8,-8,-8,4,-5,-1,0,170,-30,-44,-1280,2400)
MOVE(823,-353,-117,-280,0,-9,1,5,-6,-7,-9,3,-5,13,7,2,-7,-1,-1,1,86,-67,321,-992,2400)
MOVE(817,-352,-120,-278,-1,-27,-24,984,920,-695,-27,-738,812,-4,759,-869,-948,-22,9,2,83,-67,318,-991,2400)
MOVE(824,-360,-111,-287,-1,135,-29,1095,952,-1022,4,-400,366,0,1017,-960,-1056,-11,-4,1,84,-62,318,-984,2400)
MOVE(818,-371,-114,-296,0,194,-247,371,210,-1022,-7,-379,363,1,1019,-340,-433,181,-6,0,87,-66,325,-996,2400)
MOVE(988,343,-11,-641,0,69,-246,371,211,-1022,-7,-379,364,0,1019,-340,-433,181,-336,1,54,-151,382,-871,2400)
MOVE(1238,-305,105,-115,0,112,-243,372,209,-1012,-9,-383,372,-5,1015,-353,-427,178,-291,1,264,3,275,-486,2400)
MOVE(1147,-172,207,-41,0,74,-238,365,217,-1010,-9,-391,370,-2,1018,-364,-416,176,361,0,328,-81,-81,-483,2400)
MOVE(468,-217,243,-347,0,46,-235,334,234,-1012,-29,-400,374,3,1011,-367,-421,177,361,-1,-42,-317,335,-1176,2400)
MOVE(621,-37,110,-239,2,-131,-235,333,241,-1012,-36,-409,375,3,1009,-375,-414,178,-328,0,29,-468,406,-1063,2400)
MOVE(988,343,-11,-641,0,69,-246,371,211,-1022,-7,-379,364,0,1019,-340,-433,181,-336,1,54,-151,382,-871,2400)
MOVE(1238,-305,105,-115,0,112,-243,372,209,-1012,-9,-383,372,-5,1015,-353,-427,178,-291,1,264,3,275,-486,2400)
MOVE(1147,-172,207,-41,0,74,-238,365,217,-1010,-9,-391,370,-2,1018,-364,-416,176,361,0,328,-81,-81,-483,2400)
MOVE(468,-217,243,-347,0,46,-235,334,234,-1012,-29,-400,374,3,1011,-367,-421,177,361,-1,-42,-317,335,-1176,2400)
MOVE(621,-37,110,-239,2,-131,-235,333,241,-1012,-36,-409,375,3,1009,-375,-414,178,-328,0,29,-468,406,-1063,2400)
MOVE(988,343,-11,-641,0,69,-246,371,211,-1022,-7,-379,364,0,1019,-340,-433,181,-336,1,54,-151,382,-871,2400)
MOVE(1238,-305,105,-115,0,112,-243,372,209,-1012,-9,-383,372,-5,1015,-353,-427,178,-291,1,264,3,275,-486,2400)
MOVE(1147,-172,207,-41,0,74,-238,365,217,-1010,-9,-391,370,-2,1018,-364,-416,176,361,0,328,-81,-81,-483,2400)
MOVE(468,-217,243,-347,0,46,-235,334,234,-1012,-29,-400,374,3,1011,-367,-421,177,361,-1,-42,-317,335,-1176,2400)
MOVE(621,-37,110,-239,2,-131,-235,333,241,-1012,-36,-409,375,3,1009,-375,-414,178,-328,0,29,-468,406,-1063,2400)
MOVE(988,343,-11,-641,0,69,-246,371,211,-1022,-7,-379,364,0,1019,-340,-433,181,-336,1,54,-151,382,-871,2400)
MOVE(1238,-305,105,-115,0,112,-243,372,209,-1012,-9,-383,372,-5,1015,-353,-427,178,-291,1,264,3,275,-486,2400)
MOVE(1147,-172,207,-41,0,74,-238,365,217,-1010,-9,-391,370,-2,1018,-364,-416,176,361,0,328,-81,-81,-483,2400)
MOVE(468,-217,243,-347,0,46,-235,334,234,-1012,-29,-400,374,3,1011,-367,-421,177,361,-1,-42,-317,335,-1176,2400)
MOVE(621,-37,110,-239,2,-131,-235,333,241,-1012,-36,-409,375,3,1009,-375,-414,178,-328,0,29,-468,406,-1063,2400)
MOVE(356,-433,913,-667,1,196,-235,333,241,-1012,-36,-409,375,3,1009,-375,-414,178,-28,1,652,-899,371,-370,2400)
MOVE(805,-435,898,-117,1,-786,-251,278,359,-962,-179,-599,255,129,873,-759,-402,99,-50,0,191,-973,368,-737,2400)
MOVE(804,-435,898,-117,1,-867,-17,673,660,-1022,-16,-1005,939,10,996,-736,-693,-5,-50,0,190,-973,368,-737,2400)
MOVE(155,-338,1005,426,1,36,-17,674,660,-1021,-17,-1005,939,10,996,-736,-694,-4,14,-1,-352,-968,333,-103,2400)
MOVE(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2400)
V00=5
FJUMP
:KEY4
:KEY5
:KEY6
:KEY7
:KEY8
:KEY9
CALL(ERRBEEP)
JUMP(WAIT1)
;
:OKBEEP
V00=62
V01=192
V02=0
V03=20
V04=0
SOUND
WAIT(100)
RETURN
:ERRBEEP
V00=62
V01=213
V02=0
V03=20
V04=0
SOUND
WAIT(30)
SOUND
WAIT(30)
RETURN
;登場
MOVE(-87,-255,866,-136,1,38,4,0,-1,3,-7,-2,5,3,-2,-4,0,0,-24,0,166,-897,169,1,1799)
MOVE(-87,-256,866,-137,1,-343,-39,41,1043,-791,-24,-113,870,69,404,-314,-473,48,-19,-1,165,-897,169,4,1799)
MOVE(-87,-258,863,-136,1,-567,55,125,442,-1023,-9,-1026,46,62,2,-1178,-903,96,-3,0,162,-897,176,7,1799)
MOVE(307,-122,291,110,1,-498,56,125,442,-1023,-8,-1027,46,60,-1,-1178,-903,99,75,0,874,-885,169,-408,1799)
MOVE(385,-274,158,335,-1,-498,56,125,442,-1023,-8,-1027,46,60,-1,-1178,-903,99,50,-2,349,-225,298,-947,1799)
MOVE(445,-205,-10,301,748,-702,53,42,443,-992,73,-1012,-99,118,-46,-1191,-713,107,51,-1480,341,-24,339,-1047,1799)
:LOOP2
V130=0
V120=0
V121=0
V95=V120*256+V121+V130
:LOOP
JUMPIF(V95,=,0,LOOP)
JUMPIF(V95,=,V29,GETUP)
JUMPIF(V95,=,32,GETUP)
JUMP LOOP2
:GETUP
MOVE(313,-171,291,308,2,-699,65,101,450,-1022,-21,-1021,57,58,-10,-1179,-903,108,249,-1480,685,-852,430,-870,2400)
MOVE(95,-173,860,-280,1,-682,70,91,453,-1025,-19,-1021,56,58,-15,-1179,-898,111,97,-1480,552,-850,280,-160,2400)
MOVE(96,-173,860,-280,1,-669,69,90,452,-1025,-1,-1020,208,55,182,-1156,-834,111,98,-1479,548,-851,280,-159,2400)
MOVE(95,-174,858,-279,1430,-348,65,57,-167,-673,-7,-1013,208,54,302,-780,-573,101,96,-1478,549,-850,280,-157,2400)
MOVE(95,-174,858,-280,1428,-316,61,-96,-153,-320,-13,-487,167,30,192,-360,-213,77,92,-1478,548,-851,280,-157,2400)
MOVE(-503,-249,1059,-703,1453,19,-98,-4,4,3,-106,-6,2,104,-6,-4,0,102,-7,-1383,670,-989,215,289,2400)
MOVE(-122,-61,478,-157,1452,-75,-99,-3,9,7,-110,-10,8,105,-11,-8,4,105,-15,-1383,179,-577,30,256,2400)
V00=5
FJUMP
