scene.org File Archive

File download

<root>­/­parties­/­2024­/­vccc24­/­christmas_challenge/serato_c64_basic_78b_vc3-2024.zip

File size:
122 981 bytes (120.10K)
File date:
2024-12-29 14:13:04
Download count:
all-time: 0

Preview

  • serato_C64_basic_78b_vc3-2024/box.basic.txt 106B
  • serato_C64_basic_78b_vc3-2024/box.prg 80B
  • serato_C64_basic_78b_vc3-2024/file_id.diz 650B
  • serato_C64_basic_78b_vc3-2024/result.png 56.32K
  • serato_C64_basic_78b_vc3-2024/source.png 69.62K

file_id.diz

78 byte Christmas Present in C64 Basic

Author: Serato / Finnish Gold
Category: Christmas Challenge
System:   C64
Language: C64 Basic V2
Len source code: 106
Len exe file:    80
Len code only:   78
Instructions:
Load BOX.PRG into emulator
Description:
12345678901234567890123456789012345678901234567890123456789012345678901234567890
The first line is printed directly, using SPC() to indent.
The rest of the box is calculated implicitly by iterating X and Y from -9 to 9
and testing each for = 9 * SGN(). These boolean results are combined with
boolean and math operators to form a result from 1-4. This selects a character
using MID$("-+ !").