ドリトル先生

1 ：なまえ＿＿＿＿＿かえす日：2010/12/09(木) 18:59:02 ID:+0QjBO1q.net

私の子供時代の愛読書でした。
やさしい、動物語をあやつるドリトル先生と、
オウムのポリネシアをはじめとする動物の仲間たちについて語りましょう。
「ガブガブの本」についても可です。

172 ：なまえ＿＿＿＿＿かえす日：2019/11/09(土) 08:44:00.24 ID:UBGidm6a.net

//初期設定
//外壁、内壁をつくる

かめぞう＝タートル！作る。
壁＝「かめぞう！ 1０ 歩く ９０ 右回り ２００ 歩く ９０ 右回り」！２回 繰り返す 図形にする （青）塗る。
x=-1。
壁：ゆらら＝「｜x｜！０ (１０*(x)) 移動する。」。
壁：衝突＝「｜相手｜「（相手＝＝外壁３）！（相手＝＝外壁４） どれか本当」！なら「x=(-1)*x。」実行。」。
壁１＝壁！作る （黄）塗る １３０ １００ 移動する。
壁２＝壁！作る （緑）塗る -１００ 2００ 移動する。
壁３＝壁！作る （赤）塗る -200 150 移動する。
外壁＝壁！作る （水）塗る １ 4 拡大する 350 250 移動する。
外壁２＝外壁！作る -700 0 移動する。
外壁３＝外壁！作る 90 右回り。
外壁４＝外壁３！作る ０ -470 移動する。
ゴール＝壁！作る （赤）塗る 3 0.3 拡大する ９０ 右回り 3００ ２２０ 移動する 。
かめぞう！消える。

//得点板をつくる
得点＝フィールド！作る -３０0 １４０ 移動する 。

//タイマー関係
時計＝タイマー！作る。
t＝５００。


//プレーヤーをつくる
かめた＝タートル！作る。
かめた！ペンなし 100 -20０ 移動する。
かめた：ゆらゆら＝「！１０ 歩く 5 右回り」。

かめこ＝かめた！作る （あゆみあか） 変身する 6０ ０ 移動する (random(360) ) 右回り。
かめお＝かめた！作る （あゆみあお） 変身する -60 0 移動する (random(360) ) 右回り。
かめきち＝かめた！作る （あゆみあお） 変身する -18０ 0 移動する (random(360) ) 右回り。


//ボタン設定
ボタン１＝ボタン！”Run”作る 200 50 移動する。
ボタン１：動作＝「
得点！”５００”書く。
時計！ ５０５ 回数「
t＝t−１。かめた！ゆらゆら。かめこ！ゆらゆら。かめお！ゆらゆら。かめきち！ゆらゆら。
壁！ゆらら。壁３！ゆらら。得点！（t）書く。
かめた：衝突＝「｜相手｜「相手＝＝ゴール」！なら「ラベル！”You are out"作る 200 -100 移動する。時計！中断。」そうでなければ「！１０ 戻る 1８0 左回り 」実行。」。
かめこ：衝突＝「｜相手｜「相手＝＝ゴール」！なら「ラベル！”You Win”作る 200 -100 移動する。時計！中断。」そうでなければ「！１０ 戻る 1８0 左回り 」実行。」。
」実行。
」。

ボタン２＝ボタン！”右”作る 2００ 0 移動する。
ボタン２：動作＝「かめこ！５０ 右回り。」。

ボタン３＝ボタン！”左” 作る 2００ -50 移動する。
ボタン３：動作＝「かめこ！５０ 左回り。」。

173 ：なまえ＿＿＿＿＿かえす日：2019/11/09(土) 08:47:19.00 ID:UBGidm6a.net

//初期設定
//外壁、内壁をつくる

かめぞう＝タートル！作る。
壁＝「かめぞう！ 1０ 歩く ９０ 右回り ２００ 歩く ９０ 右回り」！２回 繰り返す 図形にする （青）塗る。
x=-1。
壁：ゆらら＝「｜x｜！０ (１０*(x)) 移動する。」。
壁：衝突＝「｜相手｜「（相手＝＝外壁３）！（相手＝＝外壁４） どれか本当」！なら「x=(-1)*x。」実行。」。
壁１＝壁！作る （黄）塗る １３０ １００ 移動する。
壁２＝壁！作る （緑）塗る -１００ 2００ 移動する。
壁３＝壁！作る （赤）塗る -200 150 移動する。
外壁＝壁！作る （水）塗る １ 4 拡大する 350 250 移動する。
外壁２＝外壁！作る -700 0 移動する。
外壁３＝外壁！作る 90 右回り。
外壁４＝外壁３！作る ０ -470 移動する。
ゴール＝壁！作る （赤）塗る 3 0.3 拡大する ９０ 右回り 3００ ２２０ 移動する 。
かめぞう！消える。

//得点板をつくる
得点＝フィールド！作る -３０0 １４０ 移動する 。

//タイマー関係
時計＝タイマー！作る。
t＝５００。


//プレーヤーをつくる
かめた＝タートル！作る。
かめた！ペンなし 100 -20０ 移動する。
かめた：ゆらゆら＝「！１０ 歩く 5 右回り」。

かめこ＝かめた！作る （あゆみあか） 変身する 6０ ０ 移動する (random(360) ) 右回り。
かめお＝かめた！作る （あゆみあお） 変身する -60 0 移動する (random(360) ) 右回り。
かめきち＝かめた！作る （あゆみあお） 変身する -180 0 移動する (random(360) ) 右回り。


//ボタン設定
ボタン１＝ボタン！”Run”作る 200 50 移動する。
ボタン１：動作＝「
得点！”５００”書く。
時計！ ５０５ 回数「
t＝t−１。かめた！ゆらゆら。かめこ！ゆらゆら。かめお！ゆらゆら。かめきち！ゆらゆら。
壁！ゆらら。壁３！ゆらら。得点！（t）書く。
かめた：衝突＝「｜相手｜「相手＝＝ゴール」！なら「ラベル！”You are out"作る 200 -100 移動する。時計！中断。」そうでなければ「！１０ 戻る 1８0 左回り 」実行。」。
かめこ：衝突＝「｜相手｜「相手＝＝ゴール」！なら「ラベル！”You Win”作る 200 -100 移動する。時計！中断。」そうでなければ「！１０ 戻る 180 左回り 」実行。」。
」実行。
」。

ボタン２＝ボタン！”右”作る 200
0 移動する。
ボタン２：動作＝「かめこ！５０ 右回り。」。

ボタン３＝ボタン！”左” 作る 200 -50 移動する。
ボタン３：動作＝「かめこ！５０ 左回り。」。