git @ Cat's Eye Technologies SixtyPical / develop-0.18 eg / rudiments / call.60p
develop-0.18

Tree @develop-0.18 (Download .tar.gz)

call.60p @develop-0.18 — raw · history · blame 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
// Include `support/${PLATFORM}.60p` before this source
// Should print AA

define print routine
  trashes a, z, n
{
    ld a, 65
    call chrout
}

define main routine
  trashes a, z, n
{
    call print
    call print
}