SCRIPT FILES
FILE INFORMATION
FILENAME(S): SCRIPT FILES
FILE TYPE(S): SEQ
FILE SIZE: 9.5K
FIRST SEEN: 2025-10-20 14:30:27
APPEARS ON: 1 disk(s)
FILE HASH
d6e8744e1759b2f756aeaf42429889b7127ab39ae5366f6ffe9db4f0e5ef935a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| LOWER LEVEL | SCRIPT FILES | SEQ | Treasure Chest - Klaus Der Suhler | 10 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 33 2E 33 20 20 73 43 52 49 50 54 20 46 49 4C 45 |3.3 sCRIPT FILE|
00000010: 53 0D 0D 33 2E 33 2E 31 20 20 64 45 53 43 52 49 |S..3.3.1 dESCRI|
00000020: 50 54 49 4F 4E 2E 0D 0D 73 43 52 49 50 54 20 46 |PTION...sCRIPT F|
00000030: 49 4C 45 53 20 41 52 45 20 55 53 45 52 2D 43 52 |ILES ARE USER-CR|
00000040: 45 41 54 45 44 20 50 52 4F 47 52 41 4D 53 20 43 |EATED PROGRAMS C|
00000050: 4F 4E 54 41 49 4E 49 4E 47 20 43 4F 4D 4D 41 4E |ONTAINING COMMAN|
00000060: 44 53 20 57 48 49 43 48 0D 49 4E 53 54 52 55 43 |DS WHICH.INSTRUC|
00000070: 54 20 54 48 45 20 54 45 52 4D 49 4E 41 4C 20 54 |T THE TERMINAL T|
00000080: 4F 20 50 45 52 46 4F 52 4D 20 43 45 52 54 41 49 |O PERFORM CERTAI|
00000090: 4E 20 46 55 4E 43 54 49 4F 4E 53 20 41 55 54 4F |N FUNCTIONS AUTO|
000000A0: 4D 41 54 49 43 41 4C 4C 59 2E 20 79 4F 55 0D 46 |MATICALLY. yOU.F|
000000B0: 49 52 53 54 20 43 52 45 41 54 45 20 41 20 22 50 |IRST CREATE A "P|
000000C0: 52 4F 47 52 41 4D 22 20 55 53 49 4E 47 20 54 48 |ROGRAM" USING TH|
000000D0: 45 20 53 43 52 49 50 54 20 4C 41 4E 47 55 41 47 |E SCRIPT LANGUAG|
000000E0: 45 2C 20 41 4E 44 20 54 48 45 4E 20 59 4F 55 0D |E, AND THEN YOU.|
000000F0: 43 4F 4D 50 49 4C 45 20 54 48 45 20 50 52 4F 47 |COMPILE THE PROG|
00000100: 52 41 4D 20 49 4E 54 4F 20 43 4F 4D 4D 41 4E 44 |RAM INTO COMMAND|
00000110: 20 43 4F 44 45 53 20 57 48 49 43 48 20 54 48 45 | CODES WHICH THE|
00000120: 20 54 45 52 4D 49 4E 41 4C 20 49 4E 54 45 52 50 | TERMINAL INTERP|
00000130: 52 45 54 53 0D 41 4E 44 20 45 58 45 43 55 54 45 |RETS.AND EXECUTE|
00000140: 53 2E 20 20 61 4E 20 45 58 41 4D 50 4C 45 20 4F |S. aN EXAMPLE O|
00000150: 46 20 41 20 53 43 52 49 50 54 20 49 53 20 41 20 |F A SCRIPT IS A |
00000160: 50 52 4F 47 52 41 4D 20 54 48 41 54 20 43 41 4C |PROGRAM THAT CAL|
00000170: 4C 53 20 55 50 20 41 0D 62 62 73 2C 20 4C 4F 47 |LS UP A.bbs, LOG|
00000180: 53 20 49 4E 20 57 49 54 48 20 59 4F 55 52 20 4E |S IN WITH YOUR N|
00000190: 41 4D 45 20 41 4E 44 20 50 41 53 53 57 4F 52 44 |AME AND PASSWORD|
000001A0: 2C 20 52 45 41 44 53 20 4E 45 57 20 4D 45 53 53 |, READS NEW MESS|
000001B0: 41 47 45 53 20 41 4E 44 0D 43 41 50 54 55 52 45 |AGES AND.CAPTURE|
000001C0: 53 20 54 48 45 4D 20 49 4E 20 54 48 45 20 42 55 |S THEM IN THE BU|
000001D0: 46 46 45 52 2C 20 4C 4F 47 53 20 4F 46 46 2C 20 |FFER, LOGS OFF, |
000001E0: 41 4E 44 20 53 41 56 45 53 20 54 48 45 20 4D 45 |AND SAVES THE ME|
000001F0: 53 53 41 47 45 53 20 54 4F 20 44 49 53 4B 2E 0D |SSAGES TO DISK..|
00000200: 0D 74 4F 20 43 52 45 41 54 45 20 41 20 53 43 52 |.tO CREATE A SCR|
00000210: 49 50 54 2C 20 55 53 45 20 54 48 45 20 73 45 51 |IPT, USE THE sEQ|
00000220: 20 45 44 49 54 4F 52 20 54 4F 20 57 52 49 54 45 | EDITOR TO WRITE|
00000230: 20 41 20 46 49 4C 45 20 57 49 54 48 20 54 48 45 | A FILE WITH THE|
00000240: 20 53 43 52 49 50 54 0D 43 4F 4D 4D 41 4E 44 53 | SCRIPT.COMMANDS|
00000250: 2C 20 41 4E 44 20 54 48 45 4E 20 52 55 4E 20 54 |, AND THEN RUN T|
00000260: 48 45 20 73 43 52 49 50 54 20 43 4F 4D 50 49 4C |HE sCRIPT COMPIL|
00000270: 45 52 20 54 4F 20 43 4F 4E 56 45 52 54 20 54 48 |ER TO CONVERT TH|
00000280: 45 20 53 45 51 55 45 4E 54 49 41 4C 0D 46 49 4C |E SEQUENTIAL.FIL|
00000290: 45 20 49 4E 54 4F 20 41 4E 20 45 58 45 43 55 54 |E INTO AN EXECUT|
000002A0: 41 42 4C 45 20 53 43 52 49 50 54 20 46 49 4C 45 |ABLE SCRIPT FILE|
000002B0: 2E 20 20 74 48 45 20 53 43 52 49 50 54 20 53 4F |. tHE SCRIPT SO|
000002C0: 55 52 43 45 20 43 4F 44 45 20 4D 41 59 20 42 45 |URCE CODE MAY BE|
000002D0: 0D 53 41 56 45 44 20 45 49 54 48 45 52 20 49 4E |.SAVED EITHER IN|
000002E0: 20 41 20 53 45 51 55 45 4E 54 49 41 4C 20 46 49 | A SEQUENTIAL FI|
000002F0: 4C 45 20 4F 52 20 41 53 20 4C 49 4E 45 53 20 49 |LE OR AS LINES I|
00000300: 4E 20 41 20 50 52 4F 47 52 41 4D 20 57 49 54 48 |N A PROGRAM WITH|
00000310: 20 4C 49 4E 45 0D 4E 55 4D 42 45 52 53 2E 20 20 | LINE.NUMBERS. |
00000320: 65 41 43 48 20 43 4F 4D 4D 41 4E 44 20 53 48 4F |eACH COMMAND SHO|
00000330: 55 4C 44 20 42 45 20 45 4E 54 45 52 45 44 20 4F |ULD BE ENTERED O|
00000340: 4E 20 41 20 53 45 50 41 52 41 54 45 20 4C 49 4E |N A SEPARATE LIN|
00000350: 45 3B 20 4E 4F 20 43 4F 4C 4F 4E 53 0D 4F 52 20 |E; NO COLONS.OR |
00000360: 4F 54 48 45 52 20 43 48 41 52 41 43 54 45 52 53 |OTHER CHARACTERS|
00000370: 20 41 52 45 20 55 53 45 44 20 54 4F 20 53 45 50 | ARE USED TO SEP|
00000380: 41 52 41 54 45 20 43 4F 4D 4D 41 4E 44 53 20 4F |ARATE COMMANDS O|
00000390: 4E 20 54 48 45 20 53 41 4D 45 20 4C 49 4E 45 2E |N THE SAME LINE.|
000003A0: 0D 79 4F 55 20 4D 41 59 20 49 4E 43 4C 55 44 45 |.yOU MAY INCLUDE|
000003B0: 20 43 4F 4D 4D 45 4E 54 53 20 49 4E 20 54 48 45 | COMMENTS IN THE|
000003C0: 20 53 43 52 49 50 54 20 50 52 4F 47 52 41 4D 20 | SCRIPT PROGRAM |
000003D0: 42 59 20 50 4C 41 43 49 4E 47 20 54 48 45 20 43 |BY PLACING THE C|
000003E0: 4F 4D 4D 45 4E 54 0D 54 45 58 54 20 41 46 54 45 |OMMENT.TEXT AFTE|
000003F0: 52 20 41 20 53 45 4D 49 43 4F 4C 4F 4E 20 28 22 |R A SEMICOLON ("|
00000400: 3B 22 29 20 4F 4E 20 41 20 4C 49 4E 45 2E 20 74 |;") ON A LINE. t|
00000410: 48 45 20 43 4F 4D 50 49 4C 45 52 20 49 47 4E 4F |HE COMPILER IGNO|
00000420: 52 45 53 20 41 4E 59 54 48 49 4E 47 0D 4F 4E 20 |RES ANYTHING.ON |
00000430: 41 20 4C 49 4E 45 20 54 48 41 54 20 43 4F 4D 45 |A LINE THAT COME|
00000440: 53 20 41 46 54 45 52 20 41 20 53 45 4D 49 43 4F |S AFTER A SEMICO|
00000450: 4C 4F 4E 2E 0D 0D 33 2E 33 2E 32 20 20 73 43 52 |LON...3.3.2 sCR|
00000460: 49 50 54 20 43 4F 4D 4D 41 4E 44 53 2E 0D 0D 63 |IPT COMMANDS...c|
00000470: 4F 4D 4D 41 4E 44 53 20 41 52 45 20 47 49 56 45 |OMMANDS ARE GIVE|
00000480: 4E 20 49 4E 20 55 50 50 45 52 43 41 53 45 2E 20 |N IN UPPERCASE. |
00000490: 20 68 4F 57 45 56 45 52 2C 20 54 48 45 20 41 43 | hOWEVER, THE AC|
000004A0: 54 55 41 4C 20 53 43 52 49 50 54 20 50 52 4F 47 |TUAL SCRIPT PROG|
000004B0: 52 41 4D 53 0D 53 48 4F 55 4C 44 20 48 41 56 45 |RAMS.SHOULD HAVE|
000004C0: 20 4C 4F 57 45 52 43 41 53 45 20 43 4F 4D 4D 41 | LOWERCASE COMMA|
000004D0: 4E 44 53 21 0D 0D 61 4E 59 20 41 52 47 55 4D 45 |NDS!..aNY ARGUME|
000004E0: 4E 54 53 20 54 48 41 54 20 47 4F 20 41 4C 4F 4E |NTS THAT GO ALON|
000004F0: 47 20 57 49 54 48 20 54 48 45 20 43 4F 4D 4D 41 |G WITH THE COMMA|
00000500: 4E 44 53 20 41 52 45 20 50 4C 41 43 45 44 20 4E |NDS ARE PLACED N|
00000510: 45 58 54 20 54 4F 20 54 48 45 4D 2E 0D 6E 55 4D |EXT TO THEM..nUM|
00000520: 45 52 49 43 20 41 52 47 55 4D 45 4E 54 53 20 41 |ERIC ARGUMENTS A|
00000530: 52 45 20 49 4E 20 42 52 41 43 4B 45 54 53 20 5B |RE IN BRACKETS [|
00000540: 20 5D 2C 20 41 4E 44 20 53 54 52 49 4E 47 20 41 | ], AND STRING A|
00000550: 52 47 55 4D 45 4E 54 53 20 41 52 45 20 49 4E 0D |RGUMENTS ARE IN.|
00000560: 51 55 4F 54 45 53 20 22 20 22 2E 20 20 6F 50 54 |QUOTES " ". oPT|
00000570: 49 4F 4E 41 4C 20 41 52 47 55 4D 45 4E 54 53 20 |IONAL ARGUMENTS |
00000580: 41 52 45 20 47 49 56 45 4E 20 49 4E 53 49 44 45 |ARE GIVEN INSIDE|
00000590: 20 47 52 45 41 54 45 52 2D 54 48 41 4E 20 41 4E | GREATER-THAN AN|
000005A0: 44 0D 4C 45 53 53 2D 54 48 41 4E 20 53 59 4D 42 |D.LESS-THAN SYMB|
000005B0: 4F 4C 53 2E 20 20 74 48 45 20 44 45 53 43 52 49 |OLS. tHE DESCRI|
000005C0: 50 54 49 4F 4E 20 4F 46 20 54 48 45 20 41 52 47 |PTION OF THE ARG|
000005D0: 55 4D 45 4E 54 20 49 53 20 49 4E 20 4C 4F 57 45 |UMENT IS IN LOWE|
000005E0: 52 43 41 53 45 2E 0D 0D 66 4F 52 20 43 4F 4D 4D |RCASE...fOR COMM|
000005F0: 41 4E 44 53 20 54 48 41 54 20 4C 4F 41 44 20 4D |ANDS THAT LOAD M|
00000600: 4F 44 55 4C 45 20 46 49 4C 45 53 2C 20 4F 4D 49 |ODULE FILES, OMI|
00000610: 54 20 54 48 45 20 50 52 45 46 49 58 20 46 52 4F |T THE PREFIX FRO|
00000620: 4D 20 54 48 45 20 46 49 4C 45 0D 4E 41 4D 45 2E |M THE FILE.NAME.|
00000630: 20 20 28 66 4F 52 20 45 58 41 4D 50 4C 45 2C 20 | (fOR EXAMPLE, |
00000640: 70 72 6F 74 22 78 6D 6F 64 65 6D 22 20 57 4F 55 |prot"xmodem" WOU|
00000650: 4C 44 20 57 4F 52 4B 2C 20 42 55 54 20 70 72 6F |LD WORK, BUT pro|
00000660: 74 22 70 72 74 2E 78 6D 6F 64 65 6D 22 0D 57 4F |t"prt.xmodem".WO|
00000670: 55 4C 44 20 4E 4F 54 2E 29 0D 0D 0D 61 73 63 20 |ULD NOT.)...asc |
00000680: 22 41 53 43 49 49 20 54 41 42 4C 45 22 0D 0D 20 |"ASCII TABLE".. |
00000690: 20 20 6C 4F 41 44 53 20 54 48 45 20 61 73 63 69 | lOADS THE asci|
000006A0: 69 20 54 52 41 4E 53 4C 41 54 49 4F 4E 20 54 41 |i TRANSLATION TA|
000006B0: 42 4C 45 20 57 49 54 48 20 54 48 45 20 47 49 56 |BLE WITH THE GIV|
000006C0: 45 4E 20 46 49 4C 45 20 4E 41 4D 45 2E 0D 0D 62 |EN FILE NAME...b|
000006D0: 61 75 64 20 5B 42 41 55 44 20 52 41 54 45 5D 0D |aud [BAUD RATE].|
000006E0: 0D 20 20 20 63 48 41 4E 47 45 53 20 54 48 45 20 |. cHANGES THE |
000006F0: 42 41 55 44 20 52 41 54 45 20 54 4F 20 54 48 45 |BAUD RATE TO THE|
00000700: 20 53 50 45 43 49 46 49 45 44 20 4E 55 4D 42 45 | SPECIFIED NUMBE|
00000710: 52 2E 20 20 69 46 20 54 48 45 20 42 41 55 44 20 |R. iF THE BAUD |
00000720: 52 41 54 45 0D 20 20 20 47 49 56 45 4E 20 49 53 |RATE. GIVEN IS|
00000730: 20 47 52 45 41 54 45 52 20 54 48 41 4E 20 54 48 | GREATER THAN TH|
00000740: 45 20 4D 41 58 49 4D 55 4D 20 42 41 55 44 20 52 |E MAXIMUM BAUD R|
00000750: 41 54 45 20 46 4F 52 20 54 48 45 20 4D 4F 44 45 |ATE FOR THE MODE|
00000760: 4D 2C 20 4E 4F 0D 20 20 20 43 48 41 4E 47 45 20 |M, NO. CHANGE |
00000770: 49 53 20 4D 41 44 45 2E 0D 0D 62 75 66 66 65 72 |IS MADE...buffer|
00000780: 20 43 4F 4D 4D 41 4E 44 20 3C 22 46 49 4C 45 4E | COMMAND <"FILEN|
00000790: 41 4D 45 22 3E 0D 0D 20 20 20 74 48 45 20 46 4F |AME">.. tHE FO|
000007A0: 4C 4C 4F 57 49 4E 47 20 43 4F 4D 4D 41 4E 44 53 |LLOWING COMMANDS|
000007B0: 20 41 52 45 20 41 56 41 49 4C 41 42 4C 45 20 57 | ARE AVAILABLE W|
000007C0: 49 54 48 20 62 75 66 66 65 72 3A 0D 0D 20 20 20 |ITH buffer:.. |
000007D0: 63 6C 65 61 72 20 2D 20 63 4C 45 41 52 53 20 41 |clear - cLEARS A|
000007E0: 4C 4C 20 46 49 4C 45 53 20 46 52 4F 4D 20 54 48 |LL FILES FROM TH|
000007F0: 45 20 42 55 46 46 45 52 2E 0D 0D 20 20 20 63 6C |E BUFFER... cl|
00000800: 6F 73 65 20 2D 20 63 4C 4F 53 45 53 20 41 20 43 |ose - cLOSES A C|
00000810: 41 50 54 55 52 45 20 46 49 4C 45 2E 0D 0D 20 20 |APTURE FILE... |
00000820: 20 6B 69 6C 6C 20 22 46 49 4C 45 4E 41 4D 45 22 | kill "FILENAME"|
00000830: 20 2D 20 64 45 4C 45 54 45 53 20 41 20 46 49 4C | - dELETES A FIL|
00000840: 45 20 46 52 4F 4D 20 54 48 45 20 42 55 46 46 45 |E FROM THE BUFFE|
00000850: 52 2E 0D 0D 20 20 20 6C 6F 61 64 20 22 46 49 4C |R... load "FIL|
00000860: 45 4E 41 4D 45 22 20 2D 20 6C 4F 41 44 53 20 41 |ENAME" - lOADS A|
00000870: 20 46 49 4C 45 20 46 52 4F 4D 20 44 49 53 4B 20 | FILE FROM DISK |
00000880: 49 4E 54 4F 20 54 48 45 20 42 55 46 46 45 52 2E |INTO THE BUFFER.|
00000890: 0D 0D 20 20 20 6F 70 65 6E 20 22 46 49 4C 45 4E |.. open "FILEN|
000008A0: 41 4D 45 22 20 2D 20 6F 50 45 4E 53 20 41 20 43 |AME" - oPENS A C|
000008B0: 41 50 54 55 52 45 20 46 49 4C 45 2E 0D 0D 20 20 |APTURE FILE... |
000008C0: 20 70 72 69 6E 74 20 22 46 49 4C 45 4E 41 4D 45 | print "FILENAME|
000008D0: 22 20 2D 20 73 45 4E 44 53 20 41 20 42 55 46 46 |" - sENDS A BUFF|
000008E0: 45 52 20 46 49 4C 45 20 54 4F 20 54 48 45 20 50 |ER FILE TO THE P|
000008F0: 52 49 4E 54 45 52 2E 0D 0D 20 20 20 73 61 76 65 |RINTER... save|
00000900: 20 22 46 49 4C 45 4E 41 4D 45 22 20 2D 20 73 41 | "FILENAME" - sA|
00000910: 56 45 53 20 41 20 46 49 4C 45 20 46 52 4F 4D 20 |VES A FILE FROM |
00000920: 54 48 45 20 42 55 46 46 45 52 20 54 4F 20 44 49 |THE BUFFER TO DI|
00000930: 53 4B 2E 0D 0D 20 20 20 73 65 6E 64 20 22 46 49 |SK... send "FI|
00000940: 4C 45 4E 41 4D 45 22 20 2D 20 73 45 4E 44 53 20 |LENAME" - sENDS |
00000950: 41 20 46 49 4C 45 20 46 52 4F 4D 20 54 48 45 20 |A FILE FROM THE |
00000960: 42 55 46 46 45 52 20 54 4F 20 54 48 45 20 4D 4F |BUFFER TO THE MO|
00000970: 44 45 4D 2E 0D 0D 63 68 65 63 6B 20 5B 53 54 52 |DEM...check [STR|
00000980: 49 4E 47 20 4E 55 4D 42 45 52 5D 20 22 53 54 52 |ING NUMBER] "STR|
00000990: 49 4E 47 22 0D 0D 20 20 20 77 4F 52 4B 53 20 49 |ING".. wORKS I|
000009A0: 4E 20 43 4F 4E 4A 55 4E 43 54 49 4F 4E 20 57 49 |N CONJUNCTION WI|
000009B0: 54 48 20 54 48 45 20 77 61 69 74 20 43 4F 4D 4D |TH THE wait COMM|
000009C0: 41 4E 44 20 54 4F 20 44 45 54 45 43 54 20 49 4E |AND TO DETECT IN|
000009D0: 43 4F 4D 49 4E 47 0D 20 20 20 53 54 52 49 4E 47 |COMING. STRING|
000009E0: 53 2E 20 20 66 4F 52 20 45 58 41 4D 50 4C 45 2C |S. fOR EXAMPLE,|
000009F0: 0D 0D 20 20 20 63 68 65 63 6B 20 32 20 22 70 41 |.. check 2 "pA|
00000A00: 53 53 57 4F 52 44 22 0D 0D 20 20 20 44 45 46 49 |SSWORD".. DEFI|
00000A10: 4E 45 53 20 53 54 52 49 4E 47 20 4E 55 4D 42 45 |NES STRING NUMBE|
00000A20: 52 20 32 20 41 53 20 22 70 41 53 53 57 4F 52 44 |R 2 AS "pASSWORD|
00000A30: 22 2E 20 20 75 50 20 54 4F 20 36 20 53 54 52 49 |". uP TO 6 STRI|
00000A40: 4E 47 53 20 4D 41 59 20 42 45 0D 20 20 20 44 45 |NGS MAY BE. DE|
00000A50: 46 49 4E 45 44 2E 20 20 77 48 45 4E 20 54 48 45 |FINED. wHEN THE|
00000A60: 20 53 43 52 49 50 54 20 45 4E 43 4F 55 4E 54 45 | SCRIPT ENCOUNTE|
00000A70: 52 53 20 41 20 77 61 69 74 20 43 4F 4D 4D 41 4E |RS A wait COMMAN|
00000A80: 44 2C 20 49 54 20 47 4F 45 53 20 54 4F 0D 20 20 |D, IT GOES TO. |
00000A90: 20 54 45 52 4D 49 4E 41 4C 20 4D 4F 44 45 20 41 | TERMINAL MODE A|
00000AA0: 4E 44 20 57 41 49 54 20 55 4E 54 49 4C 20 4F 4E |ND WAIT UNTIL ON|
00000AB0: 45 20 4F 46 20 54 48 45 53 45 20 44 45 46 49 4E |E OF THESE DEFIN|
00000AC0: 45 44 20 53 54 52 49 4E 47 53 20 49 53 0D 20 20 |ED STRINGS IS. |
00000AD0: 20 52 45 43 45 49 56 45 44 2C 20 41 4E 44 20 54 | RECEIVED, AND T|
00000AE0: 48 45 4E 20 49 54 20 52 45 54 55 52 4E 53 20 54 |HEN IT RETURNS T|
00000AF0: 48 45 20 52 45 43 45 49 56 45 44 20 53 54 52 49 |HE RECEIVED STRI|
00000B00: 4E 47 20 4E 55 4D 42 45 52 2E 20 20 74 48 45 0D |NG NUMBER. tHE.|
00000B10: 20 20 20 63 68 65 63 6B 20 43 4F 4D 4D 41 4E 44 | check COMMAND|
00000B20: 20 44 4F 45 53 20 4E 4F 54 20 57 41 49 54 2E 0D | DOES NOT WAIT..|
00000B30: 0D 64 69 61 6C 20 22 45 4E 54 52 59 20 4E 41 4D |.dial "ENTRY NAM|
00000B40: 45 22 0D 0D 20 20 20 64 49 41 4C 53 20 54 48 45 |E".. dIALS THE|
00000B50: 20 45 4E 54 52 59 20 57 49 54 48 20 54 48 45 20 | ENTRY WITH THE |
00000B60: 47 49 56 45 4E 20 4E 41 4D 45 2E 20 20 74 48 45 |GIVEN NAME. tHE|
00000B70: 20 41 55 54 4F 44 49 41 4C 45 52 20 4B 45 45 50 | AUTODIALER KEEP|
00000B80: 53 0D 20 20 20 52 45 44 49 41 4C 49 4E 47 20 55 |S. REDIALING U|
00000B90: 4E 54 49 4C 20 45 49 54 48 45 52 20 41 20 43 41 |NTIL EITHER A CA|
00000BA0: 52 52 49 45 52 20 49 53 20 46 4F 55 4E 44 20 4F |RRIER IS FOUND O|
00000BB0: 52 20 54 48 45 20 52 45 44 49 41 4C 20 43 4F 55 |R THE REDIAL COU|
00000BC0: 4E 54 20 49 53 0D 20 20 20 45 58 48 41 55 53 54 |NT IS. EXHAUST|
00000BD0: 45 44 20 28 53 45 45 20 72 65 64 69 61 6C 29 2E |ED (SEE redial).|
00000BE0: 0D 0D 64 69 61 6C 23 20 22 50 48 4F 4E 45 20 4E |..dial# "PHONE N|
00000BF0: 55 4D 42 45 52 22 0D 0D 20 20 20 64 49 41 4C 53 |UMBER".. dIALS|
00000C00: 20 54 48 45 20 50 48 4F 4E 45 20 4E 55 4D 42 45 | THE PHONE NUMBE|
00000C10: 52 20 53 50 45 43 49 46 49 45 44 2E 0D 0D 64 69 |R SPECIFIED...di|
00000C20: 61 6C 6E 20 5B 4C 4F 43 41 54 49 4F 4E 20 49 4E |aln [LOCATION IN|
00000C30: 20 50 48 4F 4E 45 20 4C 49 53 54 5D 0D 0D 20 20 | PHONE LIST].. |
00000C40: 20 64 49 41 4C 53 20 54 48 45 20 45 4E 54 52 59 | dIALS THE ENTRY|
00000C50: 20 49 4E 20 54 48 45 20 50 48 4F 4E 45 20 4C 49 | IN THE PHONE LI|
00000C60: 53 54 20 43 4F 52 52 45 53 50 4F 4E 44 49 4E 47 |ST CORRESPONDING|
00000C70: 20 54 4F 20 54 48 45 20 53 50 45 43 49 46 49 45 | TO THE SPECIFIE|
00000C80: 44 0D 20 20 20 4E 55 4D 42 45 52 2E 20 20 74 48 |D. NUMBER. tH|
00000C90: 45 20 4E 55 4D 42 45 52 53 20 44 4F 4E 27 54 20 |E NUMBERS DON'T |
00000CA0: 53 48 4F 57 20 55 50 20 4F 4E 20 54 48 45 20 41 |SHOW UP ON THE A|
00000CB0: 55 54 4F 44 49 41 4C 20 4D 45 4E 55 2C 20 42 55 |UTODIAL MENU, BU|
00000CC0: 54 2C 20 46 4F 52 0D 20 20 20 45 58 41 4D 50 4C |T, FOR. EXAMPL|
00000CD0: 45 2C 20 64 69 61 6C 6E 20 33 20 57 4F 55 4C 44 |E, dialn 3 WOULD|
00000CE0: 20 44 49 41 4C 20 54 48 45 20 54 48 49 52 44 20 | DIAL THE THIRD |
00000CF0: 45 4E 54 52 59 20 46 52 4F 4D 20 54 48 45 20 54 |ENTRY FROM THE T|
00000D00: 4F 50 2E 0D 0D 64 69 73 6B 20 5B 44 45 56 49 43 |OP...disk [DEVIC|
00000D10: 45 20 4E 55 4D 42 45 52 5D 0D 0D 20 20 20 63 48 |E NUMBER].. cH|
00000D20: 41 4E 47 45 53 20 54 48 45 20 44 49 53 4B 20 44 |ANGES THE DISK D|
00000D30: 45 56 49 43 45 20 44 45 46 41 55 4C 54 20 54 4F |EVICE DEFAULT TO|
00000D40: 20 54 48 45 20 53 50 45 43 49 46 49 45 44 20 44 | THE SPECIFIED D|
00000D50: 45 56 49 43 45 20 4E 55 4D 42 45 52 2E 20 69 46 |EVICE NUMBER. iF|
00000D60: 0D 20 20 20 54 48 45 20 44 45 56 49 43 45 20 49 |. THE DEVICE I|
00000D70: 53 20 4E 4F 54 20 50 52 45 53 45 4E 54 2C 20 54 |S NOT PRESENT, T|
00000D80: 48 45 20 53 43 52 49 50 54 20 48 41 4C 54 53 20 |HE SCRIPT HALTS |
00000D90: 57 49 54 48 20 41 4E 20 45 52 52 4F 52 2E 0D 0D |WITH AN ERROR...|
00000DA0: 64 69 73 6B 63 20 22 44 49 53 4B 20 43 4F 4D 4D |diskc "DISK COMM|
00000DB0: 41 4E 44 22 0D 0D 20 20 20 73 45 4E 44 53 20 54 |AND".. sENDS T|
00000DC0: 48 45 20 53 50 45 43 49 46 49 45 44 20 44 49 53 |HE SPECIFIED DIS|
00000DD0: 4B 20 43 4F 4D 4D 41 4E 44 20 54 4F 20 54 48 45 |K COMMAND TO THE|
00000DE0: 20 43 55 52 52 45 4E 54 20 44 49 53 4B 20 44 45 | CURRENT DISK DE|
00000DF0: 56 49 43 45 2E 20 20 74 48 45 0D 20 20 20 45 58 |VICE. tHE. EX|
00000E00: 54 52 41 20 44 49 53 4B 20 43 4F 4D 4D 41 4E 44 |TRA DISK COMMAND|
00000E10: 53 20 41 44 44 45 44 20 42 59 20 6E 4F 56 41 54 |S ADDED BY nOVAT|
00000E20: 45 52 4D 20 41 52 45 20 41 4C 53 4F 20 56 41 4C |ERM ARE ALSO VAL|
00000E30: 49 44 2E 0D 0D 64 6F 77 6E 6C 6F 61 64 20 22 46 |ID...download "F|
00000E40: 49 4C 45 4E 41 4D 45 2C 54 59 50 45 22 0D 0D 20 |ILENAME,TYPE".. |
00000E50: 20 20 64 4F 57 4E 4C 4F 41 44 53 20 54 48 45 20 | dOWNLOADS THE |
00000E60: 53 50 45 43 49 46 49 45 44 20 46 49 4C 45 20 55 |SPECIFIED FILE U|
00000E70: 53 49 4E 47 20 54 48 45 20 50 52 4F 54 4F 43 4F |SING THE PROTOCO|
00000E80: 4C 20 49 4E 20 4D 45 4D 4F 52 59 2E 20 20 74 48 |L IN MEMORY. tH|
00000E90: 45 0D 20 20 20 4F 4E 45 2D 4C 45 54 54 45 52 20 |E. ONE-LETTER |
00000EA0: 54 59 50 45 20 53 50 45 43 49 46 49 43 41 54 49 |TYPE SPECIFICATI|
00000EB0: 4F 4E 20 49 53 20 4F 50 54 49 4F 4E 41 4C 2E 20 |ON IS OPTIONAL. |
00000EC0: 20 69 46 20 55 53 45 44 2C 20 49 54 20 4D 55 53 | iF USED, IT MUS|
00000ED0: 54 20 42 45 0D 20 20 20 45 49 54 48 45 52 20 41 |T BE. EITHER A|
00000EE0: 20 22 50 22 2C 20 22 53 22 2C 20 4F 52 20 22 55 | "P", "S", OR "U|
00000EF0: 22 20 46 4F 52 20 50 52 47 2C 20 53 45 51 2C 20 |" FOR PRG, SEQ, |
00000F00: 4F 52 20 55 53 52 20 46 49 4C 45 20 54 59 50 45 |OR USR FILE TYPE|
00000F10: 53 2C 0D 20 20 20 52 45 53 50 45 43 54 49 56 45 |S,. RESPECTIVE|
00000F20: 4C 59 2E 20 20 66 4F 52 20 42 41 54 43 48 20 50 |LY. fOR BATCH P|
00000F30: 52 4F 54 4F 43 4F 4C 53 2C 20 54 48 45 20 46 49 |ROTOCOLS, THE FI|
00000F40: 4C 45 20 4E 41 4D 45 20 53 50 45 43 49 46 49 45 |LE NAME SPECIFIE|
00000F50: 44 20 48 45 52 45 20 49 53 0D 20 20 20 49 47 4E |D HERE IS. IGN|
00000F60: 4F 52 45 44 2E 0D 0D 64 72 69 76 65 20 5B 44 52 |ORED...drive [DR|
00000F70: 49 56 45 20 4E 55 4D 42 45 52 5D 0D 0D 20 20 20 |IVE NUMBER].. |
00000F80: 63 48 41 4E 47 45 53 20 54 48 45 20 44 45 46 41 |cHANGES THE DEFA|
00000F90: 55 4C 54 20 44 52 49 56 45 20 4E 55 4D 42 45 52 |ULT DRIVE NUMBER|
00000FA0: 20 28 4E 4F 54 20 44 45 56 49 43 45 20 4E 55 4D | (NOT DEVICE NUM|
00000FB0: 42 45 52 29 2E 0D 0D 65 6E 64 0D 0D 20 20 20 74 |BER)...end.. t|
00000FC0: 45 52 4D 49 4E 41 54 45 53 20 54 48 45 20 53 43 |ERMINATES THE SC|
00000FD0: 52 49 50 54 20 50 52 4F 47 52 41 4D 2E 0D 0D 66 |RIPT PROGRAM...f|
00000FE0: 6F 6E 74 20 22 46 4F 4E 54 20 46 49 4C 45 22 0D |ont "FONT FILE".|
00000FF0: 0D 20 20 20 6C 4F 41 44 53 20 41 20 46 4F 4E 54 |. lOADS A FONT|
00001000: 20 46 52 4F 4D 20 44 49 53 4B 2E 0D 0D 66 6F 6E | FROM DISK...fon|
00001010: 74 38 30 20 22 46 4F 4E 54 20 46 49 4C 45 22 0D |t80 "FONT FILE".|
00001020: 0D 20 20 20 6C 4F 41 44 53 20 41 4E 20 38 30 20 |. lOADS AN 80 |
00001030: 43 4F 4C 55 4D 4E 20 46 4F 4E 54 20 46 52 4F 4D |COLUMN FONT FROM|
00001040: 20 44 49 53 4B 2E 0D 0D 67 65 74 74 69 6D 65 0D | DISK...gettime.|
00001050: 0D 20 20 20 72 45 51 55 45 53 54 53 20 54 48 45 |. rEQUESTS THE|
00001060: 20 55 53 45 52 20 54 4F 20 49 4E 50 55 54 20 54 | USER TO INPUT T|
00001070: 48 45 20 43 55 52 52 45 4E 54 20 54 49 4D 45 2E |HE CURRENT TIME.|
00001080: 20 20 69 46 20 59 4F 55 52 20 53 43 52 49 50 54 | iF YOUR SCRIPT|
00001090: 0D 20 20 20 50 52 4F 47 52 41 4D 20 55 53 45 53 |. PROGRAM USES|
000010A0: 20 54 48 45 20 75 6E 74 69 6C 20 43 4F 4D 4D 41 | THE until COMMA|
000010B0: 4E 44 20 54 4F 20 57 41 49 54 20 46 4F 52 20 41 |ND TO WAIT FOR A|
000010C0: 20 43 45 52 54 41 49 4E 20 54 49 4D 45 20 4F 46 | CERTAIN TIME OF|
000010D0: 20 44 41 59 2C 0D 20 20 20 59 4F 55 20 53 48 4F | DAY,. YOU SHO|
000010E0: 55 4C 44 20 49 4E 43 4C 55 44 45 20 54 48 49 53 |ULD INCLUDE THIS|
000010F0: 20 43 4F 4D 4D 41 4E 44 20 41 54 20 54 48 45 20 | COMMAND AT THE |
00001100: 53 54 41 52 54 20 4F 46 20 59 4F 55 52 20 50 52 |START OF YOUR PR|
00001110: 4F 47 52 41 4D 20 53 4F 0D 20 20 20 54 48 41 54 |OGRAM SO. THAT|
00001120: 20 59 4F 55 20 4D 41 59 20 53 45 54 20 54 48 45 | YOU MAY SET THE|
00001130: 20 43 4C 4F 43 4B 2E 0D 0D 67 6F 34 30 0D 0D 20 | CLOCK...go40.. |
00001140: 20 20 63 48 41 4E 47 45 53 20 54 4F 20 34 30 20 | cHANGES TO 40 |
00001150: 43 4F 4C 55 4D 4E 20 4D 4F 44 45 2C 20 49 46 20 |COLUMN MODE, IF |
00001160: 54 48 45 20 54 45 52 4D 49 4E 41 4C 20 45 4D 55 |THE TERMINAL EMU|
00001170: 4C 41 54 4F 52 20 41 4C 4C 4F 57 53 20 49 54 2E |LATOR ALLOWS IT.|
00001180: 0D 0D 67 6F 38 30 0D 0D 20 20 20 63 48 41 4E 47 |..go80.. cHANG|
00001190: 45 53 20 54 4F 20 38 30 20 43 4F 4C 55 4D 4E 20 |ES TO 80 COLUMN |
000011A0: 4D 4F 44 45 2E 0D 0D 68 61 6E 67 75 70 0D 0D 20 |MODE...hangup.. |
000011B0: 20 20 68 41 4E 47 53 20 55 50 20 54 48 45 20 50 | hANGS UP THE P|
000011C0: 48 4F 4E 45 2E 0D 0D 69 66 20 3C 6E 6F 3E 20 43 |HONE...if <no> C|
000011D0: 4F 4E 44 49 54 49 4F 4E 20 74 68 65 6E 20 43 4F |ONDITION then CO|
000011E0: 4D 4D 41 4E 44 0D 0D 20 20 20 75 53 45 44 20 54 |MMAND.. uSED T|
000011F0: 4F 20 54 45 53 54 20 56 41 52 49 4F 55 53 20 43 |O TEST VARIOUS C|
00001200: 4F 4E 44 49 54 49 4F 4E 53 2E 20 20 61 4E 59 20 |ONDITIONS. aNY |
00001210: 4F 4E 45 20 4F 46 20 54 48 45 20 43 4F 4E 44 49 |ONE OF THE CONDI|
00001220: 54 49 4F 4E 53 20 42 45 4C 4F 57 0D 20 20 20 4D |TIONS BELOW. M|
00001230: 41 59 20 42 45 20 53 55 42 53 54 49 54 55 54 45 |AY BE SUBSTITUTE|
00001240: 44 20 49 4E 54 4F 20 54 48 45 20 43 4F 4D 4D 41 |D INTO THE COMMA|
00001250: 4E 44 2C 20 41 4E 44 20 49 46 20 54 48 45 20 43 |ND, AND IF THE C|
00001260: 4F 4E 44 49 54 49 4F 4E 20 49 53 20 54 52 55 45 |ONDITION IS TRUE|
00001270: 2C 0D 20 20 20 54 48 45 20 43 4F 4D 4D 41 4E 44 |,. THE COMMAND|
00001280: 20 41 46 54 45 52 20 74 68 65 6E 20 49 53 20 45 | AFTER then IS E|
00001290: 58 45 43 55 54 45 44 2E 20 20 61 4E 59 20 43 4F |XECUTED. aNY CO|
000012A0: 4D 4D 41 4E 44 20 4D 41 59 20 42 45 20 50 55 54 |MMAND MAY BE PUT|
000012B0: 20 41 46 54 45 52 0D 20 20 20 74 68 65 6E 2E 0D | AFTER. then..|
000012C0: 0D 20 20 20 63 61 72 72 69 65 72 20 2D 20 63 48 |. carrier - cH|
000012D0: 45 43 4B 53 20 46 4F 52 20 41 20 43 41 52 52 49 |ECKS FOR A CARRI|
000012E0: 45 52 2E 20 20 69 46 20 6E 6F 20 49 53 20 49 4E |ER. iF no IS IN|
000012F0: 20 46 52 4F 4E 54 20 4F 46 20 49 54 2C 20 54 48 | FRONT OF IT, TH|
00001300: 45 0D 20 20 20 43 4F 4D 4D 41 4E 44 20 45 58 45 |E. COMMAND EXE|
00001310: 43 55 54 45 53 20 49 4E 20 54 48 45 20 41 42 53 |CUTES IN THE ABS|
00001320: 45 4E 43 45 20 4F 46 20 41 20 43 41 52 52 49 45 |ENCE OF A CARRIE|
00001330: 52 2E 0D 0D 20 20 20 63 68 65 63 6B 20 5B 43 48 |R... check [CH|
00001340: 45 43 4B 20 53 54 52 49 4E 47 5D 20 2D 20 63 48 |ECK STRING] - cH|
00001350: 45 43 4B 53 20 54 4F 20 53 45 45 20 49 46 20 54 |ECKS TO SEE IF T|
00001360: 48 45 20 53 50 45 43 49 46 49 45 44 20 53 54 52 |HE SPECIFIED STR|
00001370: 49 4E 47 20 4E 55 4D 42 45 52 0D 20 20 20 57 41 |ING NUMBER. WA|
00001380: 53 20 52 45 43 45 49 56 45 44 2E 20 20 74 48 45 |S RECEIVED. tHE|
00001390: 52 45 20 4D 55 53 54 20 42 45 20 41 20 4E 55 4D |RE MUST BE A NUM|
000013A0: 42 45 52 20 41 46 54 45 52 20 63 68 65 63 6B 2C |BER AFTER check,|
000013B0: 20 4F 52 20 54 48 45 20 43 4F 4D 4D 41 4E 44 0D | OR THE COMMAND.|
000013C0: 20 20 20 49 53 20 49 4E 56 41 4C 49 44 2E 0D 0D | IS INVALID...|
000013D0: 20 20 20 72 65 63 65 69 76 65 20 2D 20 63 48 45 | receive - cHE|
000013E0: 43 4B 53 20 54 4F 20 53 45 45 20 49 46 20 44 41 |CKS TO SEE IF DA|
000013F0: 54 41 20 49 53 20 42 45 49 4E 47 20 52 45 43 45 |TA IS BEING RECE|
00001400: 49 56 45 44 2E 20 20 69 46 20 6E 6F 20 50 52 45 |IVED. iF no PRE|
00001410: 43 45 44 45 53 0D 20 20 20 49 54 2C 20 54 48 45 |CEDES. IT, THE|
00001420: 20 43 4F 4D 4D 41 4E 44 20 45 58 45 43 55 54 45 | COMMAND EXECUTE|
00001430: 53 20 57 48 45 4E 20 44 41 54 41 20 49 53 20 4E |S WHEN DATA IS N|
00001440: 4F 54 20 42 45 49 4E 47 20 52 45 43 45 49 56 45 |OT BEING RECEIVE|
00001450: 44 2E 0D 0D 20 20 20 72 69 6E 67 20 2D 20 63 48 |D... ring - cH|
00001460: 45 43 4B 53 20 54 4F 20 53 45 45 20 49 46 20 54 |ECKS TO SEE IF T|
00001470: 48 45 20 50 48 4F 4E 45 20 49 53 20 52 49 4E 47 |HE PHONE IS RING|
00001480: 49 4E 47 2E 20 20 69 46 20 6E 6F 20 50 52 45 43 |ING. iF no PREC|
00001490: 45 44 45 53 20 49 54 2C 0D 20 20 20 54 48 45 20 |EDES IT,. THE |
000014A0: 43 4F 4D 4D 41 4E 44 20 45 58 45 43 55 54 45 53 |COMMAND EXECUTES|
000014B0: 20 57 48 45 4E 20 54 48 45 20 50 48 4F 4E 45 20 | WHEN THE PHONE |
000014C0: 49 53 4E 27 54 20 52 49 4E 47 49 4E 47 2E 0D 0D |ISN'T RINGING...|
000014D0: 6A 75 6D 70 20 4C 41 42 45 4C 0D 0D 20 20 20 6A |jump LABEL.. j|
000014E0: 55 4D 50 53 20 54 4F 20 54 48 45 20 53 50 45 43 |UMPS TO THE SPEC|
000014F0: 49 46 49 45 44 20 4C 41 42 45 4C 20 49 4E 20 54 |IFIED LABEL IN T|
00001500: 48 45 20 50 52 4F 47 52 41 4D 2E 20 20 6C 41 42 |HE PROGRAM. lAB|
00001510: 45 4C 53 20 41 52 45 0D 20 20 20 4E 4F 4E 2D 43 |ELS ARE. NON-C|
00001520: 4F 4D 4D 41 4E 44 20 57 4F 52 44 53 20 57 48 49 |OMMAND WORDS WHI|
00001530: 43 48 20 41 52 45 20 50 4C 41 43 45 44 20 42 45 |CH ARE PLACED BE|
00001540: 46 4F 52 45 20 43 4F 4D 4D 41 4E 44 53 20 54 4F |FORE COMMANDS TO|
00001550: 20 49 44 45 4E 54 49 46 59 20 41 0D 20 20 20 4C | IDENTIFY A. L|
00001560: 4F 43 41 54 49 4F 4E 20 49 4E 20 54 48 45 20 50 |OCATION IN THE P|
00001570: 52 4F 47 52 41 4D 2E 20 20 66 4F 52 20 45 58 41 |ROGRAM. fOR EXA|
00001580: 4D 50 4C 45 3A 0D 0D 20 20 20 20 4C 4F 4F 50 20 |MPLE:.. LOOP |
00001590: 63 68 65 63 6B 20 31 20 22 75 53 45 52 4E 41 4D |check 1 "uSERNAM|
000015A0: 45 3A 22 0D 20 20 20 20 2E 0D 20 20 20 20 2E 0D |E:". .. ..|
000015B0: 20 20 20 20 6A 75 6D 70 20 4C 4F 4F 50 0D 0D 20 | jump LOOP.. |
000015C0: 20 20 6C 41 42 45 4C 53 20 4D 41 59 20 43 4F 4E | lABELS MAY CON|
000015D0: 54 41 49 4E 20 41 4E 59 20 43 48 41 52 41 43 54 |TAIN ANY CHARACT|
000015E0: 45 52 53 20 4F 54 48 45 52 20 54 48 41 4E 20 51 |ERS OTHER THAN Q|
000015F0: 55 4F 54 45 53 2C 20 42 55 54 20 41 20 4C 41 42 |UOTES, BUT A LAB|
00001600: 45 4C 0D 20 20 20 4D 41 59 20 4F 4E 4C 59 20 42 |EL. MAY ONLY B|
00001610: 45 20 4F 4E 45 20 57 4F 52 44 2E 0D 0D 20 20 20 |E ONE WORD... |
00001620: 69 46 20 54 48 45 20 53 43 52 49 50 54 20 49 53 |iF THE SCRIPT IS|
00001630: 20 45 4E 54 45 52 45 44 20 49 4E 20 54 48 45 20 | ENTERED IN THE |
00001640: 46 4F 52 4D 20 4F 46 20 41 20 50 52 4F 47 52 41 |FORM OF A PROGRA|
00001650: 4D 20 46 49 4C 45 20 28 52 41 54 48 45 52 20 54 |M FILE (RATHER T|
00001660: 48 41 4E 0D 20 20 20 41 20 53 45 51 55 45 4E 54 |HAN. A SEQUENT|
00001670: 49 41 4C 20 46 49 4C 45 29 2C 20 41 4E 20 41 43 |IAL FILE), AN AC|
00001680: 54 55 41 4C 20 4C 49 4E 45 20 4E 55 4D 42 45 52 |TUAL LINE NUMBER|
00001690: 20 4D 41 59 20 42 45 20 55 53 45 44 20 57 49 54 | MAY BE USED WIT|
000016A0: 48 20 54 48 45 20 6A 75 6D 70 0D 20 20 20 43 4F |H THE jump. CO|
000016B0: 4D 4D 41 4E 44 2E 20 20 66 4F 52 20 45 58 41 4D |MMAND. fOR EXAM|
000016C0: 50 4C 45 3A 0D 0D 20 20 20 20 31 30 20 63 68 65 |PLE:.. 10 che|
000016D0: 63 6B 20 31 20 22 75 53 45 52 4E 41 4D 45 3A 22 |ck 1 "uSERNAME:"|
000016E0: 0D 20 20 20 20 32 30 20 2E 2E 2E 0D 20 20 20 20 |. 20 .... |
000016F0: 33 30 20 2E 2E 2E 0D 20 20 20 20 34 30 20 6A 75 |30 .... 40 ju|
00001700: 6D 70 20 31 30 0D 0D 20 20 20 2E 2E 2E 4F 52 3A |mp 10.. ...OR:|
00001710: 0D 0D 20 20 20 20 31 30 30 20 69 66 20 6E 6F 20 |.. 100 if no |
00001720: 63 61 72 72 69 65 72 20 74 68 65 6E 20 6A 75 6D |carrier then jum|
00001730: 70 20 31 30 30 0D 0D 6C 69 6E 6B 20 22 53 43 52 |p 100..link "SCR|
00001740: 49 50 54 20 50 52 4F 47 52 41 4D 22 0D 0D 20 20 |IPT PROGRAM".. |
00001750: 20 6C 4F 41 44 53 20 41 4E 44 20 45 58 45 43 55 | lOADS AND EXECU|
00001760: 54 45 53 20 41 20 4E 45 57 20 53 43 52 49 50 54 |TES A NEW SCRIPT|
00001770: 20 50 52 4F 47 52 41 4D 2E 0D 0D 6D 61 63 72 6F | PROGRAM...macro|
00001780: 20 5B 46 55 4E 43 54 49 4F 4E 20 4B 45 59 20 4E | [FUNCTION KEY N|
00001790: 55 4D 42 45 52 5D 0D 0D 20 20 20 73 45 4E 44 53 |UMBER].. sENDS|
000017A0: 20 41 20 46 55 4E 43 54 49 4F 4E 20 4B 45 59 20 | A FUNCTION KEY |
000017B0: 53 54 52 49 4E 47 2E 20 20 74 48 49 53 20 49 53 |STRING. tHIS IS|
000017C0: 20 45 51 55 49 56 41 4C 45 4E 54 20 54 4F 20 50 | EQUIVALENT TO P|
000017D0: 52 45 53 53 49 4E 47 20 4F 4E 45 20 4F 46 0D 20 |RESSING ONE OF. |
000017E0: 20 20 54 48 45 20 31 36 20 46 55 4E 43 54 49 4F | THE 16 FUNCTIO|
000017F0: 4E 20 4B 45 59 53 2E 0D 0D 6D 69 6E 69 74 0D 0D |N KEYS...minit..|
00001800: 20 20 20 69 4E 49 54 49 41 4C 49 5A 45 53 20 54 | iNITIALIZES T|
00001810: 48 45 20 4D 4F 44 45 4D 20 49 46 20 4E 4F 20 43 |HE MODEM IF NO C|
00001820: 41 52 52 49 45 52 20 49 53 20 50 52 45 53 45 4E |ARRIER IS PRESEN|
00001830: 54 2E 0D 0D 6D 6F 64 65 6D 20 22 4D 4F 44 45 4D |T...modem "MODEM|
00001840: 20 44 52 49 56 45 52 22 0D 0D 20 20 20 6C 4F 41 | DRIVER".. lOA|
00001850: 44 53 20 41 20 4D 4F 44 45 4D 20 44 52 49 56 45 |DS A MODEM DRIVE|
00001860: 52 2E 0D 0D 6F 66 66 68 6F 6F 6B 0D 0D 20 20 20 |R...offhook.. |
00001870: 74 41 4B 45 53 20 54 48 45 20 50 48 4F 4E 45 20 |tAKES THE PHONE |
00001880: 4F 46 46 20 54 48 45 20 48 4F 4F 4B 2E 0D 0D 2E |OFF THE HOOK....|
00001890: 6F 70 74 20 50 41 52 41 4D 45 54 45 52 0D 0D 20 |opt PARAMETER.. |
000018A0: 20 20 63 48 41 4E 47 45 53 20 41 20 43 4F 4D 50 | cHANGES A COMP|
000018B0: 49 4C 45 52 20 4F 50 54 49 4F 4E 2E 20 20 74 48 |ILER OPTION. tH|
000018C0: 45 53 45 20 43 4F 4D 4D 41 4E 44 53 20 41 52 45 |ESE COMMANDS ARE|
000018D0: 20 4E 4F 54 20 49 4E 43 4C 55 44 45 44 20 49 4E | NOT INCLUDED IN|
000018E0: 20 54 48 45 0D 20 20 20 50 52 4F 47 52 41 4D 20 | THE. PROGRAM |
000018F0: 57 48 45 4E 20 49 54 20 49 53 20 43 4F 4D 50 49 |WHEN IT IS COMPI|
00001900: 4C 45 44 2E 20 20 69 4E 53 54 45 41 44 2C 20 54 |LED. iNSTEAD, T|
00001910: 48 45 59 20 44 49 52 45 43 54 20 54 48 45 20 43 |HEY DIRECT THE C|
00001920: 4F 4D 50 49 4C 45 52 20 54 4F 0D 20 20 20 54 41 |OMPILER TO. TA|
00001930: 4B 45 20 43 45 52 54 41 49 4E 20 41 43 54 49 4F |KE CERTAIN ACTIO|
00001940: 4E 53 20 4F 52 20 53 45 54 20 46 4C 41 47 53 2E |NS OR SET FLAGS.|
00001950: 20 20 74 48 45 20 4F 4E 4C 59 20 50 41 52 41 4D | tHE ONLY PARAM|
00001960: 45 54 45 52 53 20 43 55 52 52 45 4E 54 4C 59 0D |ETERS CURRENTLY.|
00001970: 20 20 20 53 55 50 50 4F 52 54 45 44 20 41 52 45 | SUPPORTED ARE|
00001980: 3A 0D 0D 20 20 20 2E 4F 50 54 20 41 4E 53 49 20 |:.. .OPT ANSI |
00001990: 20 20 3A 20 63 4F 4E 56 45 52 54 53 20 55 50 50 | : cONVERTS UPP|
000019A0: 45 52 43 41 53 45 20 43 48 41 52 41 43 54 45 52 |ERCASE CHARACTER|
000019B0: 53 20 49 4E 20 41 4C 4C 20 46 4F 4C 4C 4F 57 49 |S IN ALL FOLLOWI|
000019C0: 4E 47 20 63 68 65 63 6B 0D 20 20 20 20 20 20 20 |NG check. |
000019D0: 20 20 20 20 20 20 20 20 20 20 53 54 52 49 4E 47 | STRING|
000019E0: 53 20 54 4F 20 55 50 50 45 52 43 41 53 45 20 43 |S TO UPPERCASE C|
000019F0: 48 41 52 41 43 54 45 52 53 20 57 49 54 48 20 4C |HARACTERS WITH L|
00001A00: 4F 57 45 52 20 61 73 63 69 69 0D 20 20 20 20 20 |OWER ascii. |
00001A10: 20 20 20 20 20 20 20 20 20 20 20 20 56 41 4C 55 | VALU|
00001A20: 45 53 2E 20 20 74 48 49 53 20 43 4F 4D 4D 41 4E |ES. tHIS COMMAN|
00001A30: 44 20 49 53 20 4E 45 43 45 53 53 41 52 59 20 49 |D IS NECESSARY I|
00001A40: 46 20 54 48 45 20 53 43 52 49 50 54 0D 20 20 20 |F THE SCRIPT. |
00001A50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 49 53 | IS|
00001A60: 20 47 4F 49 4E 47 20 54 4F 20 52 55 4E 20 49 4E | GOING TO RUN IN|
00001A70: 20 61 6E 73 69 2C 20 76 74 35 32 2C 20 4F 52 20 | ansi, vt52, OR |
00001A80: 76 74 31 30 32 20 4D 4F 44 45 2E 0D 20 20 20 2E |vt102 MODE.. .|
00001A90: 4F 50 54 20 4E 4F 41 4E 53 49 20 3A 20 6E 4F 20 |OPT NOANSI : nO |
00001AA0: 43 4F 4E 56 45 52 53 49 4F 4E 20 4F 46 20 55 50 |CONVERSION OF UP|
00001AB0: 50 45 52 43 41 53 45 20 43 48 41 52 41 43 54 45 |PERCASE CHARACTE|
00001AC0: 52 53 2E 20 20 74 48 49 53 20 49 53 20 54 48 45 |RS. tHIS IS THE|
00001AD0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00001AE0: 20 20 44 45 46 41 55 4C 54 2E 0D 0D 6F 75 74 70 | DEFAULT...outp|
00001AF0: 75 74 20 22 53 54 52 49 4E 47 22 0D 0D 20 20 20 |ut "STRING".. |
00001B00: 6F 55 54 50 55 54 53 20 41 20 53 54 52 49 4E 47 |oUTPUTS A STRING|
00001B10: 20 54 4F 20 54 48 45 20 4D 4F 44 45 4D 2E 20 20 | TO THE MODEM. |
00001B20: 63 4F 4E 54 52 4F 4C 20 43 48 41 52 41 43 54 45 |cONTROL CHARACTE|
00001B30: 52 53 20 41 52 45 20 45 4E 54 45 52 45 44 20 41 |RS ARE ENTERED A|
00001B40: 53 0D 20 20 20 54 48 45 59 20 41 52 45 20 49 4E |S. THEY ARE IN|
00001B50: 20 4D 41 43 52 4F 20 4B 45 59 53 2C 20 57 49 54 | MACRO KEYS, WIT|
00001B60: 48 20 41 20 5E 20 50 52 45 43 45 44 49 4E 47 20 |H A ^ PRECEDING |
00001B70: 54 48 45 20 43 4F 52 52 45 53 50 4F 4E 44 49 4E |THE CORRESPONDIN|
00001B80: 47 0D 20 20 20 4C 45 54 54 45 52 2E 20 20 66 4F |G. LETTER. fO|
00001B90: 52 20 45 58 41 4D 50 4C 45 2C 20 41 20 43 41 52 |R EXAMPLE, A CAR|
00001BA0: 52 49 41 47 45 20 52 45 54 55 52 4E 20 28 43 4F |RIAGE RETURN (CO|
00001BB0: 4E 54 52 4F 4C 2D 6D 29 20 57 4F 55 4C 44 20 42 |NTROL-m) WOULD B|
00001BC0: 45 0D 20 20 20 45 4E 54 45 52 45 44 20 41 53 20 |E. ENTERED AS |
00001BD0: 5E 6D 2E 0D 0D 70 61 75 73 65 20 5B 4E 55 4D 42 |^m...pause [NUMB|
00001BE0: 45 52 20 4F 46 20 53 45 43 4F 4E 44 53 5D 0D 0D |ER OF SECONDS]..|
00001BF0: 20 20 20 70 41 55 53 45 53 20 54 48 45 20 50 52 | pAUSES THE PR|
00001C00: 4F 47 52 41 4D 20 46 4F 52 20 41 20 53 50 45 43 |OGRAM FOR A SPEC|
00001C10: 49 46 49 45 44 20 4E 55 4D 42 45 52 20 4F 46 20 |IFIED NUMBER OF |
00001C20: 53 45 43 4F 4E 44 53 2E 0D 0D 70 72 69 6E 74 20 |SECONDS...print |
00001C30: 22 46 49 4C 45 4E 41 4D 45 22 0D 0D 20 20 20 73 |"FILENAME".. s|
00001C40: 45 4E 44 53 20 41 20 46 49 4C 45 20 46 52 4F 4D |ENDS A FILE FROM|
00001C50: 20 44 49 53 4B 20 54 4F 20 54 48 45 20 50 52 49 | DISK TO THE PRI|
00001C60: 4E 54 45 52 2E 20 20 69 46 20 54 48 45 20 50 52 |NTER. iF THE PR|
00001C70: 49 4E 54 45 52 20 49 53 20 4E 4F 54 0D 20 20 20 |INTER IS NOT. |
00001C80: 54 55 52 4E 45 44 20 4F 4E 2C 20 54 48 45 20 53 |TURNED ON, THE S|
00001C90: 43 52 49 50 54 20 41 42 4F 52 54 53 2E 0D 0D 70 |CRIPT ABORTS...p|
00001CA0: 72 69 6E 74 65 72 20 5B 44 45 56 49 43 45 20 4E |rinter [DEVICE N|
00001CB0: 55 4D 42 45 52 5D 0D 0D 20 20 20 63 48 41 4E 47 |UMBER].. cHANG|
00001CC0: 45 53 20 54 48 45 20 50 52 49 4E 54 45 52 20 44 |ES THE PRINTER D|
00001CD0: 45 56 49 43 45 20 44 45 46 41 55 4C 54 20 54 4F |EVICE DEFAULT TO|
00001CE0: 20 54 48 45 20 53 50 45 43 49 46 49 45 44 20 44 | THE SPECIFIED D|
00001CF0: 45 56 49 43 45 20 4E 55 4D 42 45 52 2E 0D 20 20 |EVICE NUMBER.. |
00001D00: 20 69 46 20 54 48 45 20 44 45 56 49 43 45 20 49 | iF THE DEVICE I|
00001D10: 53 20 4E 4F 54 20 50 52 45 53 45 4E 54 2C 20 54 |S NOT PRESENT, T|
00001D20: 48 45 20 53 43 52 49 50 54 20 41 42 4F 52 54 53 |HE SCRIPT ABORTS|
00001D30: 20 57 49 54 48 20 41 4E 20 45 52 52 4F 52 2E 0D | WITH AN ERROR..|
00001D40: 0D 70 72 6F 74 20 22 50 52 4F 54 4F 43 4F 4C 22 |.prot "PROTOCOL"|
00001D50: 0D 0D 20 20 20 6C 4F 41 44 53 20 41 20 50 52 4F |.. lOADS A PRO|
00001D60: 54 4F 43 4F 4C 2E 0D 0D 72 65 64 69 61 6C 20 5B |TOCOL...redial [|
00001D70: 4E 55 4D 42 45 52 20 4F 46 20 54 52 49 45 53 5D |NUMBER OF TRIES]|
00001D80: 0D 0D 20 20 20 73 45 54 53 20 54 48 45 20 4E 55 |.. sETS THE NU|
00001D90: 4D 42 45 52 20 4F 46 20 54 49 4D 45 53 20 54 4F |MBER OF TIMES TO|
00001DA0: 20 52 45 44 49 41 4C 20 41 20 4E 55 4D 42 45 52 | REDIAL A NUMBER|
00001DB0: 20 42 45 46 4F 52 45 20 51 55 49 54 54 49 4E 47 | BEFORE QUITTING|
00001DC0: 2E 20 20 69 46 20 41 0D 20 20 20 4E 55 4D 42 45 |. iF A. NUMBE|
00001DD0: 52 20 49 53 20 44 49 41 4C 45 44 20 54 48 49 53 |R IS DIALED THIS|
00001DE0: 20 4D 41 4E 59 20 54 49 4D 45 53 20 57 49 54 48 | MANY TIMES WITH|
00001DF0: 4F 55 54 20 46 49 4E 44 49 4E 47 20 41 20 43 41 |OUT FINDING A CA|
00001E00: 52 52 49 45 52 2C 20 54 48 45 0D 20 20 20 53 43 |RRIER, THE. SC|
00001E10: 52 49 50 54 20 41 42 4F 52 54 53 2E 0D 0D 73 63 |RIPT ABORTS...sc|
00001E20: 72 65 65 6E 20 22 53 54 52 49 4E 47 22 0D 0D 20 |reen "STRING".. |
00001E30: 20 20 70 52 49 4E 54 53 20 41 20 54 45 58 54 20 | pRINTS A TEXT |
00001E40: 4D 45 53 53 41 47 45 20 4F 4E 20 54 48 45 20 53 |MESSAGE ON THE S|
00001E50: 43 52 45 45 4E 2E 0D 0D 73 65 63 61 64 64 72 20 |CREEN...secaddr |
00001E60: 5B 53 45 43 4F 4E 44 41 52 59 20 41 44 44 52 45 |[SECONDARY ADDRE|
00001E70: 53 53 5D 0D 0D 20 20 20 63 48 41 4E 47 45 53 20 |SS].. cHANGES |
00001E80: 54 48 45 20 50 52 49 4E 54 45 52 20 53 45 43 4F |THE PRINTER SECO|
00001E90: 4E 44 41 52 59 20 41 44 44 52 45 53 53 2E 0D 0D |NDARY ADDRESS...|
00001EA0: 73 65 6E 64 20 22 46 49 4C 45 4E 41 4D 45 22 0D |send "FILENAME".|
00001EB0: 0D 20 20 20 73 45 4E 44 53 20 41 20 46 49 4C 45 |. sENDS A FILE|
00001EC0: 20 54 4F 20 54 48 45 20 4D 4F 44 45 4D 2E 0D 0D | TO THE MODEM...|
00001ED0: 74 65 72 6D 20 22 54 45 52 4D 49 4E 41 4C 20 45 |term "TERMINAL E|
00001EE0: 4D 55 4C 41 54 4F 52 22 0D 0D 20 20 20 6C 4F 41 |MULATOR".. lOA|
00001EF0: 44 53 20 41 20 54 45 52 4D 49 4E 41 4C 20 45 4D |DS A TERMINAL EM|
00001F00: 55 4C 41 54 4F 52 2E 0D 0D 75 6E 63 68 65 63 6B |ULATOR...uncheck|
00001F10: 20 5B 53 54 52 49 4E 47 20 4E 55 4D 42 45 52 5D | [STRING NUMBER]|
00001F20: 0D 0D 20 20 20 63 4C 45 41 52 53 20 54 48 45 20 |.. cLEARS THE |
00001F30: 53 54 52 49 4E 47 20 49 4E 20 54 48 45 20 53 50 |STRING IN THE SP|
00001F40: 45 43 49 46 49 45 44 20 53 54 52 49 4E 47 20 4E |ECIFIED STRING N|
00001F50: 55 4D 42 45 52 2E 20 20 66 4F 52 20 45 58 41 4D |UMBER. fOR EXAM|
00001F60: 50 4C 45 2C 20 49 46 0D 20 20 20 63 68 65 63 6B |PLE, IF. check|
00001F70: 20 32 20 22 70 41 53 53 57 4F 52 44 22 20 57 41 | 2 "pASSWORD" WA|
00001F80: 53 20 50 52 45 56 49 4F 55 53 4C 59 20 45 58 45 |S PREVIOUSLY EXE|
00001F90: 43 55 54 45 44 2C 20 75 6E 63 68 65 63 6B 20 32 |CUTED, uncheck 2|
00001FA0: 20 47 45 54 53 20 52 49 44 20 4F 46 0D 20 20 20 | GETS RID OF. |
00001FB0: 54 48 41 54 20 44 45 46 49 4E 49 54 49 4F 4E 20 |THAT DEFINITION |
00001FC0: 46 4F 52 20 53 54 52 49 4E 47 20 4E 55 4D 42 45 |FOR STRING NUMBE|
00001FD0: 52 20 32 2E 0D 0D 75 6E 74 69 6C 20 22 32 34 2D |R 2...until "24-|
00001FE0: 48 4F 55 52 20 54 49 4D 45 22 0D 0D 20 20 20 70 |HOUR TIME".. p|
00001FF0: 41 55 53 45 53 20 45 58 45 43 55 54 49 4F 4E 20 |AUSES EXECUTION |
00002000: 4F 46 20 54 48 45 20 53 43 52 49 50 54 2E 20 20 |OF THE SCRIPT. |
00002010: 74 48 45 20 53 43 52 49 50 54 20 52 45 53 55 4D |tHE SCRIPT RESUM|
00002020: 45 53 20 57 48 45 4E 20 54 48 45 20 54 49 4D 45 |ES WHEN THE TIME|
00002030: 0D 20 20 20 4F 46 20 44 41 59 20 52 45 41 43 48 |. OF DAY REACH|
00002040: 45 53 20 54 48 45 20 53 50 45 43 49 46 49 45 44 |ES THE SPECIFIED|
00002050: 20 54 49 4D 45 2E 20 20 74 48 45 20 54 49 4D 45 | TIME. tHE TIME|
00002060: 20 4D 55 53 54 20 42 45 20 49 4E 20 32 34 2D 48 | MUST BE IN 24-H|
00002070: 4F 55 52 0D 20 20 20 46 4F 52 4D 2C 20 41 53 20 |OUR. FORM, AS |
00002080: 53 48 4F 57 4E 3A 0D 0D 20 20 20 75 6E 74 69 6C |SHOWN:.. until|
00002090: 20 22 68 68 3A 6D 6D 3A 73 73 22 0D 0D 20 20 20 | "hh:mm:ss".. |
000020A0: 66 4F 52 20 45 58 41 4D 50 4C 45 3A 0D 0D 20 20 |fOR EXAMPLE:.. |
000020B0: 20 75 6E 74 69 6C 20 22 32 32 3A 33 35 22 20 20 | until "22:35" |
000020C0: 57 41 49 54 53 20 55 4E 54 49 4C 20 31 30 3A 33 |WAITS UNTIL 10:3|
000020D0: 35 20 70 6D 0D 20 20 20 75 6E 74 69 6C 20 22 31 |5 pm. until "1|
000020E0: 31 3A 35 30 3A 32 35 22 20 20 57 41 49 54 53 20 |1:50:25" WAITS |
000020F0: 55 4E 54 49 4C 20 32 35 20 53 45 43 4F 4E 44 53 |UNTIL 25 SECONDS|
00002100: 20 50 41 53 54 20 31 31 3A 35 30 20 61 6D 0D 0D | PAST 11:50 am..|
00002110: 75 70 6C 6F 61 64 20 22 46 49 4C 45 4E 41 4D 45 |upload "FILENAME|
00002120: 22 0D 0D 20 20 20 75 50 4C 4F 41 44 53 20 41 20 |".. uPLOADS A |
00002130: 46 49 4C 45 20 55 53 49 4E 47 20 54 48 45 20 50 |FILE USING THE P|
00002140: 52 4F 54 4F 43 4F 4C 20 49 4E 20 4D 45 4D 4F 52 |ROTOCOL IN MEMOR|
00002150: 59 2E 0D 0D 77 61 69 74 0D 0D 20 20 20 67 4F 45 |Y...wait.. gOE|
00002160: 53 20 49 4E 54 4F 20 54 45 52 4D 49 4E 41 4C 20 |S INTO TERMINAL |
00002170: 4D 4F 44 45 20 41 4E 44 20 52 45 43 45 49 56 45 |MODE AND RECEIVE|
00002180: 53 20 44 41 54 41 20 28 41 4E 44 20 50 52 49 4E |S DATA (AND PRIN|
00002190: 54 53 20 49 54 20 54 4F 20 54 48 45 0D 20 20 20 |TS IT TO THE. |
000021A0: 53 43 52 45 45 4E 29 20 57 48 49 4C 45 20 57 41 |SCREEN) WHILE WA|
000021B0: 49 54 49 4E 47 20 46 4F 52 20 54 48 45 20 53 54 |ITING FOR THE ST|
000021C0: 52 49 4E 47 53 20 53 50 45 43 49 46 49 45 44 20 |RINGS SPECIFIED |
000021D0: 57 49 54 48 20 54 48 45 20 63 68 65 63 6B 0D 20 |WITH THE check. |
000021E0: 20 20 43 4F 4D 4D 41 4E 44 2E 20 20 77 48 45 4E | COMMAND. wHEN|
000021F0: 20 4F 4E 45 20 4F 46 20 54 48 45 20 53 54 52 49 | ONE OF THE STRI|
00002200: 4E 47 53 20 49 53 20 46 4F 55 4E 44 2C 20 49 54 |NGS IS FOUND, IT|
00002210: 20 53 54 4F 50 53 20 57 41 49 54 49 4E 47 20 41 | STOPS WAITING A|
00002220: 4E 44 0D 20 20 20 43 4F 4E 54 49 4E 55 45 53 20 |ND. CONTINUES |
00002230: 57 49 54 48 20 54 48 45 20 53 43 52 49 50 54 2E |WITH THE SCRIPT.|
00002240: 0D 0D 20 20 20 6E 6F 74 65 3A 20 20 69 46 20 41 |.. note: iF A|
00002250: 20 52 45 43 45 49 56 45 44 20 53 54 52 49 4E 47 | RECEIVED STRING|
00002260: 20 50 41 54 54 45 52 4E 20 4D 41 54 43 48 45 53 | PATTERN MATCHES|
00002270: 20 4D 4F 52 45 20 54 48 41 4E 20 4F 4E 45 20 53 | MORE THAN ONE S|
00002280: 54 52 49 4E 47 0D 20 20 20 53 50 45 43 49 46 49 |TRING. SPECIFI|
00002290: 45 44 20 42 59 20 63 68 65 63 6B 20 43 4F 4D 4D |ED BY check COMM|
000022A0: 41 4E 44 53 2C 20 54 48 45 20 4C 4F 57 45 53 54 |ANDS, THE LOWEST|
000022B0: 20 4E 55 4D 42 45 52 20 49 53 20 52 45 54 55 52 | NUMBER IS RETUR|
000022C0: 4E 45 44 2E 20 66 4F 52 0D 20 20 20 45 58 41 4D |NED. fOR. EXAM|
000022D0: 50 4C 45 2C 20 49 46 20 53 54 52 49 4E 47 20 31 |PLE, IF STRING 1|
000022E0: 20 49 53 20 22 3E 22 20 41 4E 44 20 53 54 52 49 | IS ">" AND STRI|
000022F0: 4E 47 20 32 20 49 53 20 22 6C 4F 42 42 59 3E 22 |NG 2 IS "lOBBY>"|
00002300: 2C 20 41 4E 44 20 54 48 45 0D 20 20 20 53 54 52 |, AND THE. STR|
00002310: 49 4E 47 20 22 6C 4F 42 42 59 3E 22 20 49 53 20 |ING "lOBBY>" IS |
00002320: 52 45 43 45 49 56 45 44 2C 20 54 48 45 20 53 43 |RECEIVED, THE SC|
00002330: 52 49 50 54 20 52 45 43 4F 47 4E 49 5A 45 53 20 |RIPT RECOGNIZES |
00002340: 53 54 52 49 4E 47 20 31 20 42 45 43 41 55 53 45 |STRING 1 BECAUSE|
00002350: 0D 20 20 20 49 54 20 49 53 20 41 20 4C 4F 57 45 |. IT IS A LOWE|
00002360: 52 20 53 54 52 49 4E 47 20 4E 55 4D 42 45 52 2C |R STRING NUMBER,|
00002370: 20 45 56 45 4E 20 54 48 4F 55 47 48 20 42 4F 54 | EVEN THOUGH BOT|
00002380: 48 20 53 54 52 49 4E 47 53 20 4D 41 54 43 48 20 |H STRINGS MATCH |
00002390: 54 48 45 0D 20 20 20 52 45 43 45 49 56 45 44 20 |THE. RECEIVED |
000023A0: 44 41 54 41 2E 0D 0D 0D 33 2E 33 2E 33 20 20 61 |DATA....3.3.3 a|
000023B0: 4E 20 45 58 41 4D 50 4C 45 2E 0D 0D 62 45 4C 4F |N EXAMPLE...bELO|
000023C0: 57 20 49 53 20 41 20 53 43 52 49 50 54 20 50 52 |W IS A SCRIPT PR|
000023D0: 4F 47 52 41 4D 20 46 4F 52 20 4C 4F 47 47 49 4E |OGRAM FOR LOGGIN|
000023E0: 47 20 49 4E 54 4F 20 41 20 63 4F 4C 4F 52 20 36 |G INTO A cOLOR 6|
000023F0: 34 20 62 62 73 2E 0D 0D 52 45 44 49 41 4C 20 35 |4 bbs...REDIAL 5|
00002400: 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 41 42 | ; AB|
00002410: 4F 52 54 20 53 43 52 49 50 54 20 41 46 54 45 52 |ORT SCRIPT AFTER|
00002420: 20 35 20 55 4E 53 55 43 43 45 53 53 46 55 4C 20 | 5 UNSUCCESSFUL |
00002430: 54 52 49 45 53 0D 44 49 41 4C 22 6E 41 4D 45 20 |TRIES.DIAL"nAME |
00002440: 4F 46 20 62 62 73 22 20 20 20 3B 20 41 55 54 4F |OF bbs" ; AUTO|
00002450: 44 49 41 4C 20 54 48 45 20 62 62 73 0D 43 48 45 |DIAL THE bbs.CHE|
00002460: 43 4B 20 31 20 22 52 45 54 55 52 4E 22 20 20 20 |CK 1 "RETURN" |
00002470: 20 3B 20 53 50 45 43 49 46 59 20 54 4F 20 43 48 | ; SPECIFY TO CH|
00002480: 45 43 4B 20 46 4F 52 20 54 48 45 20 53 54 52 49 |ECK FOR THE STRI|
00002490: 4E 47 20 22 52 45 54 55 52 4E 22 0D 57 41 49 54 |NG "RETURN".WAIT|
000024A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000024B0: 3B 20 57 41 49 54 20 46 4F 52 20 53 54 52 49 4E |; WAIT FOR STRIN|
000024C0: 47 20 49 4E 20 54 45 52 4D 49 4E 41 4C 20 4D 4F |G IN TERMINAL MO|
000024D0: 44 45 0D 4F 55 54 50 55 54 22 5E 6D 22 20 20 20 |DE.OUTPUT"^m" |
000024E0: 20 20 20 20 20 20 20 3B 20 53 45 4E 44 20 41 20 | ; SEND A |
000024F0: 43 41 52 52 49 41 47 45 20 52 45 54 55 52 4E 0D |CARRIAGE RETURN.|
00002500: 43 48 45 43 4B 20 31 20 22 28 59 2F 4E 29 22 20 |CHECK 1 "(Y/N)" |
00002510: 20 20 20 20 3B 20 43 48 45 43 4B 20 46 4F 52 20 | ; CHECK FOR |
00002520: 61 73 63 69 69 2F 47 52 41 50 48 49 43 53 20 50 |ascii/GRAPHICS P|
00002530: 52 4F 4D 50 54 0D 57 41 49 54 0D 4F 55 54 50 55 |ROMPT.WAIT.OUTPU|
00002540: 54 22 59 22 20 20 20 20 20 20 20 20 20 20 20 3B |T"Y" ;|
00002550: 20 53 45 4E 44 20 41 20 59 45 53 0D 43 48 45 43 | SEND A YES.CHEC|
00002560: 4B 20 31 20 22 3E 22 20 20 20 20 20 20 20 20 20 |K 1 ">" |
00002570: 3B 20 57 41 49 54 20 46 4F 52 20 55 53 45 52 20 |; WAIT FOR USER |
00002580: 4E 55 4D 42 45 52 20 50 52 4F 4D 50 54 0D 4D 41 |NUMBER PROMPT.MA|
00002590: 43 52 4F 20 31 20 20 20 20 20 20 20 20 20 20 20 |CRO 1 |
000025A0: 20 20 3B 20 53 45 4E 44 20 50 41 53 53 57 4F 52 | ; SEND PASSWOR|
000025B0: 44 20 4D 41 43 52 4F 20 2D 20 53 48 4F 55 4C 44 |D MACRO - SHOULD|
000025C0: 20 43 4F 4E 54 41 49 4E 20 55 53 45 52 0D 45 4E | CONTAIN USER.EN|
000025D0: 44 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |D |
000025E0: 20 20 3B 20 20 20 4E 55 4D 42 45 52 2C 20 4F 4E | ; NUMBER, ON|
000025F0: 45 20 53 45 43 4F 4E 44 20 50 41 55 53 45 2C 20 |E SECOND PAUSE, |
00002600: 41 4E 44 20 50 41 53 53 57 4F 52 44 0D 0D 0D |AND PASSWORD... |
3.3 SCRIPT FILES..3.3.1 DESCRIPTION...
SCRIPT FILES ARE USER-CREATED PROGRAMS C
ONTAINING COMMANDS WHICH.INSTRUCT THE TE
RMINAL TO PERFORM CERTAIN FUNCTIONS AUTO
MATICALLY. YOU.FIRST CREATE A "PROGRAM"
USING THE SCRIPT LANGUAGE, AND THEN YOU.
COMPILE THE PROGRAM INTO COMMAND CODES W
HICH THE TERMINAL INTERPRETS.AND EXECUTE
S. AN EXAMPLE OF A SCRIPT IS A PROGRAM
THAT CALLS UP A.BBS, LOGS IN WITH YOUR N
AME AND PASSWORD, READS NEW MESSAGES AND
.CAPTURES THEM IN THE BUFFER, LOGS OFF,
AND SAVES THE MESSAGES TO DISK...TO CREA
TE A SCRIPT, USE THE SEQ EDITOR TO WRITE
A FILE WITH THE SCRIPT.COMMANDS, AND TH
EN RUN THE SCRIPT COMPILER TO CONVERT TH
E SEQUENTIAL.FILE INTO AN EXECUTABLE SCR
IPT FILE. THE SCRIPT SOURCE CODE MAY BE
.SAVED EITHER IN A SEQUENTIAL FILE OR AS
LINES IN A PROGRAM WITH LINE.NUMBERS.
EACH COMMAND SHOULD BE ENTERED ON A SEPA
RATE LINE; NO COLONS.OR OTHER CHARACTERS
ARE USED TO SEPARATE COMMANDS ON THE SA
ME LINE..YOU MAY INCLUDE COMMENTS IN THE
SCRIPT PROGRAM BY PLACING THE COMMENT.T
EXT AFTER A SEMICOLON (";") ON A LINE. T
HE COMPILER IGNORES ANYTHING.ON A LINE T
HAT COMES AFTER A SEMICOLON...3.3.2 SCR
IPT COMMANDS...COMMANDS ARE GIVEN IN UPP
ERCASE. HOWEVER, THE ACTUAL SCRIPT PROG
RAMS.SHOULD HAVE LOWERCASE COMMANDS!..AN
Y ARGUMENTS THAT GO ALONG WITH THE COMMA
NDS ARE PLACED NEXT TO THEM..NUMERIC ARG
UMENTS ARE IN BRACKETS [ ], AND STRING A
RGUMENTS ARE IN.QUOTES " ". OPTIONAL AR
GUMENTS ARE GIVEN INSIDE GREATER-THAN AN
D.LESS-THAN SYMBOLS. THE DESCRIPTION OF
THE ARGUMENT IS IN LOWERCASE...FOR COMM
ANDS THAT LOAD MODULE FILES, OMIT THE PR
EFIX FROM THE FILE.NAME. (FOR EXAMPLE,
PROT"XMODEM" WOULD WORK, BUT PROT"PRT.XM
ODEM".WOULD NOT.)...ASC "ASCII TABLE"..
LOADS THE ASCII TRANSLATION TABLE WITH
THE GIVEN FILE NAME...BAUD [BAUD RATE].
. CHANGES THE BAUD RATE TO THE SPECIFI
ED NUMBER. IF THE BAUD RATE. GIVEN IS
GREATER THAN THE MAXIMUM BAUD RATE FOR
THE MODEM, NO. CHANGE IS MADE...BUFFER
COMMAND <"FILENAME">.. THE FOLLOWING
COMMANDS ARE AVAILABLE WITH BUFFER:..
CLEAR - CLEARS ALL FILES FROM THE BUFFER
... CLOSE - CLOSES A CAPTURE FILE...
KILL "FILENAME" - DELETES A FILE FROM T
HE BUFFER... LOAD "FILENAME" - LOADS A
FILE FROM DISK INTO THE BUFFER... OPE
N "FILENAME" - OPENS A CAPTURE FILE...
PRINT "FILENAME" - SENDS A BUFFER FILE
TO THE PRINTER... SAVE "FILENAME" - SA
VES A FILE FROM THE BUFFER TO DISK...
SEND "FILENAME" - SENDS A FILE FROM THE
BUFFER TO THE MODEM...CHECK [STRING NUMB
ER] "STRING".. WORKS IN CONJUNCTION WI
TH THE WAIT COMMAND TO DETECT INCOMING.
STRINGS. FOR EXAMPLE,.. CHECK 2 "PA
SSWORD".. DEFINES STRING NUMBER 2 AS "
PASSWORD". UP TO 6 STRINGS MAY BE. DE
FINED. WHEN THE SCRIPT ENCOUNTERS A WAI
T COMMAND, IT GOES TO. TERMINAL MODE A
ND WAIT UNTIL ONE OF THESE DEFINED STRIN
GS IS. RECEIVED, AND THEN IT RETURNS T
HE RECEIVED STRING NUMBER. THE. CHECK
COMMAND DOES NOT WAIT...DIAL "ENTRY NAM
E".. DIALS THE ENTRY WITH THE GIVEN NA
ME. THE AUTODIALER KEEPS. REDIALING U
NTIL EITHER A CARRIER IS FOUND OR THE RE
DIAL COUNT IS. EXHAUSTED (SEE REDIAL).
..DIAL# "PHONE NUMBER".. DIALS THE PHO
NE NUMBER SPECIFIED...DIALN [LOCATION IN
PHONE LIST].. DIALS THE ENTRY IN THE
PHONE LIST CORRESPONDING TO THE SPECIFIE
D. NUMBER. THE NUMBERS DON'T SHOW UP
ON THE AUTODIAL MENU, BUT, FOR. EXAMPL
E, DIALN 3 WOULD DIAL THE THIRD ENTRY FR
OM THE TOP...DISK [DEVICE NUMBER].. CH
ANGES THE DISK DEVICE DEFAULT TO THE SPE
CIFIED DEVICE NUMBER. IF. THE DEVICE I
S NOT PRESENT, THE SCRIPT HALTS WITH AN
ERROR...DISKC "DISK COMMAND".. SENDS T
HE SPECIFIED DISK COMMAND TO THE CURRENT
DISK DEVICE. THE. EXTRA DISK COMMAND
S ADDED BY NOVATERM ARE ALSO VALID...DOW
NLOAD "FILENAME,TYPE".. DOWNLOADS THE
SPECIFIED FILE USING THE PROTOCOL IN MEM
ORY. THE. ONE-LETTER TYPE SPECIFICATI
ON IS OPTIONAL. IF USED, IT MUST BE.
EITHER A "P", "S", OR "U" FOR PRG, SEQ,
OR USR FILE TYPES,. RESPECTIVELY. FOR
BATCH PROTOCOLS, THE FILE NAME SPECIFIE
D HERE IS. IGNORED...DRIVE [DRIVE NUMB
ER].. CHANGES THE DEFAULT DRIVE NUMBER
(NOT DEVICE NUMBER)...END.. TERMINATE
S THE SCRIPT PROGRAM...FONT "FONT FILE".
. LOADS A FONT FROM DISK...FONT80 "FON
T FILE".. LOADS AN 80 COLUMN FONT FROM
DISK...GETTIME.. REQUESTS THE USER TO
INPUT THE CURRENT TIME. IF YOUR SCRIPT
. PROGRAM USES THE UNTIL COMMAND TO WA
IT FOR A CERTAIN TIME OF DAY,. YOU SHO
ULD INCLUDE THIS COMMAND AT THE START OF
YOUR PROGRAM SO. THAT YOU MAY SET THE
CLOCK...GO40.. CHANGES TO 40 COLUMN M
ODE, IF THE TERMINAL EMULATOR ALLOWS IT.
..GO80.. CHANGES TO 80 COLUMN MODE...H
ANGUP.. HANGS UP THE PHONE...IF <NO> C
ONDITION THEN COMMAND.. USED TO TEST V
ARIOUS CONDITIONS. ANY ONE OF THE CONDI
TIONS BELOW. MAY BE SUBSTITUTED INTO T
HE COMMAND, AND IF THE CONDITION IS TRUE
,. THE COMMAND AFTER THEN IS EXECUTED.
ANY COMMAND MAY BE PUT AFTER. THEN..
. CARRIER - CHECKS FOR A CARRIER. IF
NO IS IN FRONT OF IT, THE. COMMAND EXE
CUTES IN THE ABSENCE OF A CARRIER... C
HECK [CHECK STRING] - CHECKS TO SEE IF T
HE SPECIFIED STRING NUMBER. WAS RECEIV
ED. THERE MUST BE A NUMBER AFTER CHECK,
OR THE COMMAND. IS INVALID... RECEI
VE - CHECKS TO SEE IF DATA IS BEING RECE
IVED. IF NO PRECEDES. IT, THE COMMAND
EXECUTES WHEN DATA IS NOT BEING RECEIVE
D... RING - CHECKS TO SEE IF THE PHONE
IS RINGING. IF NO PRECEDES IT,. THE
COMMAND EXECUTES WHEN THE PHONE ISN'T RI
NGING...JUMP LABEL.. JUMPS TO THE SPEC
IFIED LABEL IN THE PROGRAM. LABELS ARE.
NON-COMMAND WORDS WHICH ARE PLACED BE
FORE COMMANDS TO IDENTIFY A. LOCATION
IN THE PROGRAM. FOR EXAMPLE:.. LOOP
CHECK 1 "USERNAME:". .. .. JUMP
LOOP.. LABELS MAY CONTAIN ANY CHARACT
ERS OTHER THAN QUOTES, BUT A LABEL. MA
Y ONLY BE ONE WORD... IF THE SCRIPT IS
ENTERED IN THE FORM OF A PROGRAM FILE (
RATHER THAN. A SEQUENTIAL FILE), AN AC
TUAL LINE NUMBER MAY BE USED WITH THE JU
MP. COMMAND. FOR EXAMPLE:.. 10 CHE
CK 1 "USERNAME:". 20 .... 30 ....
40 JUMP 10.. ...OR:.. 100 IF NO
CARRIER THEN JUMP 100..LINK "SCRIPT PROG
RAM".. LOADS AND EXECUTES A NEW SCRIPT
PROGRAM...MACRO [FUNCTION KEY NUMBER]..
SENDS A FUNCTION KEY STRING. THIS IS
EQUIVALENT TO PRESSING ONE OF. THE 16
FUNCTION KEYS...MINIT.. INITIALIZES T
HE MODEM IF NO CARRIER IS PRESENT...MODE
M "MODEM DRIVER".. LOADS A MODEM DRIVE
R...OFFHOOK.. TAKES THE PHONE OFF THE
HOOK....OPT PARAMETER.. CHANGES A COMP
ILER OPTION. THESE COMMANDS ARE NOT INC
LUDED IN THE. PROGRAM WHEN IT IS COMPI
LED. INSTEAD, THEY DIRECT THE COMPILER
TO. TAKE CERTAIN ACTIONS OR SET FLAGS.
THE ONLY PARAMETERS CURRENTLY. SUPPO
RTED ARE:.. .OPT ANSI : CONVERTS UPP
ERCASE CHARACTERS IN ALL FOLLOWING CHECK
. STRINGS TO UPPERCASE C
HARACTERS WITH LOWER ASCII.
VALUES. THIS COMMAND IS NECESSARY I
F THE SCRIPT. IS GOING T
O RUN IN ANSI, VT52, OR VT102 MODE.. .
OPT NOANSI : NO CONVERSION OF UPPERCASE
CHARACTERS. THIS IS THE.
DEFAULT...OUTPUT "STRING".. OUTPUTS
A STRING TO THE MODEM. CONTROL CHARACTE
RS ARE ENTERED AS. THEY ARE IN MACRO K
EYS, WITH A ^ PRECEDING THE CORRESPONDIN
G. LETTER. FOR EXAMPLE, A CARRIAGE RE
TURN (CONTROL-M) WOULD BE. ENTERED AS
^M...PAUSE [NUMBER OF SECONDS].. PAUSE
S THE PROGRAM FOR A SPECIFIED NUMBER OF
SECONDS...PRINT "FILENAME".. SENDS A F
ILE FROM DISK TO THE PRINTER. IF THE PR
INTER IS NOT. TURNED ON, THE SCRIPT AB
ORTS...PRINTER [DEVICE NUMBER].. CHANG
ES THE PRINTER DEVICE DEFAULT TO THE SPE
CIFIED DEVICE NUMBER.. IF THE DEVICE I
S NOT PRESENT, THE SCRIPT ABORTS WITH AN
ERROR...PROT "PROTOCOL".. LOADS A PRO
TOCOL...REDIAL [NUMBER OF TRIES].. SET
S THE NUMBER OF TIMES TO REDIAL A NUMBER
BEFORE QUITTING. IF A. NUMBER IS DIA
LED THIS MANY TIMES WITHOUT FINDING A CA
RRIER, THE. SCRIPT ABORTS...SCREEN "ST
RING".. PRINTS A TEXT MESSAGE ON THE S
CREEN...SECADDR [SECONDARY ADDRESS]..
CHANGES THE PRINTER SECONDARY ADDRESS...
SEND "FILENAME".. SENDS A FILE TO THE
MODEM...TERM "TERMINAL EMULATOR".. LOA
DS A TERMINAL EMULATOR...UNCHECK [STRING
NUMBER].. CLEARS THE STRING IN THE SP
ECIFIED STRING NUMBER. FOR EXAMPLE, IF.
CHECK 2 "PASSWORD" WAS PREVIOUSLY EXE
CUTED, UNCHECK 2 GETS RID OF. THAT DEF
INITION FOR STRING NUMBER 2...UNTIL "24-
HOUR TIME".. PAUSES EXECUTION OF THE S
CRIPT. THE SCRIPT RESUMES WHEN THE TIME
. OF DAY REACHES THE SPECIFIED TIME.
THE TIME MUST BE IN 24-HOUR. FORM, AS
SHOWN:.. UNTIL "HH:MM:SS".. FOR EXAM
PLE:.. UNTIL "22:35" WAITS UNTIL 10:3
5 PM. UNTIL "11:50:25" WAITS UNTIL 25
SECONDS PAST 11:50 AM..UPLOAD "FILENAME
".. UPLOADS A FILE USING THE PROTOCOL
IN MEMORY...WAIT.. GOES INTO TERMINAL
MODE AND RECEIVES DATA (AND PRINTS IT TO
THE. SCREEN) WHILE WAITING FOR THE ST
RINGS SPECIFIED WITH THE CHECK. COMMAN
D. WHEN ONE OF THE STRINGS IS FOUND, IT
STOPS WAITING AND. CONTINUES WITH THE
SCRIPT... NOTE: IF A RECEIVED STRING
PATTERN MATCHES MORE THAN ONE STRING.
SPECIFIED BY CHECK COMMANDS, THE LOWEST
NUMBER IS RETURNED. FOR. EXAMPLE, IF
STRING 1 IS ">" AND STRING 2 IS "LOBBY>"
, AND THE. STRING "LOBBY>" IS RECEIVED
, THE SCRIPT RECOGNIZES STRING 1 BECAUSE
. IT IS A LOWER STRING NUMBER, EVEN TH
OUGH BOTH STRINGS MATCH THE. RECEIVED
DATA....3.3.3 AN EXAMPLE...BELOW IS A S
CRIPT PROGRAM FOR LOGGING INTO A COLOR 6
4 BBS...REDIAL 5 ; ABORT SCRI
PT AFTER 5 UNSUCCESSFUL TRIES.DIAL"NAME
OF BBS" ; AUTODIAL THE BBS.CHECK 1 "RE
TURN" ; SPECIFY TO CHECK FOR THE STRI
NG "RETURN".WAIT ; WAIT F
OR STRING IN TERMINAL MODE.OUTPUT"^M"
; SEND A CARRIAGE RETURN.CHECK 1
"(Y/N)" ; CHECK FOR ASCII/GRAPHICS P
ROMPT.WAIT.OUTPUT"Y" ; SEND A
YES.CHECK 1 ">" ; WAIT FOR USER
NUMBER PROMPT.MACRO 1 ; SEND
PASSWORD MACRO - SHOULD CONTAIN USER.EN
D ; NUMBER, ONE SECOND
PAUSE, AND PASSWORD...
> CLICK IMAGE PREVIEW FOR FULL MODAL