Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- {$reference SmallBasicLibrary.dll}
- uses Microsoft.SmallBasic.Library,System;
- type gw = GraphicsWindow;
- type t = turtle;
- begin
- gw.Width := 640;
- gw.Height := 520;
- gw.Title := 'Черепаший брейк';
- t.Speed := 6;
- // код пишем сюда
- t.Show;
- t.Turn(-90);
- while true do
- begin
- Sleep(500);
- t.Turn(180);
- Sleep(500);
- t.Turn(-180);
- end;
- end.
Advertisement
Add Comment
Please, Sign In to add comment