2024-02-02 12:10:23 +00:00
|
|
|
// 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
|
|
|
|
|
2019-10-23 09:21:02 +00:00
|
|
|
include "joystick.60p"
|
2017-11-20 15:18:21 +00:00
|
|
|
|
2019-10-22 15:09:58 +00:00
|
|
|
word screen @ 1024
|
2017-11-20 15:18:21 +00:00
|
|
|
|
2018-09-09 13:01:38 +00:00
|
|
|
define main routine
|
2017-11-20 15:18:21 +00:00
|
|
|
inputs joy2
|
|
|
|
outputs delta
|
|
|
|
trashes a, x, z, n, screen
|
|
|
|
{
|
|
|
|
repeat {
|
|
|
|
call read_stick
|
|
|
|
copy delta, screen
|
|
|
|
ld a, 1
|
|
|
|
} until z
|
|
|
|
}
|