2005/C4/だいすけ

task main()
{
	SetSensor(SENSOR_1,SENSOR_TOUCH);
	SetSensor(SENSOR_3,SENSOR_TOUCH);
	OnFwd(OUT_A+OUT_C);
	until((SENSOR_1 == 0) && (SENSOR_3 == 0));
	Off(OUT_A);
	while (true)
	{
		if ((SENSOR_1 == 0) && (SENSOR_3 == 0))
		{
		  Off(OUT_A);
		  OnFwd(OUT_C);
		  until((SENSOR_1 == 1) && (SENSOR_3 == 0));
		}
		if ((SENSOR_1 == 1) && (SENSOR_3 == 0))
		{
		  OnFwd(OUT_A+OUT_C);
		}
		if ((SENSOR_1 == 1) && (SENSOR_3 == 1))
		{  
		  OnRev(OUT_A+OUT_C);
		  Wait(70);
		  Off(OUT_C);
		  OnFwd(OUT_A);
		  Wait(220);
		}
	}
}

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2005-11-25 (金) 19:42:48 (5013d)