File download
- File size:
- 2 131 bytes (2.08K)
- File date:
- 2021-12-25 12:55:53
- Download count:
- all-time: 13
file_id.diz
CRCMon ver 0.8eps2w 12/07/21
> boot applications
1--EhBASIC,
2--Memory Diag,
3--CRCFig-Forth,
4--Secnd9-Forth 3 press Return to execute command
CRC65 FIG-FORTH SYM 2021
8 load OK
8 list
SCR#8
0 ( Christmas Challenge )
1 : star dup 0 do 42 emit loop ;
2 : sline dup 61 swap - 2 / dup spaces swap star spaces cr ;
3
4 : ntree cr 1 sline 3 sline 5 sline 7 sline 3 sline 7 sline
5 11 sline 15 sline 5 sline 11 sline 17 sline 23 sline
6 3 sline 3 sline ;
7
8
9
10
11
12
13
14
15
OK
ntree
*
***
*****
*******
***
*******
***********
***************
*****
***********
*****************
***********************
***
***
OK
Computer used
https://www.retrobrewcomputers.org/doku.php?id=builderpages:plasmo:crc65
Fig-Forth Implementation based on SYM forth from
http://forum.6502.org/viewtopic.php?f=9&t=1995&p=17100&hilit=symforth#p17100
Adaptation to CRC including Monitor by Larry Watts (okwatts) on 6502.org forum