1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-06-01 12:41:30 +00:00
SixtyPical/eg/c64/joystick-demo.60p

20 lines
433 B
Plaintext
Raw Normal View History

// SPDX-FileCopyrightText: Chris Pressey, the author of this work, has dedicated it to the public domain.
// For more information, please refer to <https://unlicense.org/>
// SPDX-License-Identifier: Unlicense
include "joystick.60p"
word screen @ 1024
2018-09-09 13:01:38 +00:00
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
}