Notes

Disk info for 03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk:

File Name: riag_009_03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First/03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk
Disk Name: DISK VOLUME #254
Physical Size (bytes): 143360
Free Space (bytes): 53504
Used Space (bytes): 89856
Physical Size (KB): 140
Free Space (KB): 52
Used Space (KB): 87
Archive Order: DOS
Disk Format: DOS 3.3
Total Sectors: 560
Free Sectors: 209
Used Sectors: 351
Tracks On Disk: 35
Sectors On Disk: 16

Disk directory for 03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk:

riag_009_03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First/03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk DISK VOLUME #254
* A 010 HELLO
* B 034 C.PIC3
* A 007 TEXT FILE MENU
* A 014 APPLE II/40 COL.
* A 014 APPLE II/80 COL.
* A 014 APPLE IIE/40 COL.
* A 014 APPLE IIE/80 COL.
* A 014 TEXT FILE/PAPER PRINTOUT
* T 022 II/IIE DIFFERENCES
* T 038 APPLE SERVICE POLICIES
* T 008 LEVEL 2 SERVICE CENTERS
* T 022 APPLE COMMUNICATIONS
* T 077 DOS FILES
* T 011 FAMILY SIG INFO
DOS 3.3 format; 53,504 bytes free; 89,856 bytes used.

Text found in 03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk/HELLO.bas:

1 TEXT : HOME
2 HGR2
4 PRINT "BLOAD C.PIC3"
8 FOR T = 1 TO 5000: NEXT T: TEXT
9 TEXT : HOME
10 INVERSE : PRINT "-->";: NORMAL : PRINT " THE COMPILER - INFORMATION ";: INVERSE : PRINT "<--": NORMAL : PRINT : POKE 34,2
25 PRINT "THE COMPILER WILL BE BRINGING TO YOU,"
28 PRINT
30 PRINT "VARIOUS ARTICLES FROM THE MANY NEWS"
35 PRINT
40 PRINT "LETTERS PUBLISHED BY THE APPLE USER"
45 PRINT
50 PRINT "GROUPS. THE ARTICLES WILL COVER A WIDE"
55 PRINT
60 PRINT "RANGE OF SUBJECTS, THAT SHOULD BE OF"
65 PRINT
70 PRINT "INTEREST TO BOTH THE NOVICE & EXPERT"
75 PRINT
80 PRINT "APPLE USER."
85 PRINT
90 PRINT
100 PRINT "THE FILES ON THE DISK ARE ALL STANDARD"
105 PRINT
110 PRINT "TEXT FILES, THAT CAN BE READ BY MOST OF"
115 PRINT
120 PRINT "THE WORD PROCESSING PROGRAMS.": GOSUB 999
125 HOME
130 PRINT : PRINT "I HOPE THAT THIS WILL BE HELPFUL TO"
135 PRINT
140 PRINT "THE MANY USER GROUP NEWSLETTER EDITORS,"
145 PRINT
150 PRINT "THAT NEED MATERIAL (IF YOU DO NOT USE"
155 PRINT
160 PRINT "AN ARTICLE IN THE NEWS LETTER, YOU CAN"
165 PRINT
170 PRINT "LEAVE IT ON THE DISK, SO THE MEMBERSHIP"
175 PRINT
180 PRINT "CAN BENEFIT FROM THE INFORMATION).": GOSUB 999
185 HOME : PRINT
190 PRINT "FOR THE GROUPS WITH NO NEWSLETTER, HERE"
195 PRINT
200 PRINT "IS SOME MATERIAL IN AN EASY-TO-USE FORM"
205 PRINT
210 PRINT "TO GET YOU STARTED. IF ALL GOES WELL"
215 PRINT
220 PRINT "WE HOPE TO THEN SEE SOME ORIGINAL ARTI-"
225 PRINT
230 PRINT "CLES COMING FROM THE NEW NEWSLETTERS.": GOSUB 999
235 HOME : PRINT
240 PRINT "THE ONLY THING THAT IS ASKED OF YOU"
245 PRINT
250 PRINT "WHEN YOU USE THE ARTICLES, IS THAT YOU"
255 PRINT
260 PRINT "GIVE CREDIT TO THE AUTHOR & USER GROUP"
265 PRINT
270 PRINT "(*USE ALL THE INFORMATION THAT IS FOUND"
275 PRINT
280 PRINT "IN THE FIRST FEW CREDIT LINES*)."
282 PRINT : PRINT : PRINT "ALSO ADD (I.A.C.-TC) TO THE CREDIT LINE": GOSUB 999
290 HOME : PRINT
470 PRINT "IF YOU HAVE ANY COMMENTS OR SUGGESTIONS"
480 PRINT : PRINT "ABOUT THE COMPILER, PLEASE SEND THEM"
490 PRINT : PRINT "TO THE:
500 PRINT : PRINT " INTERNATIONAL APPLE CORE"
510 PRINT " ATTN. JIM SIMPSON, DIRECTOR - WEST"
520 PRINT " 908 GEORGE ST."
530 PRINT " SANTA CLARA, CA 95050"
540 PRINT : PRINT " THANK YOU, AND ENJOY 'THE COMPILER'."
550 PRINT : PRINT : PRINT "P.S. IF YOU DO NOT HAVE A WAY TO READ THE TEXT FILE/S. TRY THE 'TEXT FILE READER/PRINTER' PROGRAM ON THIS DISK."
560 GOSUB 999
600 POKE 34,0
610 PRINT "RUN TEXT FILE MENU"
999 VTAB 24: HTAB 7: PRINT "HIT ";: INVERSE : PRINT "SPACE BAR";: NORMAL : PRINT " TO CONTINUE *"; CHR$(8);: GET A$: PRINT : RETURN

Text found in 03_Compiler_3_from_IAC_Must_Boot_DOS_From_Another_Disc_First.dsk/TEXT FILE MENU.bas:

100 REM ***--READ TEXT FILE MENU--***
110 :
120 :
130 REM **--INITIALIZATION--**
140 D$ = CHR$(4): REM CONTROL D
150 HOME : TEXT
155 HT = 8
160 VTAB 2
170 :
180 :
190 :
200 REM **--MENU--**
210 HTAB HT +3
215 INVERSE
220 PRINT "READ FILE MENU"
225 NORMAL
230 PRINT : PRINT
255 HTAB HT
260 PRINT "1. APPLE II/40 COL."
270 PRINT
275 HTAB HT
280 PRINT "2. APPLE II/80 COL."
290 PRINT
295 HTAB HT
300 PRINT "3. APPLE II/40 COL. W/L.C."
305 HTAB HT
308 PRINT " APPLE IIE/40 COL."
310 PRINT
315 HTAB HT
320 PRINT "4. APPLE IIE/80 COL."
330 PRINT
335 HTAB HT
340 PRINT "5. PAPER PRINTOUT"
342 PRINT
344 HTAB HT
346 PRINT "6. CATALOG"
347 PRINT : HTAB HT
348 PRINT "7. END"
350 PRINT : PRINT
360 HTAB HT
370 PRINT "WHICH NUMBER? ";
380 INPUT "(1-7) ";NB
390 :
400 :
410 REM **--CHECK INPUT--**
420 IF NB <1 OR NB >7 THEN PRINT : HTAB HT: INVERSE : PRINT "INCORRECT CHOICE": NORMAL : PRINT : GOTO 160
430 :
440 IF NB = 1 THEN 1000
450 IF NB = 2 THEN 2000
460 IF NB = 3 THEN 3000
470 IF NB = 4 THEN 4000
480 IF NB = 5 THEN 5000
485 IF NB = 6 THEN 6000
487 IF NB = 7 THEN HOME : VTAB 5: INVERSE : PRINT "SEE YOU NEXT TIME!": NORMAL : END
490 :
500 :
510 :
1000 REM **--APPLE II/40 COL.--**
1020 PRINT D$;"RUN APPLE II/40 COL."
1980 :
1990 :
2000 REM **--APPLE II/80 COL.--**
2020 PRINT D$;"RUN APPLE II/80 COL."
2980 :
2990 :
3000 REM **--APPLE IIE/40 COL.--**
3010 PRINT D$;"RUN APPLE IIE/40 COL."
3980 :
3990 :
4000 REM **--APPLE IIE/80 COL.--**
4010 PRINT D$;"RUN APPLE IIE/80 COL."
4980 :
4990 :
5000 REM **--PAPER PRINTOUT--**
5010 PRINT D$;"RUN TEXT FILE/PAPER PRINTOUT"
5980 :
5990 :
6000 REM **--LIST OF FILES--**
6005 HOME
6010 PRINT D$;"CATALOG"
6020 PRINT
6030 PRINT "PRESS THE ";: INVERSE : PRINT "RETURN";: NORMAL : PRINT " KEY TO CONTINUE ";: INPUT "";L$
6040 GOTO 150
9998 :
9999 :
10000 REM READ TEXT FILE SYSTEM
10100 REM COPYRIGHT APRIL 1983
11000 REM DAVID H. MILLER
12000 REM AEN
13000 REM 9525 LUCERNE
14000 REM VENTURA CA. 93004
15000 REM 805-647-1063