2006a/B4

プログラミングとの戦い

プログラミングと私

  • HPを作ろうと某会社と契約したものの、HTMLが理解できずにそのまま放置してしまった私。
  • 一度は挫折したプログラミングでしたが、『せっかく大学に入ったんだから新しい事をしてみよう』と、思い切って受講してみる事に。

プログラミング

  • ロボコン試作(途中まで)(缶をとってくるロボット)
    #define  turn_right OnFwd(OUT_A);OnRev(OUT_C);
    #define  turn_left OnRev(OUT_A);OnFwd(OUT_C);
    #define  go  OnFwd(OUT_A+OUT_C);
    #define  back OnRev(OUT_A+OUT_C);
    #define  stop_turn Off(OUT_A+OUT_C);
    task main ()
    {
     SetSensor(SENSOR_1,SENSOR_TOUCH);
    
     
     ClearTimer(0);
     
     go;
     until (SENSOR_1=1)
     back;
     Wait(FastTimer(0)/2);
     
     turn_right;
     Wait(25);
     
     ClearTimer(0);
     
     go;
     until (SENSOR_1=1)
     back;
     Wait(FastTimer(0)/3);
     
     turn_right;
     Wait(25);
     go;
     until(SENSOR_1=1);
    
     back;
     Wait(20);
     turn_right;
     Wait(25);
     stop_turn;
     
     back;
     Wait(20);
     OnRev(OUT_B);
     Wait(20);//缶をつかむ
     
     
     
     
     
     
     
     
     
     Off(OUT_A;OUT_C);
     }
     
  • ロボコン試作(缶を受け取ってゴールするロボット)
     #define  turn_right OnFwd(OUT_A);OnRev(OUT_C);
    #define  turn_left OnRev(OUT_A);OnFwd(OUT_C);
    #define  go  OnFwd(OUT_A+OUT_C);
    #define  back OnRev(OUT_A+OUT_C);
    #define  stop_turn Off(OUT_A+OUT_C);
    task main ()
    {
     SetSensor(SENSOR_1,SENSOR_TOUCH);
      
     until(SENSOR_1=1);
     back;
     Wait(20);
     turn_right;
     Wait(25);
     back;
     Wait(20);
     OnFwd(OUT_B);
     Wait(17);
     
     ClearTimer(0);
     
     go;
     until (SENSOR_1=1)
     back;
     Wait(FastTimer(0)/2);
     
     turn_left;
     Wait(25);
     
     ClearTimer(0);
     
     go;
     until (SENSOR_1=1)
     back;
     Wait(FastTimer(0)/3);
     
     turn_right;
     Wait(25);
     Off(OUT_A+OUT_C);
     Wait(30);
     OnRev(OUT_B);
     Wait(17);
     
     back;
     Wait(40);
     Off(OUT_A+OUT_C);
     }
      
    

 #define turn_right OnFwd(OUT_A);OnRev(OUT_C);

#define  turn_left OnRev(OUT_A);OnFwd(OUT_C);
#define  go  OnFwd(OUT_A+OUT_C);
#define  back OnRev(OUT_A+OUT_C);
#define  stop_turn Off(OUT_A+OUT_C);
task main ()
{
 SetSensor(SENSOR_1,SENSOR_TOUCH);
 until(SENSOR_1==1);
 back;
 Wait(20);
 turn_right;
 Wait(30);
 back;
 Wait(20);
 OnFwd(OUT_B);
 Wait(17);
 
 ClearTimer(0);
 
 go;
 until (SENSOR_1==1);
 back;
 Wait(FastTimer(0)/2);
 
 turn_left;
 Wait(25);
 
 ClearTimer(0);
 
 go;
 until (SENSOR_1==1);
 back;
 Wait(FastTimer(0)/3);
 
 turn_right;
 Wait(25);
 Off(OUT_A+OUT_C);
 Wait(30);
 OnRev(OUT_B);
 Wait(17);
 
 back;
 Wait(40);
 Off(OUT_A+OUT_C);
 }

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-07-28 (金) 16:24:44