1 LET x=4: LET y=1
2 PRINT AT y,x;"*";AT y,20-x;"*": LET x=x+6: LET y=y+(x>19): LET x=x-19*(x>19): GO TO 2+(y>19)
