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

byte screen @ 1024

define main routine
  trashes a, z, n, screen
{
  ld a, 83
  st a, screen
}