mirror of
https://github.com/irmen/prog8.git
synced 2024-10-17 10:24:55 +00:00
wordings
This commit is contained in:
parent
4dbf4b2005
commit
c0e83ef8df
@ -3,8 +3,6 @@
|
|||||||
%zeropage basicsafe
|
%zeropage basicsafe
|
||||||
|
|
||||||
; The classic number guessing game.
|
; The classic number guessing game.
|
||||||
; This version uses mostly high level subroutine calls and loops.
|
|
||||||
; It's more readable than the low-level version, but produces a slightly larger program.
|
|
||||||
|
|
||||||
~ main {
|
~ main {
|
||||||
|
|
||||||
|
@ -53,20 +53,21 @@
|
|||||||
|
|
||||||
|
|
||||||
~ irq {
|
~ irq {
|
||||||
sub irq() {
|
|
||||||
c64.EXTCOL--
|
|
||||||
|
|
||||||
; float up & wobble horizontally
|
sub irq() {
|
||||||
for ubyte @zp i in 0 to 14 step 2 {
|
c64.EXTCOL--
|
||||||
c64.SPXY[i+1]--
|
|
||||||
ubyte @zp r = rnd()
|
; float up & wobble horizontally
|
||||||
if r>200
|
for ubyte @zp i in 0 to 14 step 2 {
|
||||||
c64.SPXY[i]++
|
c64.SPXY[i+1]--
|
||||||
else if r<40
|
ubyte @zp r = rnd()
|
||||||
c64.SPXY[i]--
|
if r>200
|
||||||
|
c64.SPXY[i]++
|
||||||
|
else if r<40
|
||||||
|
c64.SPXY[i]--
|
||||||
|
}
|
||||||
|
|
||||||
|
c64.EXTCOL++
|
||||||
}
|
}
|
||||||
|
|
||||||
c64.EXTCOL++
|
|
||||||
}
|
|
||||||
|
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user