0 REM ! LET <>"CHR$ / STEP I] NEXT GO SUB {=/ LLIST ! RESTORE !v RESTORE CLEAR THEN INKEY$PEEK *O/ FOR !USR CLEAR © GO SUB yw< GO SUB yw= GO SUB yPEEK CHR$ < GO SUB yCODE 2▟/ STEP [L]" STEP k> STEP STEP /^! LPRINT Z 6G, CLS !▝^ POKE P RESTORE MERGE ~▜o&))~# IF MOVE LLIST # DIM v RETURN © GO SUB x THEN _( OUT GO SUB x THEN g INPUT 2$^ STEP /^![ STEP x^ STEP n^ STEP /^ STEP USR vCODE FLASH RETURN / NEW ( RUN vCODE FLASH RETURN / NEW RUN STEP n^ STEP /^ STEP USR ) STEP n^T] STEP [> CLEAR © GO SUB y; STEP n^1O_P_ STEP [>ATN (>ACS 2 CLS > OPEN # RETURN vvvCODE OPEN # RETURN NEXT go"P"Q" GO TO " GO SUB !P^"VAL$ _NOT P_!"k_"l_NOT __ CLS vCODE OPEN # RETURN ! COPY Z RETURN Z COPY w GO SUB LN <>!USR RESTORE STEP x^ LLIST NEXT <>/NOT =CHEAT (Y/N)? TRD by tiboh'22
1 CLEAR VAL "24575": RANDOMIZE USR VAL "23872"