ロボティスク入門 目次 int write_time, sayuu; //sayuuha 1=migi 0=hidari

sub fudesage (){

	OnFwd(OUT_C); 
	Wait(15);
	Off(OUT_C);

}

sub fudeage(){

	OnRev(OUT_C);
	Wait(30);
	Off(OUT_C);

}

void yoko(){

	fudesage();
	OnFwd(OUT_A);
	Wait(write_time);
	Off(OUT_A);
	fudeage();

}

void tate(){

	fudesage();
	OnFwd(OUT_B);
	Wait(write_time);
	Off(OUT_B);
	fudeage();

}

void naname(){

	fudesage();
	OnFwd(OUT_B);
	if(sayuu==1){
		OnFwd(OUT_A);
	}else{
		OnRev(OUT_A);
	}
	Wait(write_time);
	Off(OUT_B+OUT_A);
	fudeage();

}

task main(){

           write_time=160;
           yoko();
           OnRev(OUT_A);
           Wait(60);
           OnRev(OUT_B);
           Wait(15);
           Off(OUT_A+OUT_B);
           
           write_time=130;
           tate();
           OnRev(OUT_B);
           Wait(110);
           Off(OUT_B);
           
           sayuu=0;
           write_time=100;
           naname();
           OnFwd(OUT_A);
           OnRev(OUT_B);
           Wait(95);
           Off(OUT_A+OUT_B);
           
           sayuu=1;
           write_time=60;
           naname();
           OnFwd(OUT_A);
           Wait(30);
           OnRev(OUT_B);
           Wait(60);
           Off(OUT_A+OUT_B);
           
           write_time=100;
           yoko();
           OnRev(OUT_A);
           Wait(100);
           Off(OUT_A);
           
           sayuu=0;
           write_time=100;
           naname();
           OnFwd(OUT_A);
           OnRev(OUT_B);
           Wait(60);
           Off(OUT_A+OUT_B);
           
           write_time=110;
           yoko();
           
           sayuu=0;
           write_time=70;
           naname();
           OnRev(OUT_B);
           Wait(60);
           Off(OUT_B);
           
           sayuu=1;
           write_time=60;
           naname();
           Off(OUT_A+OUT_B+OUT_C);
}
           

概要



トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2007-11-06 (火) 18:37:42