C2024

Author: Jose Antonio Vaque Urbaneja (javu61)
Category: Christmas Challenge
System:   Sinclair Spectrum
Language: BASIC
Len source code: 153 bytes
Len exe file:    
Len code only:  
Instructions:
Using BasIN, load C2024.bas, using other emulator load C2024.tap
Description:
One only line. Print the upper, mount two variables for lines and spaces, print lines, two loops: 
Externas 1 to 2, internal 1 to 7 for print spaces and close internal loop, print lines and close external
Comments:
In ZXBasic there is no IF with THEN, nor commands like MOD, therefore we cannot use a single loop with comparisons
to know where we are, I can only think of using the classic two-loop system.