From 89d5dbb71f54a80981f409cf15a9e9e36924ce0a Mon Sep 17 00:00:00 2001 From: Toolkitman Date: Wed, 2 Nov 2016 23:08:24 +0100 Subject: [PATCH] Create README.md --- README.md | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 README.md diff --git a/README.md b/README.md new file mode 100644 index 0000000..6cf3488 --- /dev/null +++ b/README.md @@ -0,0 +1,31 @@ +# copy-paste-apple-ii +This is a simple copy paste code for the apple ii + +Version 1.0 + +10 PRINT "COPY PASTE" +20 PRINT "WRITE A WORD" +30 INPUT A$ +35 PRINT "PRESS P KEY ON KEYBOARD" +40 INPUT B$ +50 IF B$ ="P" THEN PRINT A$ +60 GOTO 40 + +Version 2.0 + +10 PRINT "COPY PASTE" +11 PRINT " " +20 PRINT "WRITE A WORD" +21 PRINT " " +30 INPUT AG$ +31 PRINT " " +35 PRINT "TO PASTE PRESS P KEY ON KEYBOARD THEN RETURN " +36 PRINT " " +40 INPUT BG$ +50 IF BG$ ="P" THEN PRINT AG$ +51 PRINT " " +60 PRINT "DO YOU WANT TO REPEAT PASTE" +70 INPUT CG$ +90 IF CG$ = "P" THEN PRINT AG$ +100 IF CG$ <> "P" THEN GOTO 10 +110 GOTO 10