Christmas Diamonds
Christmesh C64 67b Author: Logiker System: C64 Language: BASIC V2.0 Usage: Use Vice or another emulator and run it. Code: 0a$="{right}{right}{right}{right}{right}*":fori=-9to9:n=i-int(i/6)*6:printspc(6-n)a$a$a$"{return}{up}"spc(n)a$a$a$:next Writes each line by line. A line consists of the "right" and "left" side of the diamonds. The distance is always the same and cursor {right} is used to move to the next diamond.
[ back to the prod ]