20 lines
433 B
Plaintext
20 lines
433 B
Plaintext
// 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
|
|
|
|
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
|
|
}
|