procedure setup end procedure loop DriveWrite(200, 200) Delay(1000) DriveWrite(0, 0) Delay(100) DriveWrite(-200, -200) Delay(1000) DriveWrite(0, 0) Delay(100) DriveWrite(200, -200) Delay(1000) DriveWrite(0, 0) Delay(100) end