git @ Cat's Eye Technologies SixtyPical / 0.21 eg / c64 / joystick-demo.60p
0.21

Tree @0.21 (Download .tar.gz)

joystick-demo.60p @0.21raw · history · blame

include "joystick.60p"

word screen @ 1024

define main routine
  inputs joy2
  outputs delta
  trashes a, x, z, n, screen
{
    repeat {
        call read_stick
        copy delta, screen
        ld a, 1
    } until z
}