Dzeta: DZETA.B

  0 RANDOMIZE USR 38420
  1 GO TO 0
  65535 REM zSCREEN$ 5619: REM : SAVE "DZETA" LINE 1 LINE M_M_ REM : SAVE " NEXT  STEP [C];; LLIST o RESTORE  INK  MOVE  INK !@  RESTORE  MERGE  RESTORE  INK x RETURN   RETURN [K] OGy INK w$ BORDER  LLIST    BRIGHT  LLIST  MOVE   CAT  LLIST # <=!X INK x RETURN   RETURN [K] OGy INK w#xLEN   DATA  CLS <>[K] p  [K][K]?0,USR  LPRINT  LIST  SAVE  DRAW  RETURN  COPY  COPY ©?[K] COPY  COPY [K][K]![K]?© COPY [K]??©©[K] COPY  RETURN  DRAW  SAVE  SAVE