Short program to demonstrate the OVER command.
Content
Image Gallery
Source Code
10 PRINT "EXPERIMENTS WITH "" OVER """'' 20 INPUT "Enter any 2 characters (or space to stop) ";q$ 30 IF q$=CHR$ 32 THEN STOP 40 IF LEN q$<>2 THEN GO TO 20 50 PRINT q$(1);CHR$ 8; OVER 1;q$(2);" = ";q$(1);" OVER ";q$(2) 60 GO TO 20 9998 SAVE "OVERS 1" LINE 0