SixtyPical/eg/apple2/print.60p

// 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

// 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
}