;:LDGRFX.BA loads GRAFIX.CO w/optionsf:(c) 1989, R. H. Pigford, Newark, DE :Loader style learned from DIRACC.BA:by S. Burgoyne & H. Ferreyra 35ڣZ1Z:@193,(229Z);:A$:A$""30:]#:"Loader for "(27)"p GRAFIX.CO "(27)"q (2800 bytes).":@44,(171)" 1989 R. H. Pigford, Newark, DE"("<1> load just below HIMEM."-"<2> load at ANY address."2"<3> QUIT."٤730:X(A$):X1X355:X65,75,60ߤ<AAD:256,AD2800:SAF"Loading under old HIMEM.":907K"Start Address ";SAUP SA32768SA60150ͱ:35gU 256,SA:SAZ"Loading from "SA"to"SA2800_D$"0123456789ABCDEF"dMSAiASA: J 1 59ޥn LN$: I1 (LN$) 2sC1((1,D$,(LN$,I,1))1)16xC2(1,D$,(LN$,I1,1))1T} A,C1C2:AA1:I:MM((LN$)2):@270,M;:25: J{:poke in adjusted CALL addresses C(118),R(118):@310,"ADJUSTING"; I1 118¦ C(I),R(I)HI((SAR(I))256):LO(SAR(I))HI256 (SAC(I)),LO: (SAC(I)1),HI25:I9:poke in buffer zeros@310,(9," ");: X1 1920: (SA879X),0:25:MM1:@270,M;:X::adjust optional featuresLF$"Y":L24:N$"GRAFIX": "Toggle "(27)"p GRAFIX.CO "(27)"q options then save.",@40,"CODE now loaded:"SA" - "(SA2800)d@80,"<1> Send Linefeed with CR (Y/N)..":@115,LF$@120,"<2> Value for Linespacing..........":@154,LѨ:@200,"<3> Create "(27)"p "N$".CO "(27)"q"; 30:A(A$):A1A3195:A 215,235,250#:toggle LF or NO LF decision=LF$"Y"LF$"N":230WLF$"N"LF$"Y":230`195:line incrememt value for printer:"Check your printer manual.":" Epson uses 24":" Gemini 10x uses 16":" Diconix (DIP #5 = 0) uses 24":" HP Quietjet (DIP #5 up) uses 24"M"Value for line spacing increment";L:185u:POKE values of options then SAVE LF$"N" 260 : 265 ISA788 (SA7884): I,0:IӪ :poke linespacing value (SA744),L :save and return to main menuw:::"Write down these addresses! Then edit":"lines 800-820 of "(27)"p SKETCH.BA "(27)"q to agree."ë"GF# ="SA:"PF# ="SA379:"BS# ="SA880:"BE# ="SA2800:"FZ# ="SA112""Any key to SAVEM "(34)N$(34);:30'M N$,SA,SA28001,SA ,61:hex vals assembled from GRAFIX.DO\6 "3E01320000210801CD0000CD3AE121; "0000CDA211CD0000CDE80FFE50CA00@ "00FE53CA0000FE51CA0000C30000CDάE "00001E38CD0000C91B704752414649J "581B7120AB524850203C503E72696EO "74203C533E617665202E2E3C513E75@T "697400CD00001E38CD00003E003200fY "00210101C300002200003E05320000^ "11000915C8D5CD000011F0002A0000c "19220000D17BC6085FC30000B7CD42حh "72CA0000CDE80FC9210801CD7C42CDm "5D42C9CD0000210000CDA211CD0000$r "FE31FA0000FE33CA0000FE35F20000Jw "D630320000CD0000210000CDA211CDp| "0000FE31FA0000FE35F20000D63032 "0000CD0000CD00001E38CD00002101 "01CD0000DA0000CD0000E53A0000A7⮋ "CA0000FE01CA0000FE02CA0000FE04 "CA0000E12C3E09BDCA00002601C300. "005072696E7420484549474854206DT "756C7469706C653F203C312C322C34z "3E005072696E74205749445448206D "756C7469706C653F203C312C322C33Ư "2C343E003A0000471103002100007E쯮 "B8CA000019C30000237E320000237E "320000C90101000001F00002E001038 "D00204C003CD00001EF02100007ECD^ "0000DA0000231DC20000CD0000C300 "0006021680CD00001EF02100000E00 "7EA2C400007A0F577EA2C400007A0Fа "577EA2C400007A0F577EA2C400007A "0707075779CD0000DA0000231DC200 "00CD0000160805C20000C3000079F6B "C04FC979F6304FC979F60C4FC979F6h "034FC906041680CD00001EF0210000 "0E007EA2C400007A0F577EA2C40000 "7A075779CD0000DA0000231DC20000ڱ "CD00007A0F0F5705C20000C3000079 "F6F04FC979F60F4FC9CD0000CD4942& "CD7C42F5CD0000F1E5CD0000E1243EL "29BCC20000CD4E42C906800E001600r "2A00000C79FE09C8E57EA0C20000CA "0000C1D1E123147AFEF0C20000780F  "471CC30000D5C5CD4C74C30000D5C5 "CD4D74C3000021EBFF2C7E2FCD0000  "E5CD0000E17DFEF1C20000C92A00000 "7723220000C9471E080E00CD000079V! "C978CD0000780F4779074F1D7BC200|& "00C9E601C40000C979F6804FC93E1B+ "CD3F6D3E33CD3F6D3E18CD3F6DC93Eȳ0 "1BCD3F6D3E4CCD3F6D3A0000CD3F6D5 "3A0000CD3F6DC93E1BCD3F6D3E32CD: "3F6DC93E0DCD3F6D3E0ACD3F6DC9A7:? "C5E521000046E1CD3F6D05CA0000C3`D "0000C1C93EFF00000000003DC8C300I "00E1CD2942CD2942C300003A0000A7N "CA0000CD0000CD2942CD4E42C30000ҴS "CD2942CD2942C9E53A0000A7CA0000X "210000220000E1C90000]:adjust absolute addresses5b 3,379,9,579,12,158,15,53,21,147[g 29,168,34,93,39,44,42,20,45,862~l 50,609,94,862,99,609,104,379q 110,247,113,878,118,379,127,609ʵv 133,878,137,878,145,123,152,147{ 169,158,172,286,178,147,183,177 188,177,193,177,198,379,201,158< 204,317,210,147,215,209,220,209b 225,380,228,349,231,862,236,609 242,733,245,836,248,579,252,379 256,273,261,395,266,421,271,513Զ 279,836,284,247,350,380,357,383 362,368,366,359,371,381,376,382  396,749,401,880,405,794,408,826F 413,403,416,783,419,273,426,749l 431,880,438,493,446,498,454,503 462,508,471,794,474,826,479,433 482,783,488,425,491,273,518,749޷ 523,880,530,569,538,574,545,794 548,826,553,525,556,783,564,517* 567,273,580,862,590,814,595,666P 603,585,616,878,627,650,630,658v 641,623,648,613,656,632,664,632 673,696,677,687,684,669,688,878¸ 693,878,702,706,708,722,719,706 725,728,760,381,766,382,798,380  807,812,810,802,824,816,834,00 837,379,841,855,844,772,853,0V 864,379,868,876,871,880,874,878