LOL up until 3am, not good - edited paragraph. Also, code for fun...

There is no COMMAND r

Corrected:

If CMD does not work, use COMMAND or omit it and just use start. (I have another function to find out which one works on any system. An alternative is to just use two lines and one will get ignored.)

Ild-rest would be all over my case for missing the closing )))))) also!

Pete

P.S. Why is the computer so @#$% loud this morning?

-----------------------------------------------------
REM KING IN ASCii CHARACTERS.
REM USE LEFT AND RIGHT ARROW KEYS TO CHANGE. ESC TO END.
ADVANCE = 1
DO
CLS : LOCATE 5: RESTORE
FOR I = 1 TO 14
READ A$
FOR J = 1 TO LEN(A$)
IF MID$(A$, J, 1) = "*" THEN MID$(A$, J, 1) = CHR$(X)
NEXT J
PRINT SPACE$(36) + A$
NEXT I
IF SCREEN(6, 40) <> 32 THEN
LOCATE 25, 2: PRINT "USING CHR$(" + LTRIM$(STR$(X)) + ")";
DO
B$ = INKEY$
IF B$ = CHR$(27) THEN SYSTEM
LOOP UNTIL B$ = CHR$(0) + "M" OR B$ = CHR$(0) + "K"
IF B$ = CHR$(0) + "M" THEN ADVANCE = 1 ELSE ADVANCE = -1
END IF
X = X + ADVANCE
IF X = 256 THEN X = 0: ADVANCE = 1 ELSE IF X = 0 THEN X = 255: ADVANCE = -1
LOOP
SYSTEM

DATA " *
DATA " *****
DATA " *
DATA " * *
DATA " *******
DATA " *****
DATA " ***
DATA " ***
DATA " ***
DATA " ***
DATA " *****
DATA " *******
DATA "*********
DATA "*********