Author: <okwatts>
Category: <Christmas Challenge >
System: <CPLD Trainer 65>
Language: <FIG-FORTH>
Len source code: <310>
Len exe file: <214>
Len code only: <# bytes> (valid for assembler only; length of executable without BASIC stub)
Instructions:
<Choose a suitable screen(file) and type in source. Then
Screen# load
3 pat <return>>
<Should run on almost any Forth implementation that conforms to the FIG standard>
Description:
<Create the basic elements of the pattern eg star and spaces
then arrange the lines for creating the pattern looking for repeated sequences
finally execute the main word pat with desired number of patterns in this case, 3>
Comments:
<It's been fun to attempt this using a language I'm trying to learn. I'm sure
others can optimize this further. Looking forward to seeing all the entries.
PS Scintilla seems to mess with the spacing of the pattern Notepad++ doesn't.>
