CENTER:[[[次へ]>2005/C3/しまず/2]]
CENTER:[[[戻る]>2005/C3]]
*ここはしまずの(page)です。 [#l75b23bd]
~プログラミングはとても難しいです。
今回は漢字を書くロボットに挑戦しましたが、これは思った以上に難しいものです。
~これはロボットにペンなどを付けて字を書かせるのですが、ペンはマシンの回転
の中心に装備出来るわけではないので、単純にマシンを文字の通りに動かすだけ
ではまるで文字なんてものは表現できないわけです。結果は見るも無惨な意味不
明の線分の数々です。下のプログラムは最初に作ったものですが、文字なんてものは書きませんでした。全くの失敗ですね。
*「庄」を書くプログラム(失敗) [#l9de0316]

 task main()
 {
     down_pen();
     OnFwd(OUT_A+OUT_C);
     Wait(50);
     Float(OUT_A+OUT_C);
     up_pen();
     OnFwd(OUT_C);
     OnRev(OUT_A);
     Wait(78);
     Off(OUT_A+OUT_C);
     OnFwd(OUT_A+OUT_C);
     Wait(100);
     Off(OUT_A+OUT_C);
    down_pen();
    OnRev(OUT_C+OUT_A);
    Wait(200);
    Float(OUT_A+OUT_C);
    up_pen();
    OnFwd(OUT_A+OUT_C);
    Wait(200);
    Float(OUT_A+OUT_C);
    down_pen();
    OnFwd(OUT_A);
    OnRev(OUT_C);
    Wait(74);
    Off(OUT_A+OUT_C);
    OnFwd(OUT_A+OUT_C);
    Wait(160);
    Off(OUT_A+OUT_C);
    OnFwd(OUT_C);
    Wait(25);
    Off(OUT_C);
    OnFwd(OUT_A+OUT_C);
    Wait(155);
    Float(OUT_A+OUT_C);
    up_pen();
    OnRev(OUT_C+OUT_A);
    Wait(200);
    Float(OUT_A+OUT_C);
    turn_L();
    Wait(95);
    Off(OUT_A+OUT_C);
    down_pen();
    OnFwd(OUT_A+OUT_C);
    Wait(150);
    Float(OUT_A+OUT_C);
    up_pen();
    OnRev(OUT_C+OUT_A);
    Wait(75);
    Off(OUT_A+OUT_C);
    turn_L();
    Wait(84);
    Off(OUT_A+OUT_C);
    OnFwd(OUT_A+OUT_C);
    Wait(50);
    Off(OUT_A+OUT_C);
    down_pen();
    OnRev(OUT_C+OUT_A);
    Wait(170);
    Off(OUT_A+OUT_C);
    up_pen();
    turn_L();
    Wait(84);
    Off(OUT_A+OUT_C);
    OnFwd(OUT_A+OUT_C);
    Wait(100);
    Off(OUT_A+OUT_C);
    down_pen();
    OnRev(OUT_A+OUT_C);
    Wait(200);
    Float(OUT_A+OUT_C);
    
}
CENTER:[[[次へ]>2005/C3/しまず/2]]
CENTER:[[[戻る]>2005/C3]]

トップ   編集 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS