#è¤ ****************************#ò¤ * *#ü¤ * KEYBOARD TRAINER V010 *#¤ * *#¤ ****************************¤ By Nigel Deakin$¤ KEYBOARD.¤ Version date 21/10/84*8¤ copyright (c) 1984 Tatung (UK) Ltd.B¤3Lÿ”:Á 4: K~ 0 r 15:ÿ• K," ":› K:¤ START LINE 1=V“ Z s ‚:§ 1000:Z~u1: ‚:§ 1000: à ‘ 2710:¤ START LINE 2` 2720:¤ UPPER CASE jR~0:ÿƒ 4t 0,0,15,0,255,0:Á6~¤ ** DATA FOR TESTS 1 TO 5<ˆ‡ 1,"COMPUTER","66666666"," Type the following words."m’‡ 2,"elephant","11111111"," This test uses lower case letters. (Selected with the ALPHA LOCK key)";œ‡ 3,"Big Dog","6113611"," This test uses mixed text."R¦‡ 4,"2*(4+5)","3223232"," You will need the SHIFT key for some of these."i°‡ 5,"èÈèÈ","4545"," This test uses the graphics characters. (you will need the GRAPH key and H key)"&º¤ ** REPEAT DATA FOR TESTS 1 TO 5:ć 1,"EINSTEIN","66666666"," Alright then,here goes."E· 2,"cabbage patch","1111111311111"," Where do cabbages grow ?"Q؇ 3,"How Now Brown Cow","61136113611113611"," Here's the mixed text again."M⇠4,"125.89^17/(4-68)","3333333333232332"," Type the following number."iì‡ 5,"ðÐðÐ","4545"," This test uses the graphics characters. (you will need the GRAPH key and P key)"ö¤ ***** INTRODUCTION-¢@2,3;"Welcome to the EINSTEIN keyboard" ¢@2,4;"trainer."A~1200: 2810¢@2,7;"What is your name "-(¢:¢" (type your name then press ENTER)"2¢@20,7:” A$:A$~Ý(A$,14)<„:¢@6,4;"OK. ";A$2F¢:¢" Now we will learn to use the keyboard."PA~1100: 2810.Z¢@2,10;"You have already made a start by"d¢ " typing in your name."nA~1300: 2810x¤ *** TESTS 1 TO 8‚ 1520:¤ TEST 1Œ 1520:¤ TEST 2– 1520:¤ TEST 3  1520:¤ TEST 4ª 1520:¤ TEST 5(´ 1730:¤ REPEAT TESTS 1 TO 5 OPTION5¾“ R~1 z REP~1 s § 1220:ÿƒ4:REP~0:‘ 1400: § 1000È 1880:¤ TEST 6Ò 2130:¤ TEST 7Ü 2400:¤ TEST 8æ‘ 2610:¤ END OF TESTSð¤ *** TESTS 1,2,3,4 AND 5ú£ TN,C$,T$,M$A~1200: 3100¢@6,3;"type this:-" LC~Ï(C$)"¢@13,6;C$ ,¢@13,8;6 V~1 r LC@G$~ä$:“ Å(G$)}31 s ¢G$;,J“ Þ(C$,V,1)}G$ s 1680:‘ 1600:¤ ERRORT›V^A~700:“ F~0 s 3120/h“ TN~5 s ¢@2,21;"Now lets move on.":‘ 1660$r¢@2,21;"Now for the next test."| 2810: 3080†¨ ¤ ERRORšF~Ft1:A~100!¤T~Ü(Þ(T$,V,1)): 2850:¤ HELP ® 2750: 2780: 3080: 2830¸¨Â¤ * REPEAT TESTS OPTION/Ì„:ÿƒ12:¢@2,3;"Thats 5 tests completed ";A$ÖA~400: 28101à¢@2,6;"Now you can use upper and lower case"+ê¢@2,7;"letters,shifted characters and"ô¢@2,8;"graphics."þA~1800: 2810“ R~1 s ‘ 1870R~12¢@2,12;"Press 'R' if you want to repeat the "&&¢" 5 tests (with new words)."-0¢" Press 'C' if you want to continue.";@:J~ä:J~J z &DF:“ J~82 s REP~1:‘ 1870: “ J~67 s REP~0:‘ 1870 D‘ 1850N¨X¤ * TEST 6vb‡ 6," This test uses the cursor control keys,they're the two keys above ENTER. The SHIFT is also needed."kl‡"ûûûûûû ûûûûûû","û û û û","û û û û","û ûû û ûû û","û û ûûû û û","û ûû û û"Fv‡"ûûûûûû û û û"," ûû û Xû"," ûû ûûûû"," ûûûû"€„:ÿƒ11:ÿ1Ч 1890:£ TN,M$”A~2000: 3100!ž A~0 r 9:£ S$:¢@12,8tA;S$:›N¨¢@0,20;" Using the cursor control keys,move the cursor onto the X."²ÿ1:X~16:Y~10 ¼¢@X,Y;ÆG~äГ G~8 sX~Xu1Ú“ G~4 sX~Xt1ä“ G~11sY~Yu1î“ G~10sY~Yt1 øV$~Ö(Y)“ Þ(V$,Xt1,1)~"X" s 2090 “Þ(V$,Xt1,1)}" " s 2080 ‘ 19803 F~Ft1: 2750: 2780:¢@0,22;o39):‘ 1970:¤ ERROR* 3080:“ F2 s 3120$4¢@2,21;"Now for the next test.">A~1500: 2810H¨R¤ * TEST 7h\‡ 7," This test uses the DELete/INSert key.","THE KEY TO SUCCESS"," pTHEaKmEYTqOSUryCCEfSSqhaw "f§ 2140:£ TN,M$,C$,G$ pÿƒ8:ÿ1zA~1500: 31001„¢@2,13;"Change the second sentence into the"UŽ¢" first by using just the SHIFT,DEL/INS":¢" key and the cursor control keys."-˜¢" (ie. remove the lower case letters)"¢¢@3,6;C$:C$~Ö(6):X~3 ¬¢@0,8;G$ ¶¢@X,8;À“ C$~Ö(8) s 2360ÊG~ä!Ô“ G~4 z X39 s X~Xt1:¢ Ç(G); Þ“ G~8 z X}1 s X~Xu1:¢ Ç(G);è“ G~25 z X}1 s 2310(ò“ G~26 z Þ(Ö(8),38,1)~" " s ¢ Ç(G); ü‘ 2240 O$~Þ(Ö(8),X,1)1 “ O$Ç(65) { O$}Ç(90) s X~Xu1:¢ Ç(G);:‘ 2240  ¤ ERRORI$ ¢@2,18;"'DEL' deletes the character to the left of the cursor."I. F~Ft1: 2750:ÿ15:¢@5,21;"You need the ";O$: 2780:ÿ1: 3080:‘ 2230&8 ¢@0,17;o40): 3080:“ F2 s 31206B ¢@2,20;"Thats it ";A$:¢" Now for the next test."L A~1200: 2810: 3080V ¨` ¤ * TEST 8j ÿ15:ÿƒ13t ÿ†128,"0000040810A04000":~ ‡ 8," This test uses the CTRL (ConTRoL) key.","EASY"ˆ § 2430:£ TN,M$,C$:T~7’ A~2000: 3100!œ ¢@4,4;"Type the following:-"¦ D~1 r 4° B$~Þ(C$,D,1):E~Å(B$) º ¢@6,4tDw2;"'ctrl' ";B$;" ";Ä ¢@15,4tDw2;:G~äÎ “ G}Eu64 s ‘ 2570 Ø ¢ Ç(128)â ›Dì A~700:“ F~0 s 3120ö ¢@2,21;"Easy isn't it." A~1000: 2810:‘ 2610 F~Ft1:A~100:¤ ERROR  2850' 2750: 2780: 3080: 3080:‘ 2500( ¨2 ¤ *** END OF TESTS< ÿ”%F ¢@2,5;"The tests are completed."P A~1100: 2810+Z ¢@2,10;"Press 'R' to repeat the tests.)d ¢@2,12;"Press any other to finish.";n G~ä:G~G z &DF)x “ G~82 s § 1000:R~0:REP~0:ÿƒ4:‘ 1400$‚ „:¢@10,25uÏ(A$)x2;"Goodbye ";A$Œ A~1000: 2810– “ Z s 320: ÿ”:ÿƒ 4:Ž  ¤ * SET TO UPPER CASE/ª V~Ò(&FB3E):“ V128 s  (&FB3E),Vt128:Ÿ&22,0´ ¨¾ ¤ * ERROR NOISEÈ ·"V0=C5.GR","R","R"Ò ¨Ü ¤ * TRY AGAIN PROMPTFæ ÿ15,9:¢@3,22;" try again ";:ÿ15,0:¢" Press ENTER to Continue.";ð “ ä~13 s ¨: 2800ú ¤* PAUSE LOOP- Q~å: B~1 r A p 0.6 :“ å}0 s ¨: › B:¨ ¤ * DELETE CHAR. ON ERROR ¢@12tV,8;" ";Ç(8);:¨ " ¤ * HELP , ¢@0,18;-6 T 2890,2950,2970,2990,3020,2920,3060@ ¨J “ G$"A"{ G$}"Z" s 2910aT A~1100:¢" You are using upper case letters.":“ Ò(&FB3E)}127 s¢" Press the ALPHA LOCk key."^ ¨h “G$"a"{G$}"z"s ¨mr ¢" You should be using upper case letters.Press the ALPHA LOCK key. (or use the SHIFT) "| ¨@† “u×(Í(&20)z &80)s ¢" You need to hold down the SHIFT key." ¨:š “ çu×(Í(&20)z &80)s ¢" You dont need the SHIFT now."¤ ¨f® “(Í(&20)z &A0)}&80 s ¢" Hold down the GRAPH key to access the left hand graphics characters.":¸ ¢" (Use also the ";:“ R~0 s ¢"H key)";: ¢"P key)"; ¨Ì “ (Í(&20)z &A0)~0 s 3040eÖ ¢" Hold down the GRAPH and SHIFT keys to access the right hand graphics characters.":à ¢" (Use also the ";:“ R~0 s ¢"H key)";: ¢"P key)";ê ¨Dô “ (Í(&20) z &40)~&40 s ¢" You need to hold down the CTRL key."þ ¨ ¤ * BLANK LAST 5 ROWS ¢@0,18;o40w5);:¨ ¤ * PRINT TEST NO &MESSAGEC& „:F~0:¢@16,1;"TEST";TN;@16,2;"²²²²²²";@0,18;M$: 2810: 3080:¨0 ¤ * WELL DONE PROMPTS: ¢@0,18;:A~1300+D “ TN~1 { TN~7 { TN~8 s ¢" Well done."$N “ TN~2 { TN~4 s ¢" Very good."-X “ TN~3 s ¢" No problems with that one."2b “ TN~5 s ¢" Not bad at all,not one mistake.".l “ TN~6 s ¢:¢" Very good cursor control."v ¨¨ ƒ