scene.org File Archive

File download

<root>­/­parties­/­2025­/­vccc25­/­christmas_challenge/georgephillips_trs-80model3_diskbasic_122b_vc3-2025.zip

File size:
5 802 787 bytes (5.53M)
File date:
2025-12-30 23:34:07
Download count:
all-time: 1

Preview

  • bsnow-done.gif 29.52K
  • bsnow-run.gif 6.56M
  • bsnow-src.gif 44.14K
  • bsnow.txt 154B
  • file_id.diz 652B

file_id.diz

Christmas Snowflake

Author: George Phillips
Category: Christmas Challenge
System:   TRS-80 Model 3
Language: Disk BASIC
Len source code: 122
Len exe file:    
Len code only:   
Instructions:
Run trs80gp in model 3 mode (http://48k.ca/trs80gp.html)
trs80gp -m3
then go into basic
BASIC
press enter to skip prompts
copy and paste bsnow.txt
RUN
Description:
Encodes the vertical and diagonal bars as equations (X=Y, X=9, etc)
and the 1/8 slice as coodinate pairs in a string.  Prints a star if
an X,Y equation is true of if the character X*10+Y is in a string.
Comments:
I went through about 8 versions before I came up with this.