1
0
mirror of https://github.com/catseye/SixtyPical.git synced 2024-11-29 03:51:35 +00:00
SixtyPical/eg/c64/hearts.60p
2018-03-08 13:36:30 +00:00

17 lines
439 B
Plaintext

// Displays 256 hearts at the top of the Commodore 64's screen.
// Define where the screen starts in memory:
byte table[256] screen @ 1024
routine main
// These are the values that will be written to by this routine:
trashes a, x, z, n, screen
{
ld x, 0
ld a, 83 // 83 = screen code for heart
repeat {
st a, screen + x
inc x
} until z // this flag will be set when x wraps around from 255 to 0
}