SixtyPical/eg/apple2/print.60p

// Write ">AB>" to "standard output"

define cout routine
  inputs a
  trashes a
  @ $FDED

define main routine
  trashes a, z, n
{
    ld a, 62
    call cout
    ld a, 65
    call cout
    ld a, 66
    call cout
    ld a, 62
    call cout
}
Add apple2 target to loadngo.sh, apple2 example program. 2018-09-05 15:20:44 +01:00			`// Write ">AB>" to "standard output"`

More conversion. 2018-09-09 14:01:38 +01:00			`define cout routine`
Add apple2 target to loadngo.sh, apple2 example program. 2018-09-05 15:20:44 +01:00			`inputs a`
			`trashes a`
			`@ $FDED`

More conversion. 2018-09-09 14:01:38 +01:00			`define main routine`
Add apple2 target to loadngo.sh, apple2 example program. 2018-09-05 15:20:44 +01:00			`trashes a, z, n`
			`{`
			`ld a, 62`
			`call cout`
			`ld a, 65`
			`call cout`
			`ld a, 66`
			`call cout`
			`ld a, 62`
			`call cout`
			`}`