That's pretty good, especially for a first program. But, you don't need an Input.hasch (btw, you can just call hasch instead of Input.hasch), Input.KeyDown works by itself (it probably uses hasch itself). And you can change
| code: |
y := y + 10 |
to
| code: |
y += 10 |
or even better,
| code: |
y += 1 |
which is smoother
+= is incremental
-= is decremental
And, if you make each separate key press check a different if statment, you can get diagonal movement
Here's the code I changed around a bit. Pretty sweet, though. My first program was a simple art picture. And then a "Hi, my name is" 
| code: |
setscreen ("graphics:640,480,offscreenonly")
var x : int := 300 var y : int := 200 var chars : array char of boolean loop cls drawfilloval (x, y, 20, 20, 43) Input.KeyDown (chars) if chars (KEY_UP_ARROW) then y += 1 end if if chars (KEY_DOWN_ARROW) then y -= 1 end if if chars (KEY_LEFT_ARROW) then x -= 1 end if if chars (KEY_RIGHT_ARROW) then x += 1 end if View.Update end loop |