rem === SIMPLE BASIC PROGRAM ===

dim playerx
dim playery

playerx=10
playery=12

rem === main loop ===

mainloop:
 waitsync

 rem === draw player ===
 resetbeam
 moveto playerx, playery
 line 20, 20
 line 20, -20
 line -20, -20
 line -20, 20

 rem === draw hello world ===
 resetbeam
 moveto -100, 80
 print "hello world"

 rem === handle input ===
 if joystick1_x < 0 then 
    dec playerx
 endif
 if joystick1_x > 0 then 
    inc playerx
 endif
 if joystick1_y > 0 then 
    inc playery
 endif
 if joystick1_y < 0 then 
    dec playery
 endif
 if joystick1_button1 then
    goto end 
 endif

goto mainloop

end: