[[2006b/A3/課題1右]]
#contents
*プログラミング [#ubc5d8c7]
「林」という字を書くためのプログラムです。
 task main()
 {
     Wait(100);         
     OnFwd(OUT_A+OUT_C); Wait(50);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(60);
     OnRev(OUT_C); Wait(77);
     OnRev(OUT_A); Wait(120);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(120);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(215);
     OnRev(OUT_A); Wait(38);
     OnRev(OUT_C); Wait(103);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(40);
     Float(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(144);
     OnRev(OUT_C); Wait(80);
     OnRev(OUT_A); Wait(150);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(25);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_C); OnRev(OUT_A); Wait(40);
     OnFwd(OUT_A); Wait(140);
     OnRev(OUT_A); Wait(77);
     OnRev(OUT_C); Wait(180);
     Off(OUT_A+OUT_C);
     
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(50);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(50);
     OnRev(OUT_C); Wait(77);
     OnRev(OUT_A); Wait(110);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(120);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(210);
     OnRev(OUT_A); Wait(40);
     OnRev(OUT_C); Wait(100);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(33);
     Float(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     OnFwd(OUT_A+OUT_C); Wait(140);
     OnRev(OUT_C); Wait(80);
     OnRev(OUT_A); Wait(147);
     Off(OUT_A+OUT_C);
     OnRev(OUT_B); Wait(250);
     Off(OUT_B);
     OnRev(OUT_A+OUT_C); Wait(40);
     Float(OUT_A+OUT_C);
     OnFwd(OUT_B); Wait(250);
     Off(OUT_B);
     }
#ref(2006b/A3/ナオ 課題1/hayasi.jpg)

トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS