** ハート形を描くロボット [#y067bdc3] &size(10){ロボットにペンを取り付けA3用紙にハート型を描くロボットを作成しなさい。}; &size(8){プログラミング作成者兼組み立て係担当 副タイ}; task main()~ task main()~ { SetPower(OUT_A+OUT_C,OUT_LOW);//電源ON、モーターLOW~ OnFwd(OUT_A+OUT_C);//直進~ Wait(100);~ Off(OUT_A+OUT_C);~ SetPower(OUT_A+OUT_C,OUT_HALF);//モーターHALFに設定~ OnFwd(OUT_A);//時計回りに回りながら半円を描く~ repeat(60)~ {~ OnRev(OUT_C);~ Wait(1);~ Off(OUT_C);~ Wait(1);~ }~ Off(OUT_A);~ OnRev(OUT_A);//反対回りしながら半円を描く~ repeat(60)~ {~ OnFwd(OUT_C);~ Wait(1);~ Off(OUT_C);~ Wait(1);~ }~ SetPower(OUT_A+OUT_C,OUT_LOW);//モーターLOWに戻す~ OnRev(OUT_A+OUT_C);//後進~ Wait(100);~ Off(OUT_A+OUT_C);//電源OFF~ }~ { SetPower(OUT_A+OUT_C,OUT_LOW);//電源ON、モーターLOW~ OnFwd(OUT_A+OUT_C);//直進~ Wait(100);~ Off(OUT_A+OUT_C);~ SetPower(OUT_A+OUT_C,OUT_HALF);//モーターHALFに設定~ OnFwd(OUT_A);//時計回りに回りながら半円を描く~ repeat(60)~ {~ OnRev(OUT_C);~ Wait(1);~ Off(OUT_C);~ Wait(1);~ }~ Off(OUT_A);~ OnRev(OUT_A);//反対回りしながら半円を描く~ repeat(60)~ {~ OnFwd(OUT_C);~ Wait(1);~ Off(OUT_C);~ Wait(1);~ }~ SetPower(OUT_A+OUT_C,OUT_LOW);//モーターLOWに戻す~ OnRev(OUT_A+OUT_C);//後進~ Wait(100);~ Off(OUT_A+OUT_C);//電源OFF~ }~ [[工夫したところナド⇒⇒>2004/A1/練習問題1/8班1]]