01SeCOLTALUMTAACLINCLOLULUMDSTARDELAF  MULTICOLOR GRAPHICS 0 SCREEN GENERATOR  Copyright 1983by Richard J. Kalagher6-A6-%@$;@,2 B< >:A%,F-@#P-@Z  Line No. d n-@ x  Ҡ #Ap6-@-@@-@"-@%  6-@$ -@@  BLACK to WHITE-@@  > 0 2 4 6 8 10 12 14 <-@@ NEGATIVE LINE NO. = SAVE"-@@, A 6  LINE NUMBER@J BO!@#A T-@@^ BACKGROUND COLORh Ar|!@A -@@  A@ BACKGROUND LUMINANCE!! )!@A -@@" CHARACTER LUMINANCE A!! )!@A %@$% %" B0-@@"@-@  & 0 A: 0-GreyD 1-GoldN2-OrangeX 3-Redb 4-Pinkl5-Violetv 6-Blue 7-Blue8-Light Blue9-Blue-Green 10-Aqua11-Green-Blue12-Green13-Yellow-Green14-Orange-Green15-Orange0uOOSUBROUTINE TO LOAD MACHINE CODE, SET INTERRUPT BITS, AND ENABLE THE DLI'S1uU. >:A%,INITIALIZING... PLEASE WAITUYOU CAN REMOVE THIS LINE IF YOU WANT5u7 #Bp!-@%"3Ad%7 :u6-A6-%@$u6-?:A,Du""TELL ANTIC WHERE DLI CODE ISNuAA(XuA@buNOW SET INTERRUPT BITSlu%%6-F:A`,%AV$F:Aa,vu-%@%@(uA0u u%%SET INTERRUPT BIT ON FIRST LINEu%@AuENABLE DLIuBBAu >:A%,u!!HANDLE LINE 0 AS BACKGROUNDuAF:,uA F:,u$u''72,138,72,174,156,6,189,176,6,141u((10,212,141,24,208,189,200,6,141,23u))208,238,156,6,104,170,104,64,11,104u&&169,7,160,168,162,6,32,92,228,96v''169,1,141,156,6,76,98,228,148,148 v--148,148,148,148,148,148,148,148,148,148v--148,148,148,148,148,148,148,148,148,148 v%%148,148,10,10,10,10,10,10,10,10*v##10,10,10,10,10,10,10,10,10,104v10,10,10,10,10,10,0,0,0,0y!!ROUTINE TO SAVE OBJECT CODEy BCLEAR TRAPS"y >:A%,,y)) !PLEASE DON'T PRESS ANY KEYS UNTIL6y$$ SCREEN OPERATION IS COMPLETE@y-@A Jy >:A%,Ty-@@^y6-Bphy-@ ry  DATA |y-@ y F:Ad%$@%,y@  ,y y y6-%@y y CONTy-@yAB@&yAB@y >:A%,y2 2 &DO YOU WANT TO SAVE THIS CUSTOM SCREENyB:,"B0z7@<@,0Y z TURN OFF COLORS DURING I/OzBB@dz  DISK OR CASSETTEz&z$$7@<@,4CB+z;@,6.D:0z  ENTER A FILE NAME:z