00000000: 20 20 20 20 20 20 20 20 D4 48 45 20 CD 41 49 4E | .HE .AIN|
00000010: 20 C4 49 53 50 45 52 53 41 4C 20 CD 45 4E 55 20 | .ISPERSAL .ENU |
00000020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000030: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000040: 2D 2D 2D 2D 2D 2D 2D 20 20 20 20 20 20 20 20 20 |------- |
00000050: CF 50 54 49 4F 4E 20 31 20 28 C3 52 45 41 54 45 |.PTION 1 (.REATE|
00000060: 20 50 52 4F 47 52 41 4D 29 20 49 53 20 54 48 45 | PROGRAM) IS THE|
00000070: 20 4D 41 49 4E 20 20 20 4F 4E 45 20 55 53 45 44 | MAIN ONE USED|
00000080: 20 46 4F 52 20 57 52 49 54 49 4E 47 20 41 43 54 | FOR WRITING ACT|
00000090: 55 41 4C 20 50 52 4F 47 52 41 4D 53 2E 20 20 20 |UAL PROGRAMS. |
000000A0: D9 4F 55 20 57 49 4C 4C 20 42 45 20 41 53 4B 45 |.OU WILL BE ASKE|
000000B0: 44 20 46 4F 52 20 41 20 55 4E 49 51 55 45 20 4E |D FOR A UNIQUE N|
000000C0: 41 4D 45 20 46 4F 52 20 54 48 45 20 50 52 4F 47 |AME FOR THE PROG|
000000D0: 52 41 4D 20 41 4E 44 20 57 48 45 54 48 45 52 20 |RAM AND WHETHER |
000000E0: 46 49 4C 45 53 20 41 52 45 20 4E 45 45 44 45 44 |FILES ARE NEEDED|
000000F0: 46 4F 52 20 49 54 2E 20 C9 46 20 46 49 4C 45 53 |FOR IT. .F FILES|
00000100: 20 41 52 45 20 4B 4E 4F 57 4E 20 54 4F 20 54 4F | ARE KNOWN TO TO|
00000110: 20 54 48 45 20 20 20 20 43 55 52 52 45 4E 54 20 | THE CURRENT |
00000120: 57 4F 52 4B 49 4E 47 20 43 4F 50 59 20 54 48 45 |WORKING COPY THE|
00000130: 53 45 20 57 49 4C 4C 20 42 45 20 53 48 4F 57 4E |SE WILL BE SHOWN|
00000140: 4F 4E 20 54 48 45 20 53 43 52 45 45 4E 2E 20 C9 |ON THE SCREEN. .|
00000150: 46 20 4E 4F 54 20 59 4F 55 20 57 49 4C 4C 20 42 |F NOT YOU WILL B|
00000160: 45 20 54 41 4B 45 4E 20 54 4F 20 46 49 4C 45 20 |E TAKEN TO FILE |
00000170: 44 45 46 49 4E 49 54 49 4F 4E 20 28 53 45 45 20 |DEFINITION (SEE |
00000180: 42 45 4C 4F 57 29 2E 20 D9 4F 55 20 4D 41 59 20 |BELOW). .OU MAY |
00000190: 43 48 4F 4F 53 45 20 55 50 20 54 4F 20 4E 49 4E |CHOOSE UP TO NIN|
000001A0: 45 20 46 49 4C 45 53 20 46 52 4F 4D 20 54 48 45 |E FILES FROM THE|
000001B0: 20 4C 49 53 54 20 20 20 44 49 53 50 4C 41 59 45 | LIST DISPLAYE|
000001C0: 44 20 4F 52 20 59 4F 55 20 4D 41 59 20 44 45 46 |D OR YOU MAY DEF|
000001D0: 49 4E 45 20 4E 45 57 20 46 49 4C 45 53 20 54 4F |INE NEW FILES TO|
000001E0: 42 45 20 41 44 44 45 44 20 54 4F 20 54 48 45 20 |BE ADDED TO THE |
000001F0: 4C 49 53 54 20 42 45 46 4F 52 45 20 53 45 4C 45 |LIST BEFORE SELE|
00000200: 43 54 49 4F 4E 2E 20 20 CF 4E 43 45 20 54 48 45 |CTION. .NCE THE|
00000210: 20 46 49 4C 45 53 20 48 41 56 45 20 42 45 45 4E | FILES HAVE BEEN|
00000220: 20 53 45 4C 45 43 54 45 44 20 59 4F 55 20 20 20 | SELECTED YOU |
00000230: 57 49 4C 4C 20 4D 4F 56 45 20 4F 4E 20 54 4F 20 |WILL MOVE ON TO |
00000240: 54 48 45 20 C6 4C 4F 57 43 48 41 52 54 20 C3 52 |THE .LOWCHART .R|
00000250: 45 41 54 49 4F 4E 20 CD 45 4E 55 2E 20 20 20 20 |EATION .ENU. |
00000260: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000280: CF 50 54 49 4F 4E 53 20 32 20 26 20 33 20 28 CD |.PTIONS 2 & 3 (.|
00000290: 4F 44 49 46 59 20 D0 52 4F 47 52 41 4D 20 41 4E |ODIFY .ROGRAM AN|
000002A0: 44 20 CD 4F 44 49 46 59 C6 49 4C 45 29 20 41 52 |D .ODIFY.ILE) AR|
000002B0: 45 20 53 45 4C 46 20 45 58 50 4C 41 4E 41 54 4F |E SELF EXPLANATO|
000002C0: 52 59 2E 20 D4 48 45 59 20 41 4C 4C 4F 57 20 20 |RY. .HEY ALLOW |
000002D0: 59 4F 55 20 54 4F 20 4D 41 4B 45 20 43 48 41 4E |YOU TO MAKE CHAN|
000002E0: 47 45 53 20 54 4F 20 45 41 52 4C 49 45 52 20 57 |GES TO EARLIER W|
000002F0: 4F 52 4B 2E 20 C9 4E 20 54 48 45 20 43 41 53 45 |ORK. .N THE CASE|
00000300: 20 4F 46 20 CD 4F 44 49 46 59 20 C6 49 4C 45 20 | OF .ODIFY .ILE |
00000310: 59 4F 55 20 57 49 4C 4C 20 41 4C 53 4F 20 42 45 |YOU WILL ALSO BE|
00000320: 41 42 4C 45 20 54 4F 20 4D 4F 44 49 46 59 20 54 |ABLE TO MODIFY T|
00000330: 48 45 20 41 43 54 55 41 4C 20 44 41 54 41 20 46 |HE ACTUAL DATA F|
00000340: 49 4C 45 2E 20 20 20 20 20 20 20 20 20 20 20 20 |ILE. |
00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000360: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000370: CF 50 54 49 4F 4E 20 34 20 28 C4 45 46 49 4E 45 |.PTION 4 (.EFINE|
00000380: 20 C6 49 4C 45 53 29 20 49 53 20 55 53 45 44 20 | .ILES) IS USED |
00000390: 54 4F 20 54 45 4C 4C 20 D4 48 45 20 CC 41 53 54 |TO TELL .HE .AST|
000003A0: 20 CF 4E 45 20 54 48 45 20 53 54 52 55 43 54 55 | .NE THE STRUCTU|
000003B0: 52 45 20 4F 46 20 54 48 45 20 46 49 4C 45 2E 20 |RE OF THE FILE. |
000003C0: D9 4F 55 20 57 49 4C 4C 20 42 45 20 41 53 4B 45 |.OU WILL BE ASKE|
000003D0: 44 20 46 4F 52 20 41 20 55 4E 49 51 55 45 20 4E |D FOR A UNIQUE N|
000003E0: 41 4D 45 20 46 4F 52 20 54 48 45 20 46 49 4C 45 |AME FOR THE FILE|
000003F0: 20 41 4E 44 20 54 48 45 20 4E 55 4D 42 45 52 20 | AND THE NUMBER |
00000400: 4F 46 20 46 49 45 4C 44 53 20 49 4E 20 41 20 20 |OF FIELDS IN A |
00000410: 52 45 43 4F 52 44 2E 20 C1 20 46 49 4C 45 20 49 |RECORD. . FILE I|
00000420: 53 20 41 20 53 45 52 49 45 53 20 4F 46 20 52 45 |S A SERIES OF RE|
00000430: 43 4F 52 44 53 20 20 20 45 41 43 48 20 4F 46 20 |CORDS EACH OF |
00000440: 54 48 45 20 53 41 4D 45 20 4F 56 45 52 41 4C 4C |THE SAME OVERALL|
00000450: 20 53 49 5A 45 20 41 4E 44 20 45 41 43 48 20 20 | SIZE AND EACH |
00000460: 43 4F 4E 54 41 49 4E 49 4E 47 20 54 48 45 20 53 |CONTAINING THE S|
00000470: 41 4D 45 20 4E 55 4D 42 45 52 20 4F 46 20 46 49 |AME NUMBER OF FI|
00000480: 45 4C 44 53 2E 20 20 20 C6 49 4C 45 53 20 4E 4F |ELDS. .ILES NO|
00000490: 54 20 43 52 45 41 54 45 44 20 54 48 52 4F 55 47 |T CREATED THROUG|
000004A0: 48 20 41 20 50 52 4F 47 52 41 4D 20 54 48 41 54 |H A PROGRAM THAT|
000004B0: 57 41 53 20 57 52 49 54 54 45 4E 20 42 59 20 D4 |WAS WRITTEN BY .|
000004C0: 48 45 20 CC 41 53 54 20 CF 4E 45 20 4D 41 59 20 |HE .AST .NE MAY |
000004D0: 42 45 20 55 53 45 44 20 49 46 20 54 48 45 59 20 |BE USED IF THEY |
000004E0: 43 4F 4E 46 4F 52 4D 20 54 4F 20 54 48 45 53 45 |CONFORM TO THESE|
000004F0: 20 53 50 45 43 49 46 49 43 41 54 49 4F 4E 53 2D | SPECIFICATIONS-|
00000500: 31 2D D2 45 43 4F 52 44 20 23 31 20 4D 55 53 54 |1-.ECORD #1 MUST|
00000510: 20 43 4F 4E 54 41 49 4E 20 54 48 45 20 43 48 41 | CONTAIN THE CHA|
00000520: 52 41 43 54 45 52 20 20 27 23 27 46 4F 4C 4C 4F |RACTER '#'FOLLO|
00000530: 57 45 44 20 42 59 20 54 48 45 20 4E 55 4D 42 45 |WED BY THE NUMBE|
00000540: 52 20 4F 46 20 52 45 43 4F 52 44 53 20 49 4E 20 |R OF RECORDS IN |
00000550: 54 48 45 20 46 49 4C 45 20 46 52 4F 4D 20 52 45 |THE FILE FROM RE|
00000560: 43 4F 52 44 20 23 32 20 4F 4E 2E 20 20 20 20 20 |CORD #2 ON. |
00000570: 20 20 20 20 20 20 20 20 32 2D C5 41 43 48 20 52 | 2-.ACH R|
00000580: 45 43 4F 52 44 20 4D 55 53 54 20 48 41 56 45 20 |ECORD MUST HAVE |
00000590: 4C 45 53 53 20 54 48 41 4E 20 39 39 20 20 20 20 |LESS THAN 99 |
000005A0: 46 49 45 4C 44 53 20 41 4E 44 20 41 20 4D 41 58 |FIELDS AND A MAX|
000005B0: 49 4D 55 4D 20 53 49 5A 45 20 4F 46 20 32 35 34 |IMUM SIZE OF 254|
000005C0: 20 43 48 41 52 41 43 2D 54 45 52 53 2E 20 20 20 | CHARAC-TERS. |
000005D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000005F0: 33 2D C5 41 43 48 20 46 49 45 4C 44 20 4D 55 53 |3-.ACH FIELD MUS|
00000600: 54 20 42 45 20 53 45 50 41 52 41 54 45 44 20 42 |T BE SEPARATED B|
00000610: 59 20 54 48 45 20 20 20 27 D2 45 54 55 52 4E 27 |Y THE '.ETURN'|
00000620: 20 43 4F 44 45 20 5B 43 48 52 24 28 31 33 29 5D | CODE [CHR$(13)]|
00000630: 20 41 4E 44 20 45 41 43 48 20 52 45 43 4F 52 44 | AND EACH RECORD|
00000640: 4D 55 53 54 20 42 45 20 54 45 52 4D 49 4E 41 54 |MUST BE TERMINAT|
00000650: 45 44 20 42 59 20 54 48 45 20 53 41 4D 45 20 43 |ED BY THE SAME C|
00000660: 48 41 52 41 43 54 45 52 34 2D C1 4E 59 20 4E 55 |HARACTER4-.NY NU|
00000670: 4C 4C 20 28 45 4D 50 54 59 29 20 46 49 45 4C 44 |LL (EMPTY) FIELD|
00000680: 53 20 4D 55 53 54 20 43 4F 4E 54 41 49 4E 20 20 |S MUST CONTAIN |
00000690: 49 4E 53 54 45 41 44 20 41 20 53 49 4E 47 4C 45 |INSTEAD A SINGLE|
000006A0: 20 43 48 41 52 41 43 54 45 52 20 5B 43 48 52 24 | CHARACTER [CHR$|
000006B0: 28 32 32 34 29 5D 2E 20 20 20 20 20 20 20 20 20 |(224)]. |
000006C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000006E0: CF 50 54 49 4F 4E 20 35 20 28 C5 4E 51 55 49 52 |.PTION 5 (.NQUIR|
000006F0: 59 29 20 41 4C 4C 4F 57 53 20 59 4F 55 20 54 4F |Y) ALLOWS YOU TO|
00000700: 20 43 48 45 43 4B 20 20 54 48 52 4F 55 47 48 20 | CHECK THROUGH |
00000710: 41 4C 4C 20 54 48 45 20 49 4E 46 4F 52 4D 41 54 |ALL THE INFORMAT|
00000720: 49 4F 4E 20 41 43 43 55 4D 55 4C 41 54 45 44 20 |ION ACCUMULATED |
00000730: 42 59 20 59 4F 55 52 20 43 55 52 52 45 4E 54 20 |BY YOUR CURRENT |
00000740: 57 4F 52 4B 49 4E 47 20 43 4F 50 59 2E 20 CC 49 |WORKING COPY. .I|
00000750: 53 54 53 20 41 4E 44 20 44 49 53 50 4C 41 59 53 |STS AND DISPLAYS|
00000760: 20 4F 46 20 46 4C 4F 57 43 48 41 52 54 53 2C 20 | OF FLOWCHARTS, |
00000770: 46 49 4C 45 53 20 41 4E 44 20 4F 54 48 45 52 20 |FILES AND OTHER |
00000780: 55 53 45 46 55 4C 20 44 41 54 41 20 41 52 45 20 |USEFUL DATA ARE |
00000790: 4F 55 54 50 55 54 20 54 4F 20 54 48 45 20 53 43 |OUTPUT TO THE SC|
000007A0: 52 45 45 4E 20 4F 52 20 54 48 45 20 50 52 49 4E |REEN OR THE PRIN|
000007B0: 54 45 52 2E 20 20 20 20 20 20 20 20 20 20 20 20 |TER. |
000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007F0: 20 20 20 20 20 20 20 20 CF 50 54 49 4F 4E 20 36 | .PTION 6|
00000800: 20 28 D2 45 53 55 4D 45 29 20 41 4C 4C 4F 57 53 | (.ESUME) ALLOWS|
00000810: 20 59 4F 55 20 54 4F 20 54 41 4B 45 20 55 50 20 | YOU TO TAKE UP |
00000820: 54 48 45 20 51 55 45 53 54 49 4F 4E 20 41 4E 44 |THE QUESTION AND|
00000830: 20 41 4E 53 57 45 52 20 50 48 41 53 45 20 4F 46 | ANSWER PHASE OF|
00000840: 20 50 52 4F 47 52 41 4D 43 52 45 41 54 49 4F 4E | PROGRAMCREATION|
00000850: 20 41 46 54 45 52 20 41 20 42 52 45 41 4B 2E 20 | AFTER A BREAK. |
00000860: C9 54 20 41 4C 53 4F 20 41 4C 4C 4F 57 53 20 20 |.T ALSO ALLOWS |
00000870: 46 4F 52 20 54 48 4F 53 45 20 49 4E 4F 50 50 4F |FOR THOSE INOPPO|
00000880: 52 54 55 4E 45 20 4D 4F 4D 45 4E 54 53 20 4F 46 |RTUNE MOMENTS OF|
00000890: 20 50 4F 57 45 52 20 20 46 41 49 4C 55 52 45 20 | POWER FAILURE |
000008A0: 4F 52 20 48 41 52 44 57 41 52 45 20 46 41 55 4C |OR HARDWARE FAUL|
000008B0: 54 53 2E 20 20 20 20 20 20 20 20 20 20 20 20 20 |TS. |
000008C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000008E0: 20 20 20 20 20 20 20 20 CF 50 54 49 4F 4E 20 37 | .PTION 7|
000008F0: 20 28 D0 52 49 4E 54 45 52 20 D3 50 45 43 49 46 | (.RINTER .PECIF|
00000900: 49 43 41 54 49 4F 4E 29 20 41 4C 4C 4F 57 53 20 |ICATION) ALLOWS |
00000910: 59 4F 55 20 54 4F 20 54 45 4C 4C 20 D4 48 45 20 |YOU TO TELL .HE |
00000920: CC 41 53 54 20 CF 4E 45 20 57 48 45 54 48 45 52 |.AST .NE WHETHER|
00000930: 20 59 4F 55 20 41 52 45 55 53 49 4E 47 20 41 20 | YOU AREUSING A |
00000940: 50 52 49 4E 54 45 52 20 4F 52 20 4E 4F 54 2C 20 |PRINTER OR NOT, |
00000950: 41 4E 44 20 49 46 20 53 4F 20 54 48 45 20 20 20 |AND IF SO THE |
00000960: 54 59 50 45 20 41 4E 44 20 57 48 45 54 48 45 52 |TYPE AND WHETHER|
00000970: 20 D4 48 45 20 CC 41 53 54 20 CF 4E 45 20 53 48 | .HE .AST .NE SH|
00000980: 4F 55 4C 44 20 20 20 20 47 45 4E 45 52 41 54 45 |OULD GENERATE|
00000990: 20 4C 49 4E 45 2D 46 45 45 44 53 20 41 55 54 4F | LINE-FEEDS AUTO|
000009A0: 4D 41 54 49 43 41 4C 4C 59 2E 20 20 20 20 20 20 |MATICALLY. |
000009B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000009D0: 20 20 20 20 20 20 20 20 CF 50 54 49 4F 4E 20 38 | .PTION 8|
000009E0: 20 28 D2 45 54 55 52 4E 20 54 4F 20 C2 C1 D3 C9 | (.ETURN TO ....|
000009F0: C3 29 20 52 45 53 45 54 53 20 54 48 45 20 20 20 |.) RESETS THE |
00000A00: 43 4F 4D 50 55 54 45 52 20 54 4F 20 49 54 53 20 |COMPUTER TO ITS |
00000A10: 53 57 49 54 43 48 2D 4F 4E 20 53 54 41 54 45 2E |SWITCH-ON STATE.|
00000A20: 85 FF 0D |... |
THE MAIN DISPERSAL MENU
-----------------------
OPTION 1 (CREATE PROGRAM) IS THE MAIN
ONE USED FOR WRITING ACTUAL PROGRAMS.
YOU WILL BE ASKED FOR A UNIQUE NAME FOR
THE PROGRAM AND WHETHER FILES ARE NEEDED
FOR IT. IF FILES ARE KNOWN TO TO THE
CURRENT WORKING COPY THESE WILL BE SHOWN
ON THE SCREEN. IF NOT YOU WILL BE TAKEN
TO FILE DEFINITION (SEE BELOW). YOU MAY
CHOOSE UP TO NINE FILES FROM THE LIST
DISPLAYED OR YOU MAY DEFINE NEW FILES TO
BE ADDED TO THE LIST BEFORE SELECTION.
ONCE THE FILES HAVE BEEN SELECTED YOU
WILL MOVE ON TO THE FLOWCHART CREATION M
ENU.
OPTIONS 2 & 3 (MODIFY PROGRAM AND MODIFY
FILE) ARE SELF EXPLANATORY. THEY ALLOW
YOU TO MAKE CHANGES TO EARLIER WORK. IN
THE CASE OF MODIFY FILE YOU WILL ALSO BE
ABLE TO MODIFY THE ACTUAL DATA FILE.
OPTION 4 (DEFINE FILES) IS USED TO TELL
THE LAST ONE THE STRUCTURE OF THE FILE.
YOU WILL BE ASKED FOR A UNIQUE NAME FOR
THE FILE AND THE NUMBER OF FIELDS IN A
RECORD. A FILE IS A SERIES OF RECORDS
EACH OF THE SAME OVERALL SIZE AND EACH
CONTAINING THE SAME NUMBER OF FIELDS.
FILES NOT CREATED THROUGH A PROGRAM THAT
WAS WRITTEN BY THE LAST ONE MAY BE USED
IF THEY CONFORM TO THESE SPECIFICATIONS-
1-RECORD #1 MUST CONTAIN THE CHARACTER
'#'FOLLOWED BY THE NUMBER OF RECORDS IN
THE FILE FROM RECORD #2 ON.
2-EACH RECORD MUST HAVE LESS THAN 99
FIELDS AND A MAXIMUM SIZE OF 254 CHARAC-
TERS.
3-EACH FIELD MUST BE SEPARATED BY THE
'RETURN' CODE [CHR$(13)] AND EACH RECORD
MUST BE TERMINATED BY THE SAME CHARACTER
4-ANY NULL (EMPTY) FIELDS MUST CONTAIN
INSTEAD A SINGLE CHARACTER [CHR$(224)].
OPTION 5 (ENQUIRY) ALLOWS YOU TO CHECK
THROUGH ALL THE INFORMATION ACCUMULATED
BY YOUR CURRENT WORKING COPY. LISTS AND
DISPLAYS OF FLOWCHARTS, FILES AND OTHER
USEFUL DATA ARE OUTPUT TO THE SCREEN OR
THE PRINTER.
OPTION 6 (RESUME) ALLOWS YOU TO TAKE UP
THE QUESTION AND ANSWER PHASE OF PROGRAM
CREATION AFTER A BREAK. IT ALSO ALLOWS
FOR THOSE INOPPORTUNE MOMENTS OF POWER
FAILURE OR HARDWARE FAULTS.
OPTION 7 (PRINTER SPECIFICATION) ALLOWS
YOU TO TELL THE LAST ONE WHETHER YOU ARE
USING A PRINTER OR NOT, AND IF SO THE
TYPE AND WHETHER THE LAST ONE SHOULD
GENERATE LINE-FEEDS AUTOMATICALLY.
OPTION 8 (RETURN TO BASIC) RESETS THE
COMPUTER TO ITS SWITCH-ON STATE....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL