ij:BUFFERJSRDHANSMESSAGEPART1PART2PART3FNBAUTORUNADDBUFHBUFLDCCOLOUCHOICLUASCCOLUM $$##############################$$# DESCRIPTIVE AUTOBOOT #$$# by #$$# Peter Kirton #$$# -------------------------- #$$# NEW ATARI USER - APRIL '91 #$$############################## 11;A(,;@,;@,;@6, GG;@P,;@!,;@x,;@,;@,;AP,467@,. %67A(,. 467@,. AAR@#@@--@@")67<,.>:,- (104,32,83,228,96- AP A/))󠱭Ԡ10 (} (0(Changing pointers in Sector #1.2/ 6-C:,6-P:'AV,/6-&+$AV,<S6-Ah#%@@7%@@E%@S%@FI%@@+%@@?%@I APKW#67@<@,.>:,C67@ <@ ,.>:@,W%@@P/(%(Writing the new Sector #1./ APU467@,. %67A(,. 467@,.Z+%@@+%@_$($(Creating a new Sector #3.d5 #A!-@@p%"167,.>:,5 i467B:,%@,.467B:,%@,.>:AU,n 67@$<@$,.>:B:,,p?6-@@&B:,%6-P:'@,?67@8<@8,.>:,s67@)<@),.>:,x%(%(Writing the new Sector #3. AP Ap6-?:C:,,$AR@4 (} (((4( Modification complete+( (+( Disk will boot with A'-@&+P:B:,'@,,@ A(>:@4,>:@4,"("( displayed( (AR"@'AR@'AdAU7-@@#7(宮 F:Ad,"AUAAdAU Aήӛ,( (,(Generating AUTORUN.SYS file..., #A1--@@P")67<,.>:,- 6%%67@<@,.>:@2%,@B67@,.>:,367@!,.>:,B67@,.EC#67@<@,.>:@6,C67@<@,.>:@&,JF-@B:,B67@%<@%,.>:@:7<,,&@2,F O--@@x")67<,.>:,- T-@B:,Y6-@:7<,,^[[67@2%<@2%,.>:&+@2$++!@1,*+ @,,,%+@d$+ @2,,,c h67@<@,.>:,1 6.67B:,%@,.167B:,%@,.((((Writing the AUTORUN.SYS file.9@9@@ D:AUTORUN.SYS-@B:,6-@:7<,,*@ @, (} (,( Your disk now contains an((( AUTORUN.SYS file which will boot( and will display ( 4 6. no message(6-@-@("("(while  is loading.&1 (} (1( This program will allow you to((( display a message such as a disk++(#title while the disk is booting. It$$(gives you the opportunity to(personalise your disks.*(*( An extra option allows you to$--(%AUTOBOOT a BASIC program, and to have.&&(a second message, for example,8--(%'Loading Program Name....', displayedB%%(while the program is loading.L"( ("( Your choices are:-V+(+( 1. Message on boot-up only`''( 2. Autoboot BASIC programj.-@@!*(Enter choice.. .t0 )!@&(>:AS,0 A0~$Ԡ0 (}-@@0(ԠM-@@;(!Enter your message (36 chars max)MAN-@@>($____________________________________N36 underlines+-@@+A@dG-@B:,!7<,4_$'=6.7@<&@,G A  ;-@@7(Enter screen colour [0 to 15];0 )!@&(>:AS,0 A =-@@9(Enter screen luminance [0 to 4]=0 )!@&(>:AS,0 A06-$@%$KAR@(}(!($(K(" INSERT FORMATTED DISK IN DRIVE 1)()( Press when ready... F:B2y,@AeAR$$$Ԡ> (}-@@>(Ԡ.-@@.(,( (,(Enter name of BASIC program to#,( AUTOBOOT.... (AR,(A-@@$7<,4::6.7%@< if no message7A<?(/($____________________________________?36 underlinesA+-@@+A@dC.7@<@,4_$6. . A`FG-@B:,!7<,4_$'=6.7@<&@,G A`K P' 6-B:,'6-P:+@@&,'@,U6-A %Z$wԠx@@162,0,169,11,157,66,3,169,70,157,68,3,169,8,157,69,3,169,0<<157,73,3,169,31,157,72,3,169,0,141,198,2,169,10,133,84PP169,5,133,85,169,1,141,240,2,32,86,228,169,0,133,84,169,0,141,240,2,169,20##141,7,7,169,7,141,8,7,76,20,7ήӠ??255,255,0,6,136,6,160,158,162,32,142,197,2,142,23,208,142==240,2,189,28,6,145,88,136,202,16,247,169,13,141,74,3,962256,29,53,51,50,8,17,22,16,17,9,26,50,53,46,277104,141,65,0,168,170,145,88,200,192,129,144,4,189BB97,6,232,192,158,208,241,169,12,141,74,3,169,10,141,197,2,96CC0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0''0,0,0,0,0,0,0,0,0,226,2,227,2,0,6D:AUTOBOOT.BAS