Home » Personal collection » Acorn hard disk » apps » Printers » 153/!Printers/!RunImage
153/!Printers/!RunImage
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn hard disk » apps » Printers |
Filename: | 153/!Printers/!RunImage |
Read OK: | ✔ |
File size: | 19650 bytes |
Load address: | 0000 |
Exec address: | 0000 |
Duplicates
There is 1 duplicate copy of this file in the archive:
- Personal collection » Acorn ADFS disks » Greaseweazled » adfs_1.6M_Impression.adf » !Printers/!RunImage
- Personal collection » Acorn hard disk » apps » Printers » 153/!Printers/!RunImage
File contents
5REM>squished.RunImage 10ONERRORERROREXTERR,REPORT$ 15SYS263872:DIMA%84,A%!16 256,V%256,aa%256,O%512,q%1024,X%256,ba%256:DIMa%(4):PROCaa("Printers:Messages",A%!12):ONERRORPROC_(A%!12):ERROREXTERR,REPORT$ 20PROCba:PROCca(FNmsg_0(A%!12,"ID")):PROCda:PROCea:PROCfa:PROCga:PROCha:PROCia:CALLP%+8:PROCja:PROCka:PROCla:SYS263873:ONERRORPROCma 25IFca%THEN 30$(q%+44)=aa$:?(q%+44+LEN(aa$))=0:PROCO 35ENDIF 40REPEAT:PROCv(A%!20):UNTIL0:END 45DEFPROCv(da%):LOCALr%,t%,z%:r%=FNaa(da%):CASEr%OF 50WHEN0:PROCna:PROCoa 55WHEN1:PROCpa 60WHEN2:SYS262341,,q% 65WHEN3:PROCe 70WHEN6:PROCqa 75WHEN7:IFea%THEN 80PROCra 85ELSE:PROCw(W%,7,q%) 90ENDIF 95WHEN8:PROCsa 100WHEN9:PROCta 105WHEN13:!(q%!0)=0:PROCua 110WHEN17,18:PROCva(r%) 115WHEN19:PROCwa 120OTHERWISE:PROCw(W%,r%,q%) 125ENDCASE 130fa%=-1:z%=A%!48:WHILEz%:t%=z%!56:IFNOTt%THEN 135IFfa%=-1fa%=t%ELSEIFt%<fa%fa%=t% 140ENDIF 145z%=z%!0:ENDWHILE:CASEga%OF 150WHEN1:fa%+=500:ga%=2 155WHEN2:PROCxa:ga%=0 160ENDCASE 165ENDPROC 170DEFPROCka:LOCALk$:q%!0=24:q%!12=0:q%!16=524611:q%!20=34:SYS262375,18,q%:ha%=q%!8:PROCya:PROCza:PROCAa:PROC` (-1):k$="<Printers$Dir>":IFia%THEN 175k$+=".Remote":SYS131080,8,k$:k$+=".ID"+h$:SYS131080,8,k$ 180ENDIF 185k$+=".":SYS36,"PrinterChoices$Path",k$,LENk$,0,0:PROCBa("Printers:PaperRO",2):PROCBa("PrinterChoices:PaperRW",1):IFja%=0ERROR253,FNmsg_0(A%!12,"FAK") 190PROCCa:fa%=-1:SYS66TOka%:PROCDa:ENDPROC 195DEFPROCya:A%!20=12589105:la%=12589427:ma%=12589361:ENDPROC 200DEFPROCba:LOCALh%,l%,a%,w%:SYS131080,8,"<Printers$Dir>":h%=OPENIN"Printers:Code":l%=EXT#h%:SYS41,21,h%TO,a%,w%:CLOSE#h%:IF(w%AND255)=46THEN 205P%=a% 210ELSE:DIMP%l%+1:SYS8,16,"Printers:Code",P% 215ENDIF 220Z%=P%+64:Y%=P%+68:ENDPROC 225DEFPROCAa:LOCALna%,oa%:SYS16TOna%:SYS73,"/g,quit/s,/g,pdf/s,/g",na%,O%,256:IFO%!12=0THEN 230ca%=0 235ELSE:ca%=-1 240ENDIF 245aa$="":na%=O%!16:IFna%<>0THEN 250oa%=!na%AND65535:na%+=2:WHILEoa%:aa$+=CHR$(?na%):na%+=1:oa%-=1:ENDWHILE 255ENDIF 260ENDPROC 265DEFPROCza:c=1814.4*72000/(180<<8):d=72000:pa%=44:qa%=0:ra%=0:sa%=0:ta%=0:ua%=0:va%=0:A%!48=0:A%!44=0:W%=0:wa%=0:J$="":xa%=0:ya%=0:za%=0:Aa%=0:A%!24=0:A%!28=0:g$="null:":Ba%=0:Ca%=0:A%!32=0:ba$="":A%!36=0:Da%=0:Fa%=0:ja%=0:Ga%=0:Ha%=0 270SYS6,204,,255TO,Ia%:K$="":ca$="":A%!76=0:A%!80=0:Ja%=0:Ka%=0:La%=0:Ma%=0:h$="":Na%=0:q$="":L$="":M$="":Oa%=0:Pa%=0:ga%=0:ia%=0:ENDPROC 275DEFPROCia:LOCALc%,d%,Qa%,Ra%,Sa%,Ta%,Ua%:LOCALa$():DIMa$(255):Sa%=0:Ta%=0:Va%=0:Wa%=0:Xa%=0:Za%=0:c%=-1:REPEAT:PROCFa(k$,U$,c$,c%):IFc$<>""THEN 280SYS8,17,"Printers:"+c$+".Resources.Support"TOd%,,Qa%,,Ra%:IFd%=1AND(Qa%AND-1048576)=-1048576THEN 285Ra%=Ra%+3ANDNOT3:CASE(Qa%AND1048320)>>8OF 290WHEN4091:IFRa%>Sa%Sa%=Ra% 295IFVa%<255a$(Va%)=c$ 300Va%+=1 305WHEN4092:Ta%+=Ra%:Wa%+=1 310ENDCASE 315ENDIF 320ENDIF 325UNTILc$="":IFWa%>0DIMb%(Wa%-1),b$(Wa%-1) 330Ua%=HIMEM+Ta%+Sa%+16*1024:END=Ua% 335IF(HIMEM+Ta%+Sa%+16*1024)<Ua%THEN 340Ua%=Ua%/1024:Ua%=Ua%-Ua%MOD8+8:ERROR253,FNmsg_1(A%!12,"FA4",STR$Ua%) 345ENDIF 350IFVa%>0THEN 355DIMc$(Va%-1):FORd%=0TOVa%-1:c$(d%)="Printers:"+a$(d%)+".Resources.Support":NEXT:OVERLAYc$() 360ENDIF 365ENDPROC 370DEFPROCFa(RETURNk$,RETURNU$,RETURNc$,RETURN_a%):LOCALi%,`a%,ab%:IF_a%=-1k$=FNtask_read_env("Printers$Path",ba%) 375REPEAT:IF_a%=-1THEN 380IFk$=""THEN 385c$="":ENDPROC 390ENDIF 395i%=INSTR(k$,","):IFi%=0i%=LENk$+1 400U$=LEFT$(k$,i%-1):IFRIGHT$(U$)="."U$=LEFT$(U$) 405U$+=CHR$0:k$=MID$(k$,i%+1):_a%=0 410ENDIF 415SYS131084,10,U$,ba%,1,_a%,256,"*"TO,,,`a%,_a%;ab%:IF(ab%AND1)`a%=0 420IF`a%=1THEN 425IFba%!16=2THEN 430i%=ba%+20:CALLZ%,i%,c$:ENDPROC 435ENDIF 440ELSE:_a%=-1 445ENDIF 450UNTIL0:ENDPROC 455DEFPROCGa(c$):LOCALQa%,Ra%,f$:f$="Printers:"+c$+".Resources.Support":SYS8,17,f$TOd%,,Qa%,,Ra%:Ra%=Ra%+3ANDNOT3:IFd%<>1SYS8,19,f$,d% 460IF(Qa%AND-1048576)<>-1048576ERROR254,FNmsg_1("FA3",c$) 465CASE(Qa%AND1048320)>>8OF 470WHEN4091 475WHEN4092:IFZa%<Wa%THEN 480DIMu%Ra%:b%(Za%)=u%:b$(Za%)=c$:SYS8,16,f$,u%:Za%+=1 485ENDIF 490OTHERWISE:ERROR254,FNmsg_1("FA3",c$) 495ENDCASE 500ENDPROC 505DEFPROCHa(c$,RETURNbb%):LOCALd%,Qa%,f$,h%,cb%,db%,H%:LOCALeb%:SYS131080,8,"PrinterChoices:"+c$:f$="Printers:"+c$+".Resources.Support":SYS8,17,f$TOd%,,Qa%:IFd%<>1SYS8,19,f$,d% 510IF(Qa%AND-1048576)<>-1048576ERROR254,FNmsg_1("FA3",c$) 515B%=1347769168:C%=60:bb%=USR(P%+12):IFbb%=0ERROR253,FNmsg_1(A%!12,"FA5","PSUP") 520CASE(Qa%AND1048320)>>8OF 525WHEN4091:bb%!24=1 530WHEN4092:bb%!24=0 535OTHERWISE:B%=1347769168:C%=bb%:CALLP%+16:ERROR254,FNmsg_1(A%!12,"FA3",c$) 540ENDCASE 545bb%!0=0:$q%=c$:B%=q%:C%=2:bb%!4=USR(P%+28):bb%!8=0:bb%!12=0:SYS8,17,FNh(bb%,"Resources.!Sprites")TOd%:IFd%=1THEN 550SYS131077,"IconSprites "+FNh(bb%,"Resources.!Sprites")TOC%;d%:IF(d%AND1)!C%=253:SYS43,C% 555ENDIF 560SYS8,17,FNh(bb%,"Resources.Messages")TOd%:IFd%=1THEN 565PROCaa(FNh(bb%,"Resources.Messages"),d%):bb%!16=d% 570ELSE:bb%!16=0 575ENDIF 580SYS8,17,FNh(bb%,"Resources.Templates")TOd%:IFd%<>1ERROR254,FNmsg_1(A%!12,"FA2",c$) 585PROCIa(FNh(bb%,"Resources.Templates"),FNh(bb%,"Resources.Template3D")):d%=0:db%=bb%+20:REPEAT:PROCJa("",d%,c$):IFd%THEN 590PROCl("",c$,1,h%):B%=1145981271:C%=16+1+LENc$:cb%=USR(P%+12):IFcb%=0ERROR253,FNmsg_1(A%!12,"FA5","WIND") 595cb%!0=0:cb%!4=h%:cb%!8=0:cb%!12=0:$(cb%+16)=c$:!db%=cb%:db%=cb%+0 600ENDIF 605UNTILd%=0:PROCKa:PROCc(bb%,0,-1,0):IFNOTFNl(FNh(bb%,"Template"))ERROR254,FNmsg_1(A%!12,"OK1a",$bb%!4) 610PROCLa(bb%):PROCm:IFia%THEN 615IFNOTFNl(FNQ(bb%,h$,"PrData"))THEN 620f$="<Printers$Dir>"+".Remote.ID"+h$+"."+$bb%!4:SYS131080,8,f$:f$="<Printers$Dir>"+".Remote.ID"+h$+"."+$bb%!4+".PrData":d%=OPENOUT(f$):IFd%=0THEN 625ERROR254,FNmsg_1(A%!12,"OK1",$bb%!4) 630ELSE:eb%=bb%!8:WHILEeb%:BPUT#d%,$(eb%+12)+":":BPUT#d%,"#":eb%=eb%!0:ENDWHILE:CLOSE#d%:SYS8,18,f$,4038:IFNOTFNl(FNQ(bb%,h$,"PrData"))ERROR254,FNmsg_1(A%!12,"OK1",$bb%!4) 635ENDIF 640ENDIF 645ELSE:IFNOTFNl(FNh(bb%,"PrData"))ERROR254,FNmsg_1(A%!12,"OK1",$bb%!4) 650ENDIF 655PROCMa(bb%):PROCm:PROCBa(FNh(bb%,"Resources.PaperRO"),0):IFua%THEN 660H%=ua%:WHILEH%!0:H%=H%!0:ENDWHILE:H%!0=bb% 665ELSE:ua%=bb% 670ENDIF 675ENDPROC 680DEFPROCNa:LOCALz%,H%,t%:fa%=-1:z%=A%!48:WHILEz%:H%=z%!4:IFH%!24AND8THEN 685t%=10*H%?(24+1):IFfa%=-1fa%=t%ELSEIFt%<fa%fa%=t% 690z%!56=t% 695ELSE:z%!56=-1 700ENDIF 705z%=z%!0:ENDWHILE:SYS66TOka%:ENDPROC 710DEFFNx:LOCALda$,f%,fb%,s$:LOCALz%,H%,c$:da$=FNtask_read_env("Wimp$ScrapDir",ba%):IFda$="":=0 715IFda$<>ca$THEN 720SYS131080,8,"<Wimp$ScrapDir>.Printers"TOfb%;f%:IF(f%AND1)THEN 725fb%+=4:CALLZ%,fb%,s$:PROCb(FNmsg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) 730ELSE:ca$=da$:IFJa%THEN 735SYS131080,8,"<Wimp$ScrapDir>.Printers.RemQueue"TOfb%;f%:IF(f%AND1)=0SYS131080,8,"<Wimp$ScrapDir>.Printers.RemSpool"TOfb%;f% 740IF(f%AND1)THEN 745fb%+=4:CALLZ%,fb%,s$:PROCb(FNmsg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) 750ENDIF 755ENDIF 760z%=A%!48:WHILEz%:IFz%!24AND(1<<16)THEN 765IF(z%!40=0)THEN 770H%=z%!4:c$=$(H%!4) 775ELSE:c$=$(z%!40) 780ENDIF 785PROCOa (z%) 790ENDIF 795z%=z%!0:ENDWHILE 800ENDIF 805ENDIF 810=-1 815DEFPROCDa:LOCALc%,d%,s$,J%,c$,H%,gb%,t%,hb%,ib%,jb%,kb%:LOCALab%,lb%,S%,mb%,nb%,ob%,i$,z%,pb%,qb%,ea$,p%,rb%,s$,sb%:LOCALnb%,tb%:ub%=FNs(FNmsg_0(A%!12,"NNE"),"s"+FNmsg_0(A%!12,"IC"),-5,251658240):vb%=-1:IFia%THEN 820s$="<Printers$Dir>"+".Remote.ID"+h$+".Settings":SYS8,17,s$TOc% 825ELSE:SYS8,17,"<Printers$Dir>"+".Settings"TOc% 830ENDIF 835IFc%=1THEN 840IFia%THEN 845IFNOTFNl (s$)ERROR254,FNmsg_0(A%!12,"OKD") 850ELSE:IFNOTFNl("<Printers$Dir>"+".Settings")ERROR254,FNmsg_0(A%!12,"OKD") 855ENDIF 860J%=FNb("fv:"):IFJ%=0THEN 865PROCj(FNmsg_0(A%!12,"OKV"),1) 870ELSE:IFFNc($J%)<>1THEN 875PROCj(FNmsg_0(A%!12,"OKV"),1) 880ELSE:PROCP:REPEAT:J%=FNb("cl:"):PROCPa:ab%=0:lb%=FNb("fg:"):IFlb%THEN 885ab%=FNc ($lb%) 890ENDIF 895hb%=FNb("sn:"):IFhb%c$=$hb%ELSEc$="" 900PROCQa:IF(J%>0)AND((ab%AND(1<<17))=0)AND(lb%>0)THEN 905d%=INSTR($J%,":"):IFd%=0d%=LEN$J%+1 910s$=MID$($J%,d%+1):$J%=LEFT$($J%,d%-1):H%=ua%:ib%=0:WHILEH%ANDNOTib%:IF$H%!4=$J%ib%=-1 915IFNOTib%H%=H%!0 920ENDWHILE:IFNOTib%THEN 925PROCRa:PROCGa($J%):PROCHa($J%,H%):PROCSa:ib%=-1 930ENDIF 935IFNOTib%THEN 940hb%=FNb("nm:"):IFhb%c$=$hb%ELSEc$="" 945PROCb(FNmsg_2(A%!12,"WA1",$J%,c$)) 950ELSE:PROCTa(H%) 955ENDIF 960ENDIF 965UNTILJ%=0:PROCQ:REPEAT:J%=FNb("cl:"):nb%=!wb%:tb%=xb%:PROCP:ab%=0:lb%=FNb("fg:"):IFlb%THEN 970ab%=FNc ($lb%) 975ENDIF 980lb%=FNb("pn:"):IFlb%i$=$lb%ELSEi$="" 985hb%=FNb("sn:"):IFhb%c$=$hb%ELSEc$="" 990PROCQ:IF(J%>0)AND((ab%AND(1<<17))>0)AND(lb%>0)THEN 995mb%=0:S%=Ka%:WHILES%ANDNOTmb%:IFc$=$S%!4THEN 1000mb%=-1 1005ELSE:S%=S%!0 1010ENDIF 1015ENDWHILE:IFNOTmb%ORNOTJa%THEN 1020p%=INSTR($J%,":"):IFp%=0THEN 1025p%=LEN$J% 1030ENDIF 1035PROCUa (c$,MID$($t%,1,p%-1)," ") 1040ELSE:IFab%AND1THEN 1045PROCP:z%=FNy (S%,ab%,-1,0,kb%):PROCQ:PROCP:!wb%=nb%:xb%=tb%:PROCVa (z%):PROCQ:PROCWa (Ka%,$S%!4):IFab%AND2THEN 1050z%!24=z%!24OR2 1055ELSE:z%!24=z%!24ANDNOT2 1060ENDIF 1065d%=ja%:WHILEd%:IF$d%!4=i$THEN 1070z%!36=d%:d%=0 1075ELSE:d%=d%!0:IFd%=0THEN 1080d%=ja%:z%!36=d%:PROCb(FNG(A%!12,"WA11",i$,$d%!4,c$)):d%=0 1085ENDIF 1090ENDIF 1095ENDWHILE 1100ENDIF 1105ENDIF 1110ENDIF 1115UNTILJ%=0 1120ENDIF 1125ENDIF 1130PROCm 1135ENDIF 1140PROCw(A%!48,-5,0):rb%=0:z%=A%!48:WHILEz%:IFz%!24AND2THEN 1145rb%=-1:jb%=z%:z%=0 1150ELSE:z%=z%!0 1155ENDIF 1160ENDWHILE:z%=A%!48:IF(NOTrb%)AND(z%)THEN 1165PROCselect_printer (z%,-1,0) 1170ELSE:IFrb%ANDjb%THEN 1175PROCselect_printer (jb%,-1,0) 1180ENDIF 1185ENDIF 1190ENDPROC 1195DEFPROCTa(H%):LOCALJ%,R%,z%,d%,N%,h%,X$,yb%:J%=FNe("nm:"):X$=$J%:IFH%!44>100THEN 1200PROCb(FNmsg_1(A%!12,"WA7",X$)):ENDPROC 1205ENDIF 1210yb%=H%!12:R%=yb%!4:WHILER%>0:IF$R%!8=X$THEN 1215R%!(R%!4*4+8)+=1:R%=-1 1220ELSE:R%=R%!0 1225ENDIF 1230ENDWHILE:IFR%=0THEN 1235PROCb(FNmsg_1(A%!12,"WA8",X$)):ENDPROC 1240ENDIF 1245B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR253,FNmsg_1(A%!12,"FA5","PRNT") 1250B%=J%:C%=2:z%!8=USR(P%+28):z%!0=0:z%!4=H%:IFH%!24AND8z%!56=10*H%?(24+1)ELSEz%!56=-1 1255IFH%!24AND4THEN 1260h%=FNc($FNe("cn:")):B%=1413697091:C%=h%*4:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 1265z%!12=N%:IF0<=h%-1THEN 1270FORd%=0TOh%-1:J%=FNd:IFJ%THEN 1275T%=FNa(J%,"nl:"):IFT%THEN 1280N%!(d%*4)=0 1285ELSE:T%=FNa(J%,"in:"):IFT%THEN 1290N%!(d%*4)=FNstore_integer(FNc($T%)) 1295ELSE:T%=FNa(J%,"st:"):IFT%THEN 1300B%=T%:C%=2:gb%!(d%*4)=USR(P%+28) 1305ELSE:T%=FNa(J%,"s0:"):IFT%THEN 1310B%=T%:C%=3:gb%!(d%*4)=USR(P%+28) 1315ELSE:T%=FNa(J%,"gs:"):IFT%THEN 1320B%=T%:C%=4:gb%!(d%*4)=USR(P%+28) 1325ELSE:T%=FNa(J%,"pt:"):IFT%THEN 1330B%=1381257040:C%=4:N%!(d%*4)=USR(P%+12):IFN%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 1335!N%!(d%*4)=FNH($T%,0) 1340ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 1345ENDIF 1350ENDIF 1355ENDIF 1360ENDIF 1365ENDIF 1370ENDIF 1375ENDIF 1380NEXT 1385ENDIF 1390ELSE:B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 1395z%!12=N%:N%!0=FNc($FNe("ct:")):N%!4=FNc($FNe("bd:")):IFNOTFNRAND(N%?4>15)THEN 1400PROCj(FNmsg_1(A%!12,"OKAM",FNmsg_0(A%!12,"BR"+STR$(N%?4))),1):N%?4=0 1405ENDIF 1410N%!8=FNc($FNe("ft:")):C%=2:B%=FNe("et:"):N%!12=USR(P%+28):B%=FNe("fl:"):N%!16=USR(P%+28):B%=FNe("ns:"):N%!20=USR(P%+28):B%=FNe("np:"):N%!24=USR(P%+28):B%=FNe("nu:"):N%!28=USR(P%+28):B%=FNe("no:"):N%!32=USR(P%+28):J%=FNb("cf:"):IFJ%THEN 1415N%?6=FNc($J%) 1420ELSE:N%?6=0 1425ENDIF 1430CASEN%!0OF 1435WHEN4:IFNOTFNtTHEN 1440N%!0=0:PROCb(FNmsg_2(A%!12,"WA9",$z%!8,FNmsg_0(A%!12,"CN4"))) 1445ENDIF 1450WHEN6:IFNOTFNzTHEN 1455N%!0=0:PROCb(FNmsg_2(A%!12,"WA9",$z%!8,FNmsg_0(A%!12,"CN6"))) 1460ENDIF 1465ENDCASE 1470ENDIF 1475h%=FNc($FNe("cs:")):B%=1195789891:C%=h%*4:gb%=USR(P%+12):IFgb%=0ERROR253,FNmsg_1(A%!12,"FA5","CNFG") 1480z%!16=gb%:IF0<=h%-1THEN 1485FORd%=0TOh%-1:J%=FNd:IFJ%THEN 1490T%=FNa(J%,"nl:"):IFT%THEN 1495gb%!(d%*4)=0 1500ELSE:T%=FNa(J%,"in:"):IFT%THEN 1505gb%!(d%*4)=FNstore_integer(FNc($T%)) 1510ELSE:T%=FNa(J%,"st:"):IFT%THEN 1515B%=T%:C%=2:gb%!(d%*4)=USR(P%+28) 1520ELSE:T%=FNa(J%,"s0:"):IFT%THEN 1525B%=T%:C%=3:gb%!(d%*4)=USR(P%+28) 1530ELSE:T%=FNa(J%,"gs:"):IFT%THEN 1535B%=T%:C%=4:gb%!(d%*4)=USR(P%+28) 1540ELSE:T%=FNa(J%,"pt:"):IFT%THEN 1545B%=1381257040:C%=4:gb%!(d%*4)=USR(P%+12):IFgb%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 1550!gb%!(d%*4)=FNH($T%,0) 1555ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 1560ENDIF 1565ENDIF 1570ENDIF 1575ENDIF 1580ENDIF 1585ENDIF 1590ENDIF 1595NEXT 1600ENDIF 1605z%!20=-1:z%!24=FNc($FNe("fg:")):z%!28=-1:z%!32=0:J%=FNe("pn:"):d%=ja%:WHILEd%:IF$d%!4=$J%THEN 1610z%!36=d%:d%=0 1615ELSE:d%=d%!0:IFd%=0THEN 1620d%=ja%:z%!36=d%:PROCb(FNG(A%!12,"WA11",$J%,$d%!4,X$)):d%=0 1625ENDIF 1630ENDIF 1635ENDWHILE:C%=2:B%=FNe("sn:"):z%!40=USR(P%+28):B%=FNe("ic:"):z%!44=USR(P%+28):IFH%!32AND4z%!48=FNIELSEz%!48=0 1640z%!52=0:IFz%!24AND1THEN 1645PROCXa(z%):IFz%!24AND2THEN 1650PROCselect_printer(z%,-1,0) 1655ENDIF 1660ENDIF 1665IFz%!24AND(1<<16)ANDJa%THEN 1670PROCOa (z%) 1675ENDIF 1680d%=A%+48:WHILE!d%:d%=!d%+0:ENDWHILE:!d%=z%:va%+=1:PROCNa:ENDPROC 1685DEFFNe(fa$):LOCALJ%:J%=FNb(fa$):IFJ%=0PROCR(FNmsg_1(A%!12,"OKG",fa$)) 1690=J% 1695DEFPROCR(e$):PROCS(FNmsg_1(A%!12,"OKE",e$)):ENDPROC 1700DEFFNh(H%,s$):="Printers:"+$H%!4+"."+s$ 1705DEFFNA(h%):LOCALp%:IFh%=-2THEN=-1 1710IFh%=zb%THEN=-1 1715IFh%=Ab%THEN=-1 1720IFh%=Bb%THEN=-1 1725IFh%=Cb%THEN=-1 1730IFh%=Db%THEN=-1 1735IFh%=A%!40THEN=-1 1740IFh%=Q%THEN=-1 1745IFh%=Fb%THEN=-1 1750IFh%=Gb%THEN=-1 1755p%=A%!48:WHILEp%:IFp%!48=h%THEN=-1 1760p%=p%!0:ENDWHILE:=0 1765DEFPROCCa:LOCALi%,ga$,ha$,Hb%,Ib%,Jb%,Kb%,j%:PROCIa("Printers:Templates","Printers:Template3D"):PROCl("","info",1,Gb%):PROCl("","prntctrl",1,Fb%):PROCl("","connections",1,Q%):PROCl("","queue",1,A%!40):PROCl("","query",1,Db%) 1770PROCl("","papersize",1,Cb%):PROCl("","howquery",1,Bb%):PROCl("","shutdown",1,Ab%):PROCl("","save",1,zb%):PROCKa:PROCicon_write(Gb%,3,FNmsg_0(A%!12,"VSN")):FORj%=0TO5:B%=1178878793:C%=40:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","ICDF") 1775!i%=A%!40:i%!4=j%:SYS262350,,i%:SYS262340,,i%:A%!(52+4*j%)=i%+8:NEXT:FORj%=0TO4:B%=1178878793:C%=40:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","ICDF") 1780!i%=Fb%:i%!4=j%:SYS262350,,i%:IFj%=4THEN 1785SYS262340,,i% 1790ELSE:B%=1482184792:C%=i%!36+1:i%!28=USR(P%+12):IFi%!28=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 1795ENDIF 1800a%(j%)=i%+8:NEXT:FORj%=0TO3:a%(j%)!16=a%(4)!16:NEXT:FORj%=0TO3:PROCicon_write(Fb%,j%,FNmsg_0(A%!12,FNicon_read(Fb%,j%))):NEXT:ENDPROC 1805DEFFNba(a,b):IFa>bTHEN=aELSE=b 1810DEFFNI:LOCALp%:PROCIa("Printers:Templates","Printers:Template3D"):PROCl("","pause",1,p%):PROCKa:=p% 1815DEFPROCZa(Lb%):!O%=Lb%:SYS262348,,O%OR1:B%=1179014466:C%=O%!76:CALLP%+16:SYS262339,,O%:ENDPROC 1820DEFPROCpa:LOCALMb%,i%,t$,ia$,z%,H%,Nb%:LOCALS%:CASE!q%OF 1825WHENA%!40:SYS262344,,q%TOMb%:B%=q%:C%=Mb%:CALLP%+36 1830WHENFb%:SYS262344,,q%TOMb%:WHILEMb%:FORi%=0TO3:a%(i%)!4=a%(4)!4:a%(i%)!12=a%(4)!12:NEXT:z%=A%!48:Ob%=0:WHILEz%:Ob%+=1:IFz%!40THEN 1835$a%(0)!20=$z%!40 1840ELSE:?a%(0)!20=13 1845ENDIF 1850$a%(1)!20=$z%!8:t$=STR$!(z%!12+0):ia$=FNmsg_0(A%!12,"IC"+t$):IFia$="IC"+t$ia$=FNmsg_1(A%!12,"ICx",t$) 1855$a%(2)!20=ia$:IFz%!24AND(1<<16)THEN 1860t$="SHA" 1865ELSE:IFz%!24AND1THEN 1870t$="ACT" 1875ELSE:t$="INA" 1880ENDIF 1885ENDIF 1890$a%(3)!20=FNmsg_0(A%!12,t$):FORi%=0TO3:SYS262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):NEXT:z%=z%!0:ENDWHILE:S%=Ka%:WHILES%:$a%(0)!20=$S%!4:$a%(1)!20=$S%!8:$a%(2)!20=FNmsg_0 (A%!12,"IC9"):IFS%!20>0THEN 1895$a%(3)!20=FNmsg_0 (A%!12,"UNA") 1900ELSE:$a%(3)!20=FNmsg_0 (A%!12,"INA") 1905ENDIF 1910FORi%=0TO3:SYS262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):NEXT:S%=S%!0:ENDWHILE:SYS262346,,q%TOMb%:ENDWHILE 1915OTHERWISE:PROCH(!q%,Nb%,H%,z%):PROCc(H%,z%,1,q%) 1920ENDCASE 1925ENDPROC 1930DEFPROC_a(z%):LOCALy%,s$:IFz%!40s$=$z%!40ELSEs$=$z%!8 1935PROC`a(z%!48,FNmsg_1(A%!12,"PAU",s$)):!O%=-2:SYS262347,,O%:y%=O%!4-O%!20:O%!4=z%!20:SYS262350,,O%:y%+=O%!16-680:!O%=z%!48:SYS262347,,O%:O%!12=(O%!12-O%!4)+y%:O%!16=140+240:O%!4=y%:O%!8=O%!16-240:O%!28=-1:SYS262341,,O%:ENDPROC 1940DEFPROCs(Lb%):!O%=24:O%!12=0:O%!16=262347:O%!20=Lb%:SYS262375,17,O%,0:ENDPROC 1945DEFPROCe:LOCALi%,j%,z%,H%,Nb%:PROCs(!q%):IFFNA(!q%)THEN 1950SYS262342,,q% 1955ELSE:PROCH(!q%,Nb%,H%,z%):PROCc(H%,z%,3,q%) 1960ENDIF 1965ENDPROC 1970DEFPROCfree_structure(p%):LOCALi%:IFp%=0ENDPROC 1975CASEp%!-4OF 1980WHEN1146377036:WHILEp%:IF0<=p%!4-1THEN 1985FORi%=0TOp%!4-1:PROCfree_structure(p%!(i%*4+8)):NEXT 1990ENDIF 1995i%=p%!0:B%=1146377036:C%=p%:CALLP%+16:p%=i%:ENDWHILE 2000WHEN1280266050:PROCfree_structure(p%!0):PROCfree_structure(p%!4):B%=1280266050:C%=p%:CALLP%+16 2005WHEN1196707401,1196577875,810701907,1381258055,1381257040:B%=p%!-4:C%=p%:CALLP%+16 2010WHEN1380010051:WHILEp%:i%=!p%:B%=1380010051:C%=p%:CALLP%+16:p%=i%:ENDWHILE 2015OTHERWISE:ERROR253,FNmsg_1(A%!12,"FAA",STR$~(p%-4)) 2020ENDCASE 2025ENDPROC 2030DEFPROCva(r%):LOCALs$,z%,H%,Nb%,Pb%,i%:Pb%=q%!4:CASEq%!16OF 2035WHEN0:PROCI:PROCx 2040WHEN1:PROCab 2045WHEN2:IFNOTq%!36THEN 2050SYS262356,,-1:i%=q%+44:CALLZ%,i%,s$:PROCicon_write(Q%,30,s$) 2055ENDIF 2060WHEN3:PROCbb 2065WHEN5:IFq%!40=4038THEN 2070q%!12=q%!8:q%!16=4:SYS262375,17,q%,Pb%:PROCO 2075ENDIF 2080WHEN8:IFA%!32THEN 2085IF!q%<>20THEN 2090IF(q%!20AND1)=0Qb%=1ELSEQb%=2 2095ELSE:Qb%=1 2100ENDIF 2105q%!12=q%!8:SYS262375,19,q%,Pb%:A%!20=A%!20OR1:PROCcb(Ab%) 2110ENDIF 2115WHEN10:BPUT#q%!20,"/"+FNtask_read_env("Printers$Dir",O%) 2120WHEN11:z%=A%!48:WHILEz%:IF(z%!24AND8)<>0ANDz%<>ra%THEN 2125r%=z%!12:IFr%!0=q%!20ANDq%!24<=0THEN 2130s$=FNmsg_0(A%!12,"INU"):!q%=32+LENs$ANDNOT3:q%!12=q%!8:q%!16=12:$(q%+28)=s$+CHR$0:SYS262375,17,q%,Pb%:z%=0 2135ENDIF 2140ENDIF 2145IFz%z%=z%!0 2150ENDWHILE 2155WHEN12:qa%=2 2160WHEN1282:IFFNA(q%!32)THEN 2165PROCdb 2170ELSE:PROCH(q%!32,Nb%,H%,z%):IFNb%THEN 2175PROCc(H%,z%,r%,q%) 2180ELSE:IFNOTq%!36THEN 2185IFxa%PROCc (xa%!4,xa%,r%,q%)ELSEPROCdb 2190ENDIF 2195ENDIF 2200ENDIF 2205WHEN262345:IFq%!20=Ab%THEN 2210IFA%!32>0A%!20=A%!20ANDNOT1 2215ELSE:PROCeb 2220ENDIF 2225WHEN524609:A%!36=0 2230WHEN524610:IFW%THEN 2235q%!20=-2:q%!24=W%!20:PROCab 2240ELSE:z%=A%!48:IFz%THEN 2245q%!20=1:s$=FNmsg_0(A%!12,"OKU")+CHR$0 2250ELSE:q%!20=2:s$=FNmsg_0(A%!12,"OKW")+CHR$0 2255ENDIF 2260!q%=28+LENs$ANDNOT3:q%!12=q%!8:q%!16=524612:$(q%+24)=s$+CHR$0:SYS262375,17,q%,Pb% 2265ENDIF 2270WHEN524611:IFq%!4<>Rb%THEN 2275IFq%!0=20THEN 2280PROCI:PROCx 2285ELSE:IFq%!12=ha%THEN 2290PROCb(FNmsg_0(A%!12,"FAJ")):PROCI:PROCx 2295ELSE:q%!12=q%!8:q%!20=34:SYS262375,17,q%,Pb% 2300ENDIF 2305ENDIF 2310ENDIF 2315WHEN524614:ta%=2 2320WHEN524626:IFW%THEN 2325PROCselect_printer(W%,-1,0) 2330ENDIF 2335OTHERWISE:IFFNx 2340PROCw(W%,r%,q%) 2345ENDCASE 2350ENDPROC 2355DEFPROCdb:LOCALs$,z%,F$:CASEq%!32OF 2360WHEN-2:IFA%!48=0THEN 2365PROCinteractive_help(FNmsg_0(A%!12,"ICON0")):ENDPROC 2370ENDIF 2375PROCy(q%!36,z%):IFz%!40s$=$z%!40ELSEs$=$z%!8 2380PROCinteractive_help(FNmsg_1(A%!12,"ICON1",s$)) 2385WHENzb%:s$=FNmsg_0(A%!12,"SAVE"+STR$q%!36):IFs$="SAVE"+STR$q%!36s$=FNmsg_0(A%!12,"SAVE") 2390PROCinteractive_help(s$) 2395WHENAb%:s$=FNmsg_0(A%!12,"SHTDWN"+STR$q%!36):IFs$="SHTDWN"+STR$q%!36s$=FNmsg_0(A%!12,"SHTDWN") 2400PROCinteractive_help(s$) 2405WHENBb%:s$=FNmsg_0(A%!12,"HWQRY"+STR$q%!36):IFs$="HWQRY"+STR$q%!36s$=FNmsg_0(A%!12,"HWQRY") 2410PROCinteractive_help(s$) 2415WHENCb%:s$=FNmsg_0(A%!12,"PAPER"+STR$q%!36):IFs$="PAPER"+STR$q%!36s$=FNmsg_0(A%!12,"PAPER") 2420PROCinteractive_help(s$) 2425WHENDb%:s$=FNmsg_0(A%!12,"QUERY"+STR$q%!36):IFs$="QUERY"+STR$q%!36s$=FNmsg_0(A%!12,"QUERY") 2430PROCinteractive_help(s$) 2435WHENA%!40:PROCinteractive_help(FNmsg_0(A%!12,"QUEUE")) 2440WHENQ%:F$="CNCT"+STR$q%!36:IFq%!36=13THEN 2445IFFNicon_set(Q%,13)F$+="b"ELSEF$+="a" 2450ENDIF 2455IFq%!36=35THEN 2460IFFNicon_set(Q%,35)F$+="b"ELSEF$+="a" 2465ENDIF 2470IFq%!36=37THEN 2475IFFNicon_set(Q%,37)F$+="b"ELSEF$+="a" 2480ENDIF 2485s$=FNmsg_0(A%!12,F$):IFs$=F$s$=FNmsg_0(A%!12,"CNCT") 2490PROCinteractive_help(s$) 2495WHENFb%:PROCinteractive_help(FNmsg_0(A%!12,"PRCTRL")) 2500WHENGb%:PROCinteractive_help(FNmsg_0(A%!12,"INFO")) 2505OTHERWISE:SYS262388,1,V%,q%!32,q%!36:CASEJ$OF 2510WHEN"ME1":IF!V%<>2THEN 2515PROCinteractive_help(FNmsg_0(A%!12,"HME1-"+STR$!V%)) 2520ELSE:IFA%!44=0THEN 2525PROCinteractive_help(FNmsg_0(A%!12,"HME1-2a")) 2530ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HME1-2")) 2535ENDIF 2540ENDIF 2545WHEN"ME2","ME3","ME4","ME5","ME6","MP1":PROCinteractive_help(FNmsg_0(A%!12,"H"+J$)) 2550WHEN"MQ1":IFFNJ(Sb%,!V%)THEN 2555IF!V%>3ANDAa%=0THEN 2560PROCinteractive_help(FNmsg_0(A%!12,"SMQ1-7")) 2565ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMQ1-"+STR$(!V%))) 2570ENDIF 2575ELSE:IF!V%<>4THEN 2580PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-"+STR$(!V%))) 2585ELSE:IFAa%!12THEN 2590PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-4a")) 2595ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-4b")) 2600ENDIF 2605ENDIF 2610ENDIF 2615WHEN"MC1":IFFNJ(Sb%,!V%)THEN 2620IF!V%=6THEN 2625PROCinteractive_help(FNmsg_0(A%!12,"SMC1-6")):ENDPROC 2630ENDIF 2635SYS262358,Fb%,O%,1<<21,1<<21:IF!O%=-1THEN 2640PROCinteractive_help(FNmsg_0(A%!12,"SMC1-2")) 2645ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMC1-0")) 2650ENDIF 2655ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMC1-"+STR$!V%)) 2660ENDIF 2665WHEN"MC1s":IFFNJ(Sb%,!V%)THEN 2670IF!V%=7THEN 2675PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-7")):ENDPROC 2680ENDIF 2685IF!V%=2ANDJa%=0THEN 2690PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-2")):ENDPROC 2695ENDIF 2700SYS262358,Fb%,O%,1<<21,1<<21:IF!O%=-1THEN 2705PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-3")) 2710ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-0")) 2715ENDIF 2720ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMC1s-"+STR$!V%)) 2725ENDIF 2730ENDCASE 2735ENDCASE 2740ENDPROC 2745DEFPROCinteractive_help(m$):LOCALPb%:!q%=24+LENm$ANDNOT3:q%!12=q%!8:q%!16=1283:$(q%+20)=m$+CHR$0:Pb%=q%!4:SYS262375,17,q%,Pb%:ENDPROC 2750DEFPROCab:LOCALs$,i%,y%,z%,M%:IFq%!20=A%!40THEN 2755!V%=A%!40:SYS262347,,V%:B%=q%!32-V%!16+V%!24:y%=USR(P%+44):i%=A%!16:z%=!i%:M%=i%!4:IFz%THEN 2760q%!20=-2:q%!24=z%!20 2765ENDIF 2770ELSE:PROCy(q%!24,z%) 2775ENDIF 2780IFq%!20<>-2ERROR254,FNmsg_0(A%!12,"OKN") 2785i%=q%+44:CALLZ%,i%,s$:i%=LENs$:WHILEi%>0:IFMID$(s$,i%,1)="."ORMID$(s$,i%,1)=":"THEN 2790s$=MID$(s$,i%+1):i%=0 2795ENDIF 2800i%-=1:ENDWHILE:ba$=s$:A%!36=0:Da%=q%!4:s$=FNm(-1):IF(z%!32)<>0OR(z%!24AND36)<>0THEN 2805SYS131108,"Printer$Temp",,-1:q%!0=48+LENs$ANDNOT3:q%!12=q%!8:q%!16=2:q%!36=-1:$(q%+44)=s$+CHR$0:SYS262375,17,q%,Da%:Fa%=q%!8 2810ELSE:q%!12=q%!8:SYS262375,19,q%,Da%:PROCselect_printer(z%,0,0):SYS36,"Printer$Temp",s$,LENs$:q%!16=524608:SYS262375,18,q%,Da%:PROCfb (Da%,ba$) 2815ENDIF 2820ENDPROC 2825DEFFNm(Tb%):LOCALc%:IFNOTFNxTHEN 2830IFTb%THEN 2835ERROR254,FNmsg_0(A%!12,"OKAO") 2840ELSE:PROCj(FNmsg_0(A%!12,"OKAO"),1):="" 2845ENDIF 2850ENDIF 2855REPEAT:Ha%+=1:SYS8,17,"<Wimp$ScrapDir>.Printers."+STR$Ha%TOc%:UNTILc%=0:=FNS("<Wimp$ScrapDir>.Printers."+STR$Ha%) 2860DEFPROCbb:LOCALs$,i%,z%,O$,o$,Ub%,Pb%:IFq%!40=4038ANDq%!20=Fb%THEN 2865PROCO:ENDPROC 2870ENDIF 2875i%=q%+44:CALLZ%,i%,o$:SYS8,17,o$TOUb%:IF(Ub%AND2)AND(q%!40<4096)q%!40=4096 2880IFq%!20=A%!40THEN 2885!V%=A%!40:SYS262347,,V%:B%=q%!32-V%!16+V%!24:y%=USR(P%+44):i%=A%!16:z%=!i%:M%=i%!4:IFz%THEN 2890q%!20=-2:q%!24=z%!20 2895ENDIF 2900ENDIF 2905IFq%!20<>-2ERROR254,FNmsg_0(A%!12,"OKN") 2910A%!36=Fa%<>0ANDFa%=q%!12:q%!12=q%!8:q%!16=4:Pb%=q%!4:SYS262375,17,q%,Pb%:Fa%=0:PROCy(q%!24,z%):Ub%=q%!40:IFz%=0THEN 2915IFUb%<>4038ERROR254,FNmsg_0(A%!12,"OKW") 2920PROCO:ENDPROC 2925ENDIF 2930IFA%!36THEN 2935SYS272000,Da%TOi%:CALLZ%,i%,O$:o$=ba$:s$=FNtask_read_env("Printer$Temp",O%):IFs$=""i%=q%+44:CALLZ%,i%,s$ 2940ELSE:i%=q%+44:CALLZ%,i%,s$:i%=LENs$:WHILEMID$(s$,i%,1)<>".":i%-=1:ENDWHILE:o$=MID$(s$,i%+1):i%=1:WHILEMID$(s$,i%,1)<>".":i%+=1:ENDWHILE:O$=LEFT$(s$,i%-1) 2945ENDIF 2950PROCgb(A%!36,O$,s$,o$,z%,Ub%):ENDPROC 2955DEFPROCeb:CASEJ$OF 2960WHEN"MQ1":IFza%THEN 2965IFAa%Aa%?11=Aa%?11ANDNOT8ELSEza%!24=za%!24ANDNOT16 2970PROCf(-1,za%,Aa%):ya%=0:za%=0:Aa%=0 2975ENDIF 2980WHEN"MC1","MC1s":SYS262358,Fb%,O%,1<<21,1<<21:IFNOT!O%ANDO%!4=-1ANDwa%=0PROCicon_deselect(Fb%,!O%) 2985ENDCASE 2990J$="":ENDPROC 2995DEFPROCwa:LOCALs$,z%,M%,N%,Vb%,G$,H%,z$,t%,Qa%,Ra%,Wb%,o$:LOCALC$,z%,mb%,w$,c$,A$:CASEq%!16OF 3000WHEN11:qa%=1 3005WHEN524608:PROCy(q%!24,z%):IFz%=0ERROR254,FNmsg_0(A%!12,"OKW") 3010M%=z%!32:H%=z%!4:N%=z%!12:IFM%=0AND(z%!24AND36)=0THEN 3015i%=q%+44:CALLZ%,i%,o$:CASEN%!0OF 3020WHEN5:Vb%=(N%?6AND2)<>0 3025WHEN9:Vb%=0 3030OTHERWISE:Vb%=(N%?6AND1)<>0 3035ENDCASE 3040IFVb%THEN 3045g$=FNm(-1):IFN%!0=5THEN 3050SYS36,"PrinterType$5",g$,LENg$:PROCJ(5) 3055ELSE:SYS36,"PrinterType$10",g$,LENg$:PROCJ(10) 3060ENDIF 3065G$=g$ 3070ENDIF 3075z$=FNm(-1):SYS36,"Printer$Temp",z$,LENz$:q%!0=20:q%!16=524613:SYS262375,18,q%,Da%:ta%=0:REPEAT:PROCv(la%):UNTILta%:b%=(ta%=2):Wb%=q%!4:IFVb%THEN 3080s$=FNn(z%,-1):IFs$<>""THEN 3085PROCb(s$):IFz%!32THEN 3090z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0) 3095ENDIF 3100ENDIF 3105ENDIF 3110IFb%THEN 3115SYS8,17,z$TOt%,,Qa%,,Ra%:IFt%THEN 3120s$=z$:SYS8,23,z$TO,,,,,,Ub% 3125ELSE:IFVb%THEN 3130IFN%!0=5THEN 3135PROChb($N%!16,G$):ENDPROC 3140ELSE:s$=G$:Ub%=H%!28 3145ENDIF 3150ELSE:IFN%!0=9ANDq$<>""THEN 3155c$=$(z%!40):K%=INSTR(c$," "):WHILEK%:MID$(c$,K%,1)=CHR$160:K%=INSTR(c$," ",K%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Na%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 3160SYS272000,Da%TOi%:CALLZ%,i%,A$:IFFNB (z%,A$,o$)THEN 3165Xb%=W%!4:SYS131113,25,w$,C$ 3170ELSE:SYS131080,6,w$ 3175ENDIF 3180ENDIF 3185ENDIF 3190PROCselect_printer(W%,0,-1):ENDPROC 3195ENDIF 3200ENDIF 3205SYS272000,Wb%TOO$:i%=LENo$:WHILEi%>0:IFMID$(o$,i%,1)="."ORMID$(o$,i%,1)=":"THEN 3210o$=MID$(o$,i%+1):i%=0 3215ENDIF 3220i%-=1:ENDWHILE:PROCgb(-1,O$,s$,o$,z%,Ub%):ENDPROC 3225ENDIF 3230ENDIF 3235PROCselect_printer(z%,0,-1):SYS36,"Printer$Temp",,-1:s$=FNm(-1):q%!0=48+LENs$ANDNOT3:q%!16=2:q%!36=-1:$(q%+44)=s$+CHR$0:SYS262375,17,q%,Da%:Fa%=q%!8 3240WHEN524613:ta%=1 3245OTHERWISE:PROCw(W%,19,q%) 3250ENDCASE 3255ENDPROC 3260DEFPROCx:LOCALH%:LOCALz%,c$,Ub%,c$,Zb%,f%,N%:PROCz:IFW%THEN 3265c$=$W%!40:N%=W%!12:H%=W%!4:Ub%=H%!28:IFN%!0=9THEN 3270SYS424578,0,2,c$,0,0TO,,,,,Zb%;f%:IF(Zb%>0)AND((f%AND0)=0)THEN 3275SYS424323,0,Zb%,c$,Ub% 3280ENDIF 3285ENDIF 3290ENDIF 3295IFJa%THEN 3300z%=A%!48:WHILEz%:IF(z%!24)AND(1<<16)THEN 3305IF(z%!40=0)THEN 3310H%=z%!4:c$=$H%!4 3315ELSE:c$=$z%!40 3320ENDIF 3325PROCib (z%) 3330ENDIF 3335z%=z%!0:ENDWHILE 3340ENDIF 3345SYS131077,"%Wipe <Wimp$ScrapDir>.Printers.* RF~C~V":H%=ua%:WHILEH%:PROC_(H%!16):H%=H%!0:ENDWHILE:PROC_(A%!12):PROCw(0,-2,0):PROCjb:ENDPROC 3350DEFPROCsa:LOCALH%,z%,Nb%,D$,H$,_b%:IFNOTFNA(!q%)THEN 3355PROCH(!q%,Nb%,H%,z%):IFz%!40D$=$z%!40ELSED$="" 3360_b%=W%:PROCc(H%,z%,8,q%):IF$(Nb%+16)="configure"THEN 3365IFz%!40H$=$z%!40ELSEH$="" 3370IFH$<>D$THEN 3375IFNOT(z%!24AND(1<<16))THEN 3380PROCkb(z%):PROCi(z%):PROCf(-1,z%,0):IF(H%!24AND4)=0IFFNi(Q%)PROCT(z%) 3385ELSE:PROCb (FNmsg_0(A%!12,"OKAP")):H$=D$:PROCd (1196577875,z%!40):PROCK (z%!40,D$) 3390ENDIF 3395ENDIF 3400IFz%!20<>-1AND_b%<>W%THEN 3405PROCselect_printer(_b%,-1,0) 3410ENDIF 3415ENDIF 3420ELSE:IFq%!24=13THEN 3425CASE!q%OF 3430WHENQ%:PROClb:IFJ$="ME6"SYS262356,,-1 3435!q%=Q%:PROCe 3440WHENCb%:PROCmb:!q%=Cb%:PROCe 3445WHENzb%:SYS262356,,-1:PROCicon_write(Q%,30,FNT(FNicon_read(zb%,1))) 3450ENDCASE 3455ELSE:SYS262364,q%!24 3460ENDIF 3465ENDIF 3470ENDPROC 3475DEFPROCU(`b%):LOCALi%:!V%=`b%:SYS262348,,V%OR1:i%=V%!88:WHILEi%:PROCicon_deselect(`b%,i%-1):i%-=1:ENDWHILE:ENDPROC 3480DEFPROCqa:LOCALz%,qb%,M%,ac%,H%,Nb%,H$,D$,B%,C%,_b%:LOCALS%:IFFNA(q%!12)=0THEN 3485PROCH(q%!12,Nb%,H%,z%):IFz%!40D$=$z%!40ELSED$="" 3490_b%=W%:PROCc(Nb%!8,Nb%!12,6,q%):IF$(Nb%+16)="configure"THEN 3495IFz%!40H$=$z%!40ELSEH$="" 3500IFH$<>D$THEN 3505IFNOT(z%!24AND(1<<16))THEN 3510PROCkb(z%):PROCi(z%):PROCf(-1,z%,0):IF(H%!24AND4)=0IFFNi(Q%)PROCT(z%) 3515ELSE:PROCb (FNmsg_0(A%!12,"OKAP")):H$=D$:PROCd (1196577875,z%!40):PROCK (z%!40,D$) 3520ENDIF 3525ENDIF 3530IFz%!20<>-1AND_b%<>W%THEN 3535PROCselect_printer(_b%,-1,0) 3540ENDIF 3545ENDIF 3550ELSE:CASEq%!8OF 3555WHEN1024:CASEq%!12OF 3560WHENFb%:IFNOTq%!16THEN 3565IFNOTFNicon_set(q%!12,q%!16)THEN 3570PROCU(q%!12):PROCicon_select(q%!12,q%!16) 3575ENDIF 3580ELSE:PROCU(q%!12) 3585ENDIF 3590ENDCASE 3595WHEN256:CASEq%!12OF 3600WHENFb%:IFNOTq%!16THEN 3605IFFNicon_set(q%!12,q%!16)THEN 3610PROCicon_deselect(q%!12,q%!16) 3615ELSE:PROCicon_select(q%!12,q%!16) 3620ENDIF 3625ENDIF 3630ENDCASE 3635WHEN64:IFq%!12=zb%PROCnb(!q%,q%!4) 3640WHEN2:CASEq%!12OF 3645WHEN-2:PROCg("ME1",-1,0) 3650WHENA%!40:PROCg("MQ1",-1,0) 3655WHENFb%:PROCg("MC1s",-1,0) 3660WHENQ%:CASEq%!16OF 3665WHEN8:PROCg("ME2",-1,-1) 3670WHEN11:PROCg("ME3",-1,-1) 3675WHEN14:PROCg("ME4",-1,-1) 3680WHEN16:PROCg("ME5",-1,-1) 3685WHEN20:PROCg("ME6",-1,-1) 3690WHEN32:PROCg("SVE",-1,-1) 3695ENDCASE 3700WHENCb%:IFq%!16=47PROCg("MP1",-1,-1) 3705ENDCASE 3710WHEN4:CASEq%!12OF 3715WHEN-2:PROCob 3720WHENDb%:sa%=q%!16 3725WHENBb%:sa%=q%!16 3730WHENzb%:IFq%!16=2THEN 3735SYS262356,,-1:PROCicon_write(Q%,30,FNT(FNicon_read(zb%,1))) 3740ENDIF 3745WHENAb%:SYS262356,,-1:IFq%!16=3THEN 3750!q%=A%!40:PROCe:PROCI:CASEQb%OF 3755WHEN1:SYS262364,508 3760WHEN2:PROCx 3765ENDCASE 3770ELSE:A%!20=A%!20ANDNOT1 3775ENDIF 3780WHENFb%:IFNOTq%!16THEN 3785IFNOTFNicon_set(q%!12,q%!16)THEN 3790PROCU(q%!12):PROCicon_select(q%!12,q%!16) 3795ENDIF 3800PROCt(z%,S%,qb%):IFz%THEN 3805PROCc(z%!4,z%,-3,0):PROCpb(z%,"configure") 3810ENDIF 3815ENDIF 3820WHENQ%:CASEq%!16OF 3825WHEN0,1,2,3,4,33:PROCqb 3830WHEN5:PROClb:!q%=Q%:PROCe 3835WHEN8:PROCg("ME2",-1,-1) 3840WHEN11:PROCg("ME3",-1,-1) 3845WHEN14:PROCg("ME4",-1,-1) 3850WHEN16:PROCg("ME5",-1,-1) 3855WHEN20:PROCg("ME6",-1,-1) 3860WHEN32:PROCg("SVE",-1,-1) 3865WHEN38:!q%=Q%:PROCe 3870ENDCASE 3875WHENCb%:CASEq%!16OF 3880WHEN42:PROCmb:!q%=Cb%:PROCe 3885WHEN33:PROCrb:!q%=Cb%:PROCe 3890WHEN48:B%=1163547472:C%=Ga%:CALLP%+16:Ga%=0:!q%=Cb%:PROCe 3895WHEN23,22:PROCicon_select(Cb%,q%!16):PROCsb 3900WHEN47:PROCg("MP1",-1,-1) 3905ENDCASE 3910OTHERWISE:z%=A%!48:WHILEz%:IFz%!48=q%!12THEN 3915M%=z%!32:ac%=M%!44:IFac%THEN 3920IFac%!40THEN 3925IFq%!16=4THEN 3930PROCn(z%,M%,-1) 3935ELSE:z%!24=z%!24ANDNOT36:ac%!40=0:PROCi(z%):PROCf(-1,z%,0):!q%=z%!48:PROCe 3940ENDIF 3945ENDIF 3950ENDIF 3955z%=0 3960ELSE:z%=z%!0 3965ENDIF 3970ENDWHILE 3975ENDCASE 3980WHEN1:CASEq%!12OF 3985WHEN-2:PROCob 3990WHENQ%:CASEq%!16OF 3995WHEN0,1,2,3,4,33:PROCqb 4000WHEN5:PROClb 4005ENDCASE 4010WHENCb%:CASEq%!16OF 4015WHEN42:PROCmb 4020WHEN33:PROCrb 4025WHEN23,22:PROCicon_select(Cb%,q%!16):PROCsb 4030ENDCASE 4035ENDCASE 4040ENDCASE 4045ENDIF 4050ENDPROC 4055DEFPROCqb:LOCALc%,h%,i%,n%:c%=-1:IFFNicon_set(Q%,1)THEN 4060PROCicon_unshade(Q%,15):PROCicon_unshade(Q%,8):PROCicon_unshade(Q%,17):PROCicon_unshade(Q%,11):PROCicon_unshade(Q%,18):PROCicon_unshade(Q%,14):PROCicon_unshade(Q%,19):PROCicon_unshade(Q%,16):PROCicon_unshade(Q%,13) 4065ELSE:PROCicon_shade(Q%,15):PROCicon_shade(Q%,8):PROCicon_shade(Q%,17):PROCicon_shade(Q%,11):PROCicon_shade(Q%,18):PROCicon_shade(Q%,14):PROCicon_shade(Q%,19):PROCicon_shade(Q%,16):PROCicon_shade(Q%,13) 4070ENDIF 4075IFFNicon_set(Q%,2)THEN 4080PROCicon_unshade(Q%,25):PROCicon_unshade(Q%,20):c%=25 4085ELSE:PROCicon_shade(Q%,25):PROCicon_shade(Q%,20) 4090ENDIF 4095IFFNicon_set(Q%,3)THEN 4100PROCicon_unshade(Q%,26):PROCicon_unshade(Q%,27):PROCicon_unshade(Q%,28):PROCicon_unshade(Q%,29):c%=26 4105ELSE:PROCicon_shade(Q%,26):PROCicon_shade(Q%,27):PROCicon_shade(Q%,28):PROCicon_shade(Q%,29) 4110ENDIF 4115IFFNicon_set(Q%,4)THEN 4120PROCicon_unshade(Q%,30):PROCicon_unshade(Q%,32):PROCicon_unshade(Q%,35):c%=30 4125ELSE:PROCicon_shade(Q%,30):PROCicon_shade(Q%,32):PROCicon_shade(Q%,35) 4130ENDIF 4135IFc%=-1THEN 4140PROCcaret_info(h%,i%,n%):IFh%=Q%SYS262354,-1 4145ELSE:PROCcaret_set(Q%,c%) 4150ENDIF 4155ENDPROC 4160DEFPROCy(Lb%,RETURNz%):z%=A%!48:WHILEz%:IFz%!20=Lb%ENDPROC 4165z%=z%!0:ENDWHILE:ENDPROC 4170DEFPROCob:LOCALz%,bc%,cc%:cc%=INKEY-1:bc%=(q%!8=1):PROCy(q%!16,z%):IFz%THEN 4175IFbc%THEN 4180IFcc%PROCT(z%)ELSEPROCtb 4185ELSE:IFcc%THEN 4190PROCc(z%!4,z%,-3,0):PROCpb(z%,"configure") 4195ELSE:PROCselect_printer(z%,-1,0):IFFNi(Fb%)PROCub(z%) 4200ENDIF 4205ENDIF 4210ENDPROC 4215ENDIF 4220PROCvb(z%):ENDPROC 4225DEFPROCselect_printer(z%,dc%,ec%):LOCALfc%,i%,s$:fc%=W%:IFNOTec%W%=z% 4230IFW%=0ENDPROC 4235s$=FNn(W%,0):IFs$<>""THEN 4240IFdc%THEN 4245W%!24=W%!24ANDNOT2 4250ENDIF 4255IFW%!32THEN 4260W%!24=W%!24OR4:PROCi(W%):PROCf(-1,W%,0) 4265ENDIF 4270IFW%=fc%THEN 4275PROCicon_deselect(-1,fc%!20):SYS524632,-1:fc%=0 4280ENDIF 4285W%=fc%:PROCb(s$):ENDPROC 4290ENDIF 4295PROCc(W%!4,W%,-6,0):PROCwb(W%):PROCz:IFdc%THEN 4300IFfc%THEN 4305PROCicon_deselect(-1,fc%!20):fc%!24=fc%!24ANDNOT2 4310ENDIF 4315W%!24=W%!24OR2:PROCicon_select(-1,W%!20):SYS524608TO,,,,i%:IF?i%CALLZ%,i%,s$:SYS36,"Printer$",i%,LENs$ 4320ELSE:W%=fc% 4325ENDIF 4330ENDPROC 4335DEFPROCwb(z%):LOCAL`%:`%=z%!36:SYS524612,,`%!8,`%!12,`%!24,`%!16,`%!28,`%!20:ENDPROC 4340DEFPROCz:!ba%=20:ba%!12=0:ba%!16=524615:SYS262375,17,ba%:ENDPROC 4345DEFFNC(gc%,z%):LOCALp$,r%,s$,i%:p$=FNmsg_0(A%!12,"CLM"):!q%=32+LENp$ANDNOT3:q%!12=0:q%!16=11:q%!20=gc%:q%!24=0:$(q%+28)=p$+CHR$0:SYS262375,18,q%:qa%=0:ra%=z%:REPEAT:PROCv(la%):UNTILqa%:ra%=0:IFqa%=2i%=q%+28:CALLZ%,i%,s$:=s$ 4350="" 4355DEFFNn(z%,hc%):LOCALN%,p$,H%,fb%,f%,s$,ic%:LOCALja$,fb%,ab%,Zb%,c$,K%:FORfb%=0TO255:aa%?fb%=q%?fb%:NEXT:H%=z%!4:N%=z%!12:g$=FNtask_read_env("PrinterType$"+STR$N%!0,ba%):SYS6,204,Ia%:SYS424324:CASEN%!0OF 4360WHEN1:IFNOThc%THEN 4365p$=FNC(1,z%):IFp$<>""THEN=FNmsg_1(A%!12,"OKI",p$) 4370ENDIF 4375ic%=FNo(1):IFic%=0ic%=3 4380IFz%!24AND128THEN 4385g$="devices#buffer"+STR$ic%+":$."+FNU 4390ELSE:g$="devices#buffer"+STR$ic%+":$.Parallel" 4395ENDIF 4400WHEN2:IFNOThc%THEN 4405p$=FNC(2,z%):IFp$<>""THEN=FNmsg_1(A%!12,"OKJ",p$) 4410ENDIF 4415SYS87,5,N%?4:SYS87,6,N%?4:SYS87,1,N%!8:SYS87,0,N%?5,NOT1:SYS6,204,1TO,Ia%:ic%=FNo(2):IFic%=0ic%=3 4420g$="devices#buffer"+STR$ic%+":$.Serial" 4425WHEN4:IF$N%!12=""THEN=FNmsg_0(A%!12,"OKAG") 4430g$="NetPrint#"+$N%!12+":":SYS263872:SYS262659,$N%!12:SYS263873 4435WHEN5:g$="null:":IFN%!16<>0THEN 4440IF?(N%!16)>32AND?(N%!16)<127g$=$N%!16 4445ENDIF 4450SYS131080,17,g$TOfb%;f%:IFf%AND1fb%=0 4455IFfb%THEN 4460SYS131085,67,g$TOfb%;f%:IF(f%AND1)=0CLOSE#fb%:SYS131080,18,g$,H%!28 4465ELSE:SYS131080,11,g$,H%!28TOfb%;f%:IF(f%AND1)THEN 4470fb%+=4:CALLZ%,fb%,s$:=s$ 4475ENDIF 4480ENDIF 4485WHEN6:s$=FNca(N%,g$):IFs$<>""THEN=s$ 4490WHEN8:SYS131107,"PrinterType$8",O%,256,,3TO,,f%:O%?f%=13:g$=$O%:IFg$=""g$="null:" 4495WHEN9:IFJa%THEN 4500c$=$z%!40:SYS424578,0,2,c$,0,0TOfb%,,,jc%,,Zb%;ab%:IF(ab%AND1)THEN 4505=FNmsg_1 (A%!12,"OKAR",c$) 4510ENDIF 4515SYS424323,1,Zb%,c$TOfb%;ab%:IF(ab%AND1)THEN 4520=FNmsg_1 (A%!12,"OKAR",c$) 4525ENDIF 4530q$="Share::_S"+FNu(Zb%)+".":ja$="Share::_S"+FNu(Zb%)+".RemSpool."+h$:SYS293254:SYS131080,8,ja$,,,0TOfb%;ab%:SYS293253:IF(ab%AND1)THEN 4535=FNmsg_1 (A%!12,"OKAR",c$) 4540ENDIF 4545ja$="Share::_S"+FNu(Zb%)+".RemQueue."+h$:SYS293254:SYS131080,8,ja$,,,0TOfb%;ab%:SYS293253:IF(ab%AND1)THEN 4550=FNmsg_1 (A%!12,"OKAR",c$) 4555ENDIF 4560s$=FNda:IFs$<>""THEN 4565=FNmsg_1 (A%!12,"OKAR",c$) 4570ENDIF 4575K%=INSTR(c$," "):WHILEK%:MID$(c$,K%,1)=CHR$160:K%=INSTR(c$," ",K%+1):ENDWHILE:g$="Share::_S"+FNu(Zb%)+".RemSpool."+h$+"."+c$:SYS293254:SYS131080,17,g$TOfb%;f%:IFf%AND1fb%=0 4580IFfb%THEN 4585SYS131085,67,g$TOfb%;f%:IF(f%AND1)=0CLOSE#fb%:SYS131080,18,g$,H%!28 4590SYS293253 4595ELSE:SYS131080,11,g$,H%!28TOfb%;f%:SYS293253:IF(f%AND1)THEN 4600=FNmsg_1 (A%!12,"OKAR",c$) 4605ENDIF 4610ENDIF 4615ELSE:=FNmsg_1 (A%!12,"OKAR",c$) 4620ENDIF 4625ENDCASE 4630SYS36,"PrinterType$"+STR$N%!0,g$,LENg$:PROCJ(N%!0):FORfb%=0TO255:q%?fb%=aa%?fb%:NEXT:="" 4635DEFPROCxb(ic%):IFic%SYS6,21,ic% 4640ENDPROC 4645DEFPROCJ(kc%):LOCALx%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCyb:PROCxb(FNo(x%)):SYS6,5,kc%:ENDPROC 4650SYS6,245,,255TO,x%:IFx%<>kc%THEN 4655PROCzb:SYS6,5,kc%:PROCyb 4660ENDIF 4665ENDPROC 4670DEFPROCzb:SYS6,229:ENDPROC 4675DEFPROCyb:SYS6,229,1:ENDPROC 4680DEFFNca(N%,RETURNa$):LOCALc%,f%,s$:IFNOTFNzTHEN=FNmsg_0(A%!12,"OKL") 4685IFN%!20=0THEN=FNmsg_0(A%!12,"OKK") 4690a$="NFS#Printer::"+$N%!20:IFN%!24=0a$+=".lp"ELSEa$+="."+$N%!24 4695IFN%!28=0a$+=".nobody"ELSEa$+="."+$N%!28 4700IFN%!32a$+="."+$N%!32 4705SYS131085,143,a$TOc%;f%:IFf%AND1THEN 4710CASE!c%OF 4715WHEN204:=FNmsg_0(A%!12,"OKM") 4720OTHERWISE:f%=c%+4:CALLZ%,f%,s$:=s$+" ("+STR$!c%+")" 4725ENDCASE 4730ENDIF 4735SYS131085,,c%:="" 4740DEFPROCg(ka$,lc%,mc%):LOCALy%,i%,nc%,oc%,pc%:LOCALz%,S%,qb%:IFlc%THEN 4745qc%=q%!0-64:rc%=q%!4 4750ENDIF 4755IFmc%THEN 4760!O%=q%!12:O%!4=q%!16:SYS262350,,O%:nc%=O%!16:oc%=O%!20:SYS262347,,O%:qc%=O%!20+O%!4+nc%+2:rc%=O%!24+O%!16+oc%-2 4765ENDIF 4770IFka$="SVE"THEN 4775PROCAb(Ca%!28,FNmsg_0(A%!12,"OP")):SYS262356,,zb%,qc%,rc% 4780ELSE:CASEka$OF 4785WHEN"ME1":PROCmenu_create(_%,FNmsg_0(A%!12,"ME1")):PROCBb(_%,0,Gb%,0):PROCa(_%,2,A%!44=0):rc%=96+(5+1)*pa%:IFvb%za%=0ELSEPROCy(q%!16,za%) 4790WHEN"ME2":IFFNRTHEN 4795PROCmenu_create(_%,FNmsg_0(A%!12,"ME2")+FNmsg_0(A%!12,"ME2a")+FNmsg_0(A%!12,"ME2b")) 4800ELSE:PROCmenu_create(_%,FNmsg_0(A%!12,"ME2")+FNmsg_0(A%!12,"ME2b")) 4805ENDIF 4810PROCmenu_tick_match(_%,FNicon_read(Q%,15)) 4815WHEN"ME3":PROCmenu_create(_%,FNmsg_0(A%!12,"ME3")):PROCmenu_tick_match(_%,FNicon_read(Q%,17)) 4820WHEN"ME4":PROCmenu_create(_%,FNmsg_0(A%!12,"ME4")):PROCmenu_tick_match(_%,FNicon_read(Q%,18)) 4825WHEN"ME5":PROCmenu_create(_%,FNmsg_0(A%!12,"ME5")):pc%=(_%!28AND256)<>0:IFNOT(FNv=0ANDFNq<>0)THEN 4830IFFNv=3ANDFNq=0THEN 4835PROCmenu_item(_%,1,FNmsg_0(A%!12,"ME5c"),pc%) 4840ELSE:PROCmenu_item(_%,1,FNmsg_0(A%!12,"ME5a"),pc%) 4845ENDIF 4850ENDIF 4855PROCmenu_tick_match(_%,FNicon_read(Q%,19)) 4860WHEN"ME6":IFlc%PROCCb 4865PROCmenu_tick_match(_%,FNicon_read(Q%,25)) 4870WHEN"MQ1":IFlc%THEN 4875PROCeb:ya%=rc%:!q%=A%!40:SYS262347,,q%:B%=ya%-q%!16+q%!24:ya%=USR(P%+44):i%=A%!16:za%=!i%:Aa%=i%!4:IFAa%=-1Aa%=0 4880IFAa%=0THEN 4885PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1a"))):IFza%za%!24=za%!24OR16 4890ELSE:IFAa%!12THEN 4895PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1a"))) 4900ELSE:PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1b"))) 4905ENDIF 4910Aa%?11=Aa%?11OR8 4915ENDIF 4920PROCf(-1,za%,Aa%) 4925ENDIF 4930PROCa(_%,0,0):PROCa(_%,1,0):PROCa(_%,2,0):PROCa(_%,3,0):PROCa(_%,4,0):PROCa(_%,5,0):PROCa(_%,6,0):IFAa%=0THEN 4935PROCa(_%,4,-1):PROCa(_%,5,-1):PROCa(_%,6,-1) 4940ELSE:IFAa%?11AND5PROCa(_%,4,-1)ELSEPROCa(_%,5,-1) 4945ENDIF 4950IFza%!24AND36THEN 4955PROCa(_%,0,-1):PROCa(_%,1,-1) 4960ELSE:PROCa(_%,2,-1) 4965ENDIF 4970WHEN"MP1":PROCcreate_paper_menu(_%,Cb%,5) 4975WHEN"MC1","MC1s":PROCmenu_create(_%,FNmsg_0(A%!12,"MC1s")):IFJa%=0THEN 4980PROCa(_%,2,-1) 4985ENDIF 4990SYS262358,Fb%,O%,1<<21,1<<21:IF(!O%=-1ORO%!4=-1)ANDwa%=0THEN 4995IFNOT!O%PROCicon_deselect(Fb%,!O%) 5000IFq%!12=Fb%ANDq%!16>3THEN 5005PROCicon_select(Fb%,q%!16):i%=1 5010ELSE:i%=0 5015ENDIF 5020ELSE:i%=2 5025ENDIF 5030CASEi%OF 5035WHEN0:PROCa(_%,0,-1):PROCa(_%,1,-1):PROCa(_%,2,-1):PROCa(_%,3,-1):PROCa(_%,4,-1):PROCa(_%,5,-1):PROCa(_%,7,-1):IFA%!48=0PROCa(_%,6,-1) 5040WHEN1:PROCt (z%,S%,qb%):IFS%THEN 5045PROCa (_%,0,-1):PROCa (_%,1,-1):PROCa (_%,2,-1):IFS%!20>0THEN 5050PROCa (_%,3,-1) 5055ELSE:PROCa (_%,4,-1) 5060ENDIF 5065PROCa (_%,5,-1) 5070ENDIF 5075IFz%THEN 5080IFz%!24AND(1<<17)THEN 5085PROCa (_%,1,-1):PROCa (_%,2,-1):PROCa (_%,3,-1):PROCa (_%,5,-1) 5090ENDIF 5095ENDIF 5100WHEN2:PROCa(_%,0,-1):PROCa(_%,1,-1) 5105ENDCASE 5110ENDCASE 5115J$=ka$:PROCdisplay_menu(0,_%,qc%,rc%) 5120ENDIF 5125ENDPROC 5130DEFPROCcreate_paper_menu(RETURNLb%,`b%,qb%):LOCAL`%,i%,pc%:PROCmenu_create(Lb%,FNmsg_0(A%!12,"MP1")):pc%=(Lb%!28AND256)<>0:`%=ja%:i%=0:WHILE`%:PROCmenu_item(Lb%,i%,$`%!4,pc%):i%+=1:`%=`%!0:ENDWHILE:PROCmenu_tick_match(Lb%,FNicon_read(`b%,qb%)):ENDPROC 5135DEFPROCdisplay_menu(z%,_%,sc%,tc%):xa%=z%:SYS262356,,_%,sc%,tc%:ENDPROC 5140DEFFNwas_adjust_used:SYS262351,,O%:=(O%!8AND1)<>0 5145DEFPROCta:LOCALbc%,uc%,`%,i%,h%,n%,z%,qb%:LOCALS%:IFxa%THEN 5150PROCc(xa%!4,xa%,9,q%):ENDPROC 5155ENDIF 5160bc%=FNwas_adjust_used:CASEJ$OF 5165WHEN"ME1":CASE!q%OF 5170WHEN1:PROCvb(za%) 5175WHEN2:PROCtb 5180WHEN3:PROCDb(za%) 5185WHEN4:PROCFb:PROCGb 5190WHEN5:IFA%!32THEN 5195A%!20=A%!20OR1:Qb%=2:PROCcb(Ab%) 5200ELSE:PROCx 5205ENDIF 5210ENDCASE 5215WHEN"ME2":PROCicon_write(Q%,15,$(!q%*24+40+_%)) 5220WHEN"ME3":PROCicon_write(Q%,17,$(!q%*24+40+_%)):PROCHb(-1) 5225WHEN"ME4":PROCicon_write(Q%,18,$(!q%*24+40+_%)):PROCHb(-1) 5230WHEN"ME5":PROCHb(!q%) 5235WHEN"ME6":PROCmenu_tick_match(_%,FNicon_read(Q%,25)):PROCicon_write(Q%,25,$(!q%*24+40+_%)) 5240WHEN"MQ1":uc%=-1:CASE!q%OF 5245WHEN0:za%!24=za%!24OR4 5250WHEN1:za%!24=za%!24OR32 5255WHEN2:za%!24=za%!24ANDNOT36:i%=za%!32:IFi%THEN 5260i%=i%!44:IFi%THEN 5265IFi%!40THEN 5270i%!40=0:IFza%!48THEN 5275!q%=za%!48:PROCe 5280ENDIF 5285ENDIF 5290ENDIF 5295ENDIF 5300WHEN3:PROCA(za%):uc%=0 5305WHEN4:IFAa%!12THEN 5310Aa%?11=Aa%?11OR1 5315ELSE:Aa%?11=Aa%?11OR4 5320ENDIF 5325WHEN5:Aa%?11=Aa%?11ANDNOT5 5330WHEN6:PROCn(za%,Aa%,-1):uc%=0 5335ENDCASE 5340IFuc%THEN 5345PROCi(za%):IF!q%<3THEN 5350PROCf(-1,za%,0) 5355ELSE:PROCf(ya%,za%,Aa%) 5360ENDIF 5365ENDIF 5370WHEN"MP1":`%=ja%:i%=!q%:WHILEi%:`%=`%!0:i%-=1:ENDWHILE:FORi%=0TO52STEP4:Ga%!i%=`%!i%:NEXT:PROCIb 5375WHEN"MC1","MC1s":CASE!q%OF 5380WHEN0:PROCt(z%,S%,qb%):IFz%THEN 5385PROCc(z%!4,z%,-3,0):PROCpb(z%,"configure") 5390ENDIF 5395WHEN1:PROCt(z%,S%,qb%):IFz%THEN 5400PROCT(z%) 5405ENDIF 5410WHEN2:PROCJb 5415WHEN3:PROCKb:PROCk 5420WHEN4:PROCLb:PROCk 5425WHEN5:PROCMb:PROCk 5430WHEN6:IFA%!48THEN 5435IF0<=va%-1THEN 5440FORi%=0TOva%-1:PROCicon_select(Fb%,i%+4):NEXT 5445ENDIF 5450ENDIF 5455IFKa%THEN 5460IF0<=Ma%-1THEN 5465FORi%=va%TOva%+Ma%:PROCicon_select(Fb%,i%+4):NEXT 5470ENDIF 5475ENDIF 5480wa%=-1 5485WHEN7:PROCU(Fb%) 5490ENDCASE 5495ENDCASE 5500IFbc%THEN 5505SYS262351,,q%:PROCg(J$,0,0) 5510ELSE:PROCeb 5515ENDIF 5520ENDPROC 5525DEFPROCFb:LOCALc%,f%,H%,z%,K%,p%,Ra%,s$,f$:LOCALvc%,S%:SYS263872:IFia%THEN 5530f$="<Printers$Dir>"+".Remote.ID"+h$+".Settings1" 5535ELSE:f$="<Printers$Dir>"+".Settings1" 5540ENDIF 5545SYS131085,143,f$TOc%;f%:IFf%AND1f%=c%+4:CALLZ%,f%,s$:ERROR254,FNmsg_1(A%!12,"OKB",s$) 5550LOCALERROR:ONERRORLOCALRESTOREERROR:SYS131085,0,c%:SYS131080,6,f$:ERROR254,FNmsg_1(A%!12,"OKB",REPORT$) 5555BPUT#c%,"fv: 1":z%=A%!48:WHILEz%:H%=z%!4:BPUT#c%,"cl: "+$H%!4+":"+STR$H%!40:BPUT#c%,"nm: "+$z%!8:K%=z%!12:IFH%!24AND4THEN 5560Ra%=H%!48:BPUT#c%,"cn: "+STR$Ra%:IF1<=Ra%THEN 5565FORf%=1TORa%:p%=!K%:K%+=4:CASE-1OF 5570WHENp%=0:BPUT#c%,"nl: " 5575WHENp%!-4=1196707401:BPUT#c%,"in: "+STR$!p% 5580WHENp%!-4=1196577875:BPUT#c%,"st: "+$p% 5585WHENp%!-4=810701907:CALLZ%,p%,s$:BPUT#c%,"s0: "+s$ 5590WHENp%!-4=1381258055:CALLY%,p%,s$:BPUT#c%,"gs: "+FNungstrans(s$) 5595WHENp%!-4=1381257040:BPUT#c%,"pt: "+FNp(!p%,H%) 5600OTHERWISE:SYS131085,,c%:ERROR254,FNmsg_1(A%!12,"OKC",$z%!8) 5605ENDCASE 5610NEXT 5615ENDIF 5620ELSE:BPUT#c%,"ct: 16_"+STR$~K%!0:BPUT#c%,"bd: 16_"+STR$~K%!4:IFK%!8AND48K%!8=K%!8OR8 5625BPUT#c%,"ft: 16_"+STR$~K%!8:BPUT#c%,"et: ";:IFK%!12=0BPUT#c%,10ELSEBPUT#c%,$K%!12 5630BPUT#c%,"fl: ";:IFK%!16=0BPUT#c%,10ELSEBPUT#c%,$K%!16 5635BPUT#c%,"ns: ";:IFK%!20=0BPUT#c%,10ELSEBPUT#c%,$K%!20 5640BPUT#c%,"np: ";:IFK%!24=0BPUT#c%,10ELSEBPUT#c%,$K%!24 5645BPUT#c%,"nu: ";:IFK%!28=0BPUT#c%,10ELSEBPUT#c%,$K%!28 5650BPUT#c%,"no: ";:IFK%!32=0BPUT#c%,10ELSEBPUT#c%,$K%!32 5655BPUT#c%,"cf: 16_"+STR$~K%?6 5660ENDIF 5665K%=z%!16:Ra%=H%!36:BPUT#c%,"cs: "+STR$Ra%:IF1<=Ra%THEN 5670FORf%=1TORa%:p%=!K%:K%+=4:CASE-1OF 5675WHENp%=0:BPUT#c%,"nl: " 5680WHENp%!-4=1196707401:BPUT#c%,"in: "+STR$!p% 5685WHENp%!-4=1196577875:BPUT#c%,"st: "+$p% 5690WHENp%!-4=810701907:CALLZ%,p%,s$:BPUT#c%,"s0: "+s$ 5695WHENp%!-4=1381258055:CALLY%,p%,s$:BPUT#c%,"gs: "+FNungstrans(s$) 5700WHENp%!-4=1381257040:BPUT#c%,"pt: "+FNp(!p%,H%) 5705OTHERWISE:SYS131085,,c%:ERROR254,FNmsg_1(A%!12,"OKC",$z%!8) 5710ENDCASE 5715NEXT 5720ENDIF 5725BPUT#c%,"fg: 16_"+STR$~(z%!24AND195+65536+131072):f%=z%!36:BPUT#c%,"pn: "+$f%!4:BPUT#c%,"sn: "+FNprinter_read_string(z%!40):BPUT#c%,"ic: "+FNprinter_read_string(z%!44):z%=z%!0:ENDWHILE:S%=Ka%:WHILES%:IFS%!20>0THEN 5730BPUT#c%,"cl:":BPUT#c%,"nm: "+$S%!8:BPUT#c%,"ct: 16_9":BPUT#c%,"bd: 16_8":BPUT#c%,"ft: 16_5":BPUT#c%,"et:":BPUT#c%,"fl:":BPUT#c%,"ns:":BPUT#c%,"np:":BPUT#c%,"nu:":BPUT#c%,"no:":BPUT#c%,"cf: 16_0":BPUT#c%,"cs: 2":BPUT#c%,"in: 25600":BPUT#c%,"in: 6":BPUT#c%,"fg: 16_20000":BPUT#c%,"pn:" 5735BPUT#c%,"sn: "+$S%!4:BPUT#c%,"ic:" 5740ENDIF 5745S%=S%!0:ENDWHILE:CLOSE#c%:SYS131080,18,f$,4038:SYS131080,6,LEFT$(f$):SYS131113,25,f$,LEFT$(f$):SYS131080,4,LEFT$(f$),,,,19:SYS263873:ENDPROC 5750DEFPROCGb:LOCALH%,yb%,R%,c%,eb%,U%,wc%,i%,j%,k%,l%,s$,f%,f$:SYS263872:H%=ua%:WHILEH%:IFH%!8THEN 5755IFH%!24AND2THEN 5760IFia%THEN 5765f$="<Printers$Dir>"+".Remote.ID"+h$+"."+$H%!4:SYS8,8,f$:f$+=".PrData1" 5770ELSE:f$="<Printers$Dir>"+"."+$H%!4+".PrData1" 5775ENDIF 5780SYS131080,4,LEFT$(f$),,,,3:SYS131085,143,f$TOc%;f%:IFf%AND1f%=c%+4:CALLZ%,f%,s$:ERROR254,FNmsg_1(A%!12,"OKB",s$) 5785LOCALERROR:ONERRORLOCALRESTOREERROR:SYS131085,0,c%:SYS131080,6,f$:ERROR254,FNmsg_1(A%!12,"OKB",REPORT$) 5790eb%=H%!8:yb%=H%!12:WHILEeb%:BPUT#c%,$(eb%+12)+":":BPUT#c%,"#":R%=yb%!4:WHILER%:IFR%!(R%!4*4+8)THEN 5795BPUT#c%,"# Usage: "+STR$R%!(R%!4*4+8):U%=eb%!4:i%=R%+8:WHILEU%:BPUT#c%,$(U%+16)+" ";:IF!i%=0THEN 5800IFU%!4=6THEN 5805BPUT#c%,48 5810ELSE:IFU%!4=1THEN 5815BPUT#c%,48 5820ENDIF 5825ENDIF 5830BPUT#c%,10 5835ELSE:j%=!i%:CASEU%!4OF 5840WHEN1:IF$(U%+16)="palette:"THEN 5845BPUT#c%,STR$((!j%)AND8388607) 5850ELSE:BPUT#c%,STR$!j% 5855ENDIF 5860WHEN2:BPUT#c%,FNprinter_read_string(j%) 5865WHEN3:BPUT#c%,FNprinter_read_string(j%) 5870WHEN4:BPUT#c%,FNungstrans(FNprinter_read_string(j%)) 5875WHEN5:BPUT#c%,10:CASEU%!8OF 5880WHEN1:BPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 5885WHEN2:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 5890WHEN3:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 5895WHEN4:BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)):BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 5900WHEN7:BPUT#c%," "+FNp(!j%!0,H%)+", "+FNp(!j%!4,H%) 5905ENDCASE 5910WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:IF0<=j%!4-1THEN 5915FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 5920WHEN1196707401:BPUT#c%," "+STR$!l%+", "; 5925WHEN1196577875:BPUT#c%," "+$l%+", "; 5930WHEN810701907:CALLZ%,l%,s$:BPUT#c%," "+s$+", "; 5935WHEN1381258055:CALLY%,l%,s$:BPUT#c%," "+FNungstrans(s$)+", "; 5940WHEN1381257040:BPUT#c%," "+FNp(!l%,H%)+", "; 5945ENDCASE 5950NEXT 5955ENDIF 5960PTR#c%=PTR#c%-2:BPUT#c%,10:j%=!j%:ENDWHILE 5965WHEN7:BPUT#c%,FNp(!j%,H%) 5970WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 5975FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 5980ENDIF 5985BPUT#c%," "+FNungstrans(s$):j%=!j%:ENDWHILE 5990ENDCASE 5995ENDIF 6000U%=U%!0:i%+=4:ENDWHILE:BPUT#c%,"#" 6005ENDIF 6010R%=R%!0:ENDWHILE:eb%=eb%!0:yb%=yb%!0:ENDWHILE:CLOSE#c%:SYS131080,18,f$,4038:SYS131080,6,LEFT$(f$):SYS131113,25,f$,LEFT$(f$):SYS131080,4,LEFT$(f$),,,,19:H%!24=H%!24ANDNOT2 6015ELSE 6020ENDIF 6025ENDIF 6030H%=H%!0:ENDWHILE:SYS263873:ENDPROC 6035DEFFNp(p%,H%):LOCALyb%,R%,eb%,xc%,yc%:yb%=H%!12:WHILEyb%:R%=yb%!4:yc%=0:WHILER%:IFR%!(R%!4*4+8)THEN 6040yc%+=1:IFp%=R%THEN 6045eb%=H%!8:WHILExc%:eb%=eb%!0:xc%-=1:ENDWHILE:=$(eb%+12)+":"+STR$yc% 6050ENDIF 6055ENDIF 6060R%=R%!0:ENDWHILE:xc%+=1:yb%=yb%!0:ENDWHILE:PROCb(FNmsg_0(A%!12,"FAF")):="" 6065DEFFNi(h%):!V%=h%:SYS262347,,V%:=(V%!32AND1<<16)<>0 6070DEFPROCvb(z%):IFNOTFNi(Fb%)THEN 6075IFA%!48ORKa%THEN 6080PROCk 6085ENDIF 6090ENDIF 6095PROCs(Fb%):PROCp(Fb%):PROCub(z%):ENDPROC 6100DEFPROCub(z%):LOCALp%:IFz%THEN 6105SYS262358,Fb%,O%,1<<21,1<<21:p%=O%:WHILENOT!p%:IF!p%<>z%!28PROCicon_deselect(Fb%,!p%) 6110p%+=4:ENDWHILE:IF(z%!24AND44)=0PROCicon_select(Fb%,z%!28) 6115ENDIF 6120ENDPROC 6125DEFPROCB(p%):LOCALK%,i%,sb%:IFp%=0ENDPROC 6130CASEp%!-4OF 6135WHEN1381257040:K%=!p%:sb%=K%+K%!4*4+8:!sb%-=1:IF!sb%=0THEN 6140sb%=K%+8:IF1<=K%!4THEN 6145FORi%=1TOK%!4:PROCB(!sb%):sb%+=4:NEXT 6150ENDIF 6155ENDIF 6160WHEN1280266050:PROCB(p%!0):PROCB(p%!4) 6165WHEN1146377036:WHILEp%:IF0<=p%!4-1THEN 6170FORK%=0TOp%!4-1:PROCB(p%!(K%*4+8)):NEXT 6175ENDIF 6180p%=p%!0:ENDWHILE 6185ENDCASE 6190ENDPROC 6195DEFPROCNb(la$):LOCALH%,yb%,zc%,R%,i%,j%,k%,l%,sb%:H%=ua%:WHILEH%:zc%=0:yb%=H%!12:R%=yb%!4:WHILER%:IF$R%!8=la$THEN 6200IF(R%!(R%!4*4+8))=0THEN 6205H%!24=H%!24OR2:IF0<=R%!4-1THEN 6210FORi%=0TOR%!4-1:sb%=R%!(i%*4+8):PROCB(sb%):PROCfree_structure(sb%):NEXT 6215ENDIF 6220IFzc%THEN 6225zc%!0=R%!0 6230ELSE:yb%!4=R%!0 6235ENDIF 6240B%=1413763664:C%=R%:CALLP%+16 6245ENDIF 6250R%=0:H%=0 6255ELSE:zc%=R%:R%=R%!0 6260ENDIF 6265ENDWHILE:IFH%H%=H%!0 6270ENDWHILE:ENDPROC 6275DEFPROCq(ma$):PROCS(FNmsg_1(A%!12,"OKZ",ma$)):ENDPROC 6280DEFPROCOb(RETURNH%):LOCALK%,J%,c%,d%:J%=FNb("cl:"):IFJ%=0PROCq(FNmsg_0(A%!12,"OKZa")) 6285H%=ua%:WHILEH%:IF$H%!4=$J%THEN 6290IFH%!24AND32THEN 6295SYS131080,7,"PrinterChoices:"+$J%+".WriteTest"TO;c%:IF(c%AND1)PROCm:ERROR254,FNmsg_1(A%!12,"OKAN",$J%) 6300SYS131080,6,"PrinterChoices:"+$J%+".WriteTest"TOd%;c% 6305ENDIF 6310K%=!wb%:PROCPb(H%,H%!8):!wb%=K%:ENDPROC 6315ELSE:H%=H%!0 6320ENDIF 6325ENDWHILE:IFH%=0THEN 6330PROCRa:PROCGa($J%):PROCHa($J%,H%):PROCSa:PROCNa:IFH%!24AND32THEN 6335SYS131080,7,"PrinterChoices:"+$J%+".WriteTest"TO;c%:IF(c%AND1)PROCm:ERROR254,FNmsg_1(A%!12,"OKAN",$J%) 6340SYS131080,6,"PrinterChoices:"+$J%+".WriteTest" 6345ENDIF 6350PROCc(H%,A%!48,-5,0) 6355ENDIF 6360IFH%=0PROCq(FNmsg_1(A%!12,"OKZb",$J%)) 6365ENDPROC 6370DEFPROCPb(H%,eb%):LOCALU%,J%:U%=eb%!4:REPEAT:J%=FNb($(U%+16)):IFJ%THEN 6375CASEU%!4OF 6380WHEN5:PROCQb(H%,eb%,$J%) 6385WHEN6:IF?J%=13PROCq(FNmsg_1(A%!12,"OK7a",$(U%+16))) 6390PROCRb(H%,eb%,$J%) 6395WHEN7:PROCV(H%,eb%,$J%) 6400WHEN8:IF?J%=13PROCq(FNmsg_1(A%!12,"OK7a",$(U%+16))) 6405PROCSb(H%,eb%,$J%) 6410ENDCASE 6415ENDIF 6420U%=U%!0:UNTILU%=0:ENDPROC 6425DEFPROCQb(H%,eb%,t$):LOCALJ%,na$,i$:J%=FNd:IFJ%THEN 6430CASEU%!8OF 6435WHEN1:J%=FNK(J%,Ac%):IF?J%=13J%=FNd 6440WHEN2,3,4:J%=FNr(J%,i$):IF?J%=13J%=FNd 6445WHEN7:J%=FNr(J%,i$):PROCV(H%,eb%,i$):IF?J%=13J%=FNd 6450PROCV(H%,eb%,$J%) 6455ENDCASE 6460ENDIF 6465ENDPROC 6470DEFPROCRb(H%,eb%,t$):LOCALi%,p%,Bc%,J%:Bc%=VALt$:IF1<=Bc%THEN 6475FORi%=1TOBc%:J%=FNd:IFJ%THEN 6480p%=U%!8:WHILEp%:IFp%!4=7PROCV(H%,eb%,$J%) 6485p%=!p%:ENDWHILE 6490ENDIF 6495NEXT 6500ENDIF 6505ENDPROC 6510DEFPROCV(H%,eb%,c$):LOCALi%,s$,t$:i%=INSTR(c$,":"):IFi%=0PROCq(FNmsg_1(A%!12,"OKAA",c$)) 6515s$=LEFT$(c$,i%-1):t$=MID$(c$,i%+1):eb%=H%!8:WHILEeb%:IF$(eb%+12)=s$THEN 6520IFVALt$>0THEN 6525ENDPROC 6530ELSE:PROCPb(H%,eb%):ENDPROC 6535ENDIF 6540ELSE:eb%=eb%!0 6545ENDIF 6550ENDWHILE:PROCq(FNmsg_1(A%!12,"OKAB",s$)):ENDPROC 6555DEFPROCSb(H%,eb%,t$):LOCALi%,Bc%:Bc%=VALt$:IF1<=Bc%THEN 6560FORi%=1TOBc%:IFFNd 6565NEXT 6570ENDIF 6575ENDPROC 6580DEFPROCO:LOCALJ%,H%,K%,s$,U%,Cc%,Dc%,Fc%,Gc%,Hc%:J%=q%+44:CALLZ%,J%,s$:IFNOTFNl(s$)ERROR254,FNmsg_1(A%!12,"OKX",s$) 6585SYS263872:PROCOb(H%):Fc%=H%!12:IFFc%THEN 6590Cc%=Fc%!4:IFCc%THEN 6595K%=!wb%:U%=H%!8:U%=U%!4:J%=FNb($(U%+16)):IFJ%THEN 6600WHILECc%:IF$Cc%!8=$J%THEN 6605PROCm:SYS263873:PROCTb(H%,Cc%):ENDPROC 6610ENDIF 6615Dc%=Cc%:Cc%=Cc%!0:ENDWHILE 6620ELSE:PROCq(FNmsg_1(A%!12,"OKZc",$(U%+16))) 6625ENDIF 6630!wb%=K% 6635ELSE:Dc%=0 6640ENDIF 6645ELSE:Dc%=0 6650ENDIF 6655PROCW(H%!8,Dc%,Fc%,0,Gc%,Hc%,H%):PROCm:H%!24=H%!24OR2:PROCTb(H%,Dc%):SYS263873:ENDPROC 6660DEFPROCS(s$):PROCm:ERROR254,FNG(A%!12,"OK0",STR$xb%,V$,s$):ENDPROC 6665DEFPROCh(H%,s$,oa$):PROCS(FNmsg_2(A%!12,oa$,$H%!4,s$)):ENDPROC 6670DEFPROCLa(Ic%):LOCALJ%,T%,Jc%,i%,Kc%,Lc%,Mc%,Nc%:J%=FNb("tp:"):IFJ%=0PROCh(Ic%,FNmsg_0(A%!12,"OK3"),"OK2a") 6675REPEAT:J%=FNd:IFJ%THEN 6680T%=FNa(J%,"tp:"):IFT%THEN 6685Jc%+=1:B%=1414548820:C%=12+1+LEN$T%:Kc%=USR(P%+12):IFKc%=0PROCh(Ic%,FNmsg_1(A%!12,"FA5","TMPT"),"OK2a") 6690IFLc%THEN 6695Lc%!0=Kc% 6700ELSE:Ic%!8=Kc% 6705ENDIF 6710Kc%!0=0:Kc%!4=0:Kc%!8=0:$(Kc%+12)=$T%:Nc%=0 6715ELSE:T%=FNa(J%,"end:"):IFT%THEN 6720IF?T%<>13PROCh(Ic%,FNmsg_0(A%!12,"OK3a"),"OK2a") 6725Jc%-=1:Lc%=Kc% 6730ELSE:i%=INSTR($J%,":"):IFi%=0PROCh(Ic%,FNmsg_1(A%!12,"OK4",$J%),"OK2a") 6735IFJc%<>1PROCh(Ic%,FNmsg_1(A%!12,"OK4a",$J%),"OK2a") 6740Kc%!8+=1:B%=1498567758:C%=16+1+i%:Mc%=USR(P%+12):IFMc%=0PROCh(Ic%,FNmsg_1(A%!12,"FA5","NTRY"),"OK2a") 6745IFNc%Nc%!0=Mc%ELSEKc%!4=Mc% 6750Mc%!0=0:Mc%!4=0:Mc%!8=0:Mc%!12=0:$(Mc%+16)=LEFT$($J%,i%):J%+=i%+1:CASE-1OF 6755WHENFNa(J%,"in")<>0:Mc%!4=1 6760WHENFNa(J%,"st")<>0:Mc%!4=2 6765WHENFNa(J%,"s0")<>0:Mc%!4=3 6770WHENFNa(J%,"gs")<>0:Mc%!4=4 6775WHENFNa(J%,"bl")<>0:Mc%!4=5:T%=FNa(J%,"bl"):WHILE?T%=32:T%+=1:ENDWHILE:IF?T%=ASC","T%+=1 6780CASE-1OF 6785WHENFNa(T%,"in")<>0:Mc%!8=1 6790WHENFNa(T%,"st")<>0:Mc%!8=2 6795WHENFNa(T%,"s0")<>0:Mc%!8=3 6800WHENFNa(T%,"gs")<>0:Mc%!8=4 6805WHENFNa(T%,"ptr")<>0:Mc%!8=7 6810OTHERWISE:PROCh(Ic%,FNmsg_1(A%!12,"OK5",$T%),"OK2a") 6815ENDCASE 6820WHENFNa(J%,"ls")<>0:Mc%!4=6:T%=FNa(J%,"ls"):PROCUb(T%,Mc%,Ic%) 6825WHENFNa(J%,"ptr")<>0:Mc%!4=7 6830WHENFNa(J%,"ch")<>0:Mc%!4=8 6835OTHERWISE:PROCh(Ic%,FNmsg_1(A%!12,"OK6",$J%),"OK2a") 6840ENDCASE 6845Nc%=Mc% 6850ENDIF 6855ENDIF 6860ENDIF 6865UNTILJc%=-1:ENDPROC 6870DEFPROCUb(Oc%,U%,Ic%):LOCALwc%,K%,t%:K%=U%+8:REPEAT:WHILE?Oc%=32:Oc%+=1:ENDWHILE:IF?Oc%=44Oc%+=1 6875WHILE?Oc%=32:Oc%+=1:ENDWHILE:IF?Oc%<>13THEN 6880U%!12+=1:B%=1414744396:C%=8:wc%=USR(P%+12):IFwc%=0ERROR253,FNmsg_1(A%!12,"FA5","LIST") 6885!K%=wc%:K%=wc%:wc%!0=0:t%=FNa(Oc%,"in"):IFt%THEN 6890Oc%=t%:wc%!4=1 6895ELSE:t%=FNa(Oc%,"st"):IFt%THEN 6900Oc%=t%:wc%!4=2 6905ELSE:t%=FNa(Oc%,"s0"):IFt%THEN 6910Oc%=t%:wc%!4=3 6915ELSE:t%=FNa(Oc%,"gs"):IFt%THEN 6920Oc%=t%:wc%!4=4 6925ELSE:t%=FNa(Oc%,"ptr"):IFt%THEN 6930Oc%=t%:wc%!4=7 6935ELSE:PROCh(Ic%,FNmsg_1(A%!12,"OK7",$Oc%),"OK2a") 6940ENDIF 6945ENDIF 6950ENDIF 6955ENDIF 6960ENDIF 6965ENDIF 6970UNTIL?Oc%=13:ENDPROC 6975DEFFNb(m$):LOCALPc%,i%:i%=Qc%+!wb%:WHILEi%<Qc%+Rc%:WHILE?i%=32:i%+=1:ENDWHILE:IF?i%=35OR?i%=13THEN 6980i%+=LEN$i%+1:xb%+=1 6985ELSE:IFm$=LEFT$($i%,LENm$)THEN 6990Pc%=i%+LENm$:WHILE?Pc%=32:Pc%+=1:ENDWHILE:i%+=LEN$i%+1:!wb%=i%-Qc%:xb%+=1:=Pc% 6995ELSE:i%+=LEN$i%+1:xb%+=1 7000ENDIF 7005ENDIF 7010ENDWHILE:=0 7015DEFFNd:LOCALPc%,i%:i%=Qc%+!wb%:WHILEi%<Qc%+Rc%:WHILE?i%=32:i%+=1:ENDWHILE:IF?i%=35OR?i%=13THEN 7020i%+=LEN$i%+1:!wb%=i%-Qc%:xb%+=1 7025ELSE:Pc%=i%:i%+=LEN$i%+1:!wb%=i%-Qc%:xb%+=1:=Pc% 7030ENDIF 7035ENDWHILE:=0 7040DEFFNa(J%,m$):WHILE?J%=32:J%+=1:ENDWHILE:IFm$=LEFT$($J%,LENm$)THEN 7045J%+=LENm$:WHILE?J%=32:J%+=1:ENDWHILE:=J% 7050ENDIF 7055=0 7060DEFPROCW(eb%,RETURNDc%,Fc%,Sc%,RETURNGc%,RETURNHc%,H%):LOCAL_a%,Tc%,Uc%,J%,T%,U%,i%,Ra%:U%=eb%!4:_a%=-1:REPEAT:Uc%=!wb%:Gc%=0:J%=FNd:IFJ%THEN 7065IF_a%=-1THEN 7070Ra%=4*eb%!8+8:B%=1413763664:C%=Ra%+8:Tc%=USR(P%+12):IFTc%=0ERROR253,FNmsg_1(A%!12,"FA5","PRDT") 7075IF0<=Ra%+7THEN 7080FORi%=0TORa%+7STEP4:Tc%!i%=0:NEXT 7085ENDIF 7090IFDc%Dc%!0=Tc%ELSEFc%!4=Tc% 7095Tc%!4=eb%!8:_a%=8 7100ENDIF 7105REPEAT:T%=FNa(J%,$(U%+16)):IFT%THEN 7110Gc%=1:CASEU%!4OF 7115WHEN1:Tc%!_a%=FNstore_integer(FNc($T%)) 7120WHEN2,3,4:B%=T%:C%=U%!4:Tc%!_a%=USR(P%+28) 7125WHEN5:Tc%!_a%=FNea(U%,Hc%) 7130WHEN6:IF?T%=13PROCh(H%,FNmsg_1(A%!12,"OK7a",$J%),"OK2") 7135Tc%!_a%=FNfa(U%,FNc($T%),Hc%) 7140WHEN7:IF?T%<>13PROCX(H%,$T%,Tc%+_a%,Hc%) 7145WHEN8:IF?T%=13PROCh(H%,FNmsg_1(A%!12,"OK7a",$J%),"OK2") 7150Tc%!_a%=FNga(U%,FNc($T%)) 7155ENDCASE 7160ENDIF 7165_a%+=4:U%=U%!0:UNTILU%=0ORGc% 7170ENDIF 7175IFGc%=0THEN 7180IF!wb%>=Rc%Gc%=3 7185!wb%=Uc%:U%=eb%!4:T%=FNa(J%,$(U%+16)):IFT%THEN 7190Gc%=1 7195ELSE:eb%=eb%!0:T%=FNa(J%,$(eb%+12)+":"):IFT%Gc%=2 7200ENDIF 7205U%=0 7210ENDIF 7215UNTILU%=0:Dc%=Tc%:ENDPROC 7220DEFPROCMa(H%):LOCALeb%,s$,J%,Uc%,U%,Gc%,Tc%,Dc%,Fc%,Sc%,Hc%,i%:eb%=H%!8:REPEAT:J%=FNb($(eb%+12)+":"):IFJ%=0PROCh(H%,FNmsg_1(A%!12,"OK8",$(eb%+12)),"OK2") 7225B%=1145128264:C%=12:Fc%=USR(P%+12):IFFc%=0PROCh(H%,FNmsg_1(A%!12,"FA5","HEAD"),"OK2") 7230Fc%!0=0:Fc%!4=0:IFSc%Sc%!0=Fc%ELSEH%!12=Fc% 7235Dc%=0:REPEAT:U%=eb%!4:PROCW(eb%,Dc%,Fc%,Sc%,Gc%,Hc%,H%):IFGc%=0THEN 7240J%=FNd:PROCh(H%,FNmsg_1(A%!12,"OK9",$J%),"OK2") 7245ENDIF 7250UNTILGc%<>1:eb%=eb%!0:Sc%=Fc%:UNTILeb%=0:WHILEHc%:i%=Hc%!4:s$=$!i%:B%=1381257040:C%=!i%:CALLP%+16:B%=1381257040:C%=4:!i%=USR(P%+12):IF!i%=0PROCh(H%,FNmsg_1(A%!12,"FA5","POTR"),"OK2") 7255!!i%=FNH(s$,-1):i%=Hc%:Hc%=!Hc%:B%=1482184792:C%=i%:CALLP%+16:ENDWHILE:ENDPROC 7260DEFFNH(s$,Vc%):LOCALj%,k%,t$:j%=INSTR(s$,":"):t$=MID$(s$,j%+1):s$=LEFT$(s$,j%-1):j%=H%!8:k%=0:WHILEj%:IF$(j%+12)=s$THEN 7265j%=H%!12:WHILEk%:j%=j%!0:k%-=1:ENDWHILE:k%=VALt$-1:j%=j%!4:WHILEk%:j%=j%!0:k%-=1:ENDWHILE:IFVc%j%!(j%!4*4+8)+=1 7270=j% 7275ELSE:j%=j%!0:k%+=1 7280ENDIF 7285ENDWHILE:PROCb(FNmsg_2(A%!12,"FAG",s$,t$)):=0 7290DEFFNstore_integer(v%):LOCALb%:B%=1196707401:C%=4:b%=USR(P%+12):IFb%=0ERROR253,FNmsg_1(A%!12,"FA5","INTG") 7295!b%=v%:=b% 7300DEFFNS(s$):LOCALt$,i%,Wc%:SYS39,s$,O%,256TO,,Wc%:IFWc%=0THEN="" 7305FORi%=0TOWc%-1:t$+=CHR$O%?i%:NEXT:=t$ 7310DEFFNungstrans(s$):LOCALt$,i%,c%:IFs$=""THEN="" 7315FORi%=1TOLENs$:c%=ASCMID$(s$,i%,1):IFc%>=128c%-=128:t$+="|!" 7320IFc%<32c%+=64:t$+="|" 7325IFc%=127c%=63:t$+="|" 7330IFINSTR("|<""",CHR$c%)THENt$+="|" 7335t$+=CHR$c%:NEXT:=t$ 7340DEFFNea(U%,RETURNHc%):LOCALJ%,Ac%,b%,i$:B%=1280266050:C%=8:b%=USR(P%+12):IFb%=0ERROR253,FNmsg_1(A%!12,"FA5","BOOL") 7345J%=FNd:IFJ%THEN 7350CASEU%!8OF 7355WHEN1:J%=FNK(J%,Ac%):b%!0=FNstore_integer(Ac%):IF?J%=13J%=FNd 7360b%!4=FNstore_integer(FNc($J%)) 7365WHEN2,3,4:J%=FNr(J%,i$):$q%=i$:B%=q%:C%=U%!8:b%!0=USR(P%+28):IF?J%=13J%=FNd 7370B%=J%:C%=U%!8:b%!4=USR(P%+28) 7375WHEN7:J%=FNr(J%,i$):PROCX(H%,s$,b%+0,Hc%):IF?J%=13J%=FNd 7380PROCX(H%,$J%,b%+4,Hc%) 7385ENDCASE 7390ENDIF 7395=b% 7400DEFFNfa(U%,Xc%,RETURNHc%):LOCALi%,K%,Zc%,_c%,J%,`c%,ad%,Ac%,i$:IF1<=Xc%THEN 7405FORi%=1TOXc%:B%=1146377036:C%=4*U%!12+8:Zc%=USR(P%+12):IFZc%=0ERROR253,FNmsg_1(A%!12,"FA5","LSTD") 7410IF_c%_c%!0=Zc%ELSEK%=Zc% 7415Zc%!0=0:Zc%!4=U%!12:ad%=8:J%=FNd:IFJ%THEN 7420`c%=U%!8:WHILE`c%:CASE`c%!4OF 7425WHEN1:J%=FNK(J%,Ac%):Zc%!ad%=FNstore_integer(Ac%) 7430WHEN2,3,4:J%=FNr(J%,i$):$q%=i$:B%=q%:C%=`c%!4:Zc%!ad%=USR(P%+28) 7435WHEN7:J%=FNr(J%,i$):PROCX(H%,i$,Zc%+ad%,Hc%) 7440ENDCASE 7445`c%=!`c%:ad%+=4:ENDWHILE 7450ENDIF 7455_c%=Zc%:NEXT 7460ENDIF 7465=K% 7470DEFFNga(U%,Xc%):LOCALi%,Zc%,J%,_c%,K%,j%,t$:IF1<=Xc%THEN 7475FORi%=1TOXc%:J%=FNd:IFJ%THEN 7480t$=FNS($J%):B%=1380010051:C%=5+LENt$:Zc%=USR(P%+12):IFZc%=0ERROR253,FNmsg_1(A%!12,"FA5","CHAR") 7485Zc%!0=0:Zc%?4=ASCt$:Zc%?5=LENt$-1:t$=MID$(t$,2):IF1<=LENt$THEN 7490FORj%=1TOLENt$:Zc%?(j%+5)=ASCMID$(t$,j%,1):NEXT 7495ENDIF 7500IF_c%_c%!0=Zc%ELSEK%=Zc% 7505ENDIF 7510_c%=Zc%:NEXT 7515ENDIF 7520=K% 7525DEFPROCX(H%,c$,bd%,RETURNHc%):LOCALi%,s$,t$,cd%,dd%,Sc%,eb%,Dc%,ed%,Gc%,Tc%,t$:i%=INSTR(c$,":"):IFi%=0PROCh(H%,FNmsg_1(A%!12,"OKAA",c$),"OK2") 7530s$=LEFT$(c$,i%-1):t$=MID$(c$,i%+1):eb%=H%!8:ed%=H%!12:Sc%=0:WHILEeb%:IF$(eb%+12)=s$THEN 7535IFVALt$>0THEN 7540B%=1381257040:C%=LENc$+1:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 7545$i%=c$:!bd%=i%:B%=1482184792:C%=8:cd%=USR(P%+12):IFcd%=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 7550!cd%=Hc%:cd%!4=bd%:Hc%=cd%:ENDPROC 7555ELSE:IFed%THEN 7560Dc%=ed%!4:IFDc%THEN 7565WHILEDc%!0:Dc%=Dc%!0:ENDWHILE 7570ENDIF 7575ELSE:Dc%=0 7580ENDIF 7585dd%=Dc%:PROCW(eb%,Dc%,ed%,Sc%,Gc%,Hc%,H%):IFGc%=0ANDDc%=0THEN 7590J%=FNd:IFJ%t$=$J%ELSEt$="" 7595PROCh(H%,FNmsg_1(A%!12,"OK9",t$),"OK2") 7600ENDIF 7605Tc%=ed%!4:WHILETc%<>Dc%:IFTc%!(Tc%!4*4+8)THEN 7610Gc%=-1:IF0<=Tc%!4-1THEN 7615FORi%=0TOTc%!4-1:IFNOTFND(Tc%,Dc%,i%*4+8)THEN 7620Gc%=0:i%=Tc%!4 7625ENDIF 7630NEXT 7635ENDIF 7640IFGc%THEN 7645IF0<=Dc%!4-1THEN 7650FORi%=0TODc%!4-1:cd%=Dc%!(i%*4+8):PROCB(cd%):PROCfree_structure(cd%):NEXT 7655ENDIF 7660dd%!0=0:B%=1413763664:C%=Dc%:CALLP%+16:Dc%=Tc% 7665ELSE:Tc%=!Tc% 7670ENDIF 7675ELSE:Tc%=!Tc% 7680ENDIF 7685ENDWHILE:B%=1381257040:C%=4:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 7690!i%=Dc%:!bd%=i%:Dc%!(Dc%!4*4+8)+=1:ENDPROC 7695ENDIF 7700ELSE:eb%=eb%!0:IFVALt$=0THEN 7705Sc%=ed%:ed%=ed%!0 7710ENDIF 7715ENDIF 7720ENDWHILE:PROCh(H%,FNmsg_1(A%!12,"OKAB",s$),"OK2"):ENDPROC 7725DEFFND(s%,d%,o%):LOCALs$,d$:s%=s%!o%:d%=d%!o%:IFs%=0ORd%=0THEN 7730=(s%=d%) 7735ELSE:CASEs%!-4OF 7740WHEN1196707401:=!s%=!d% 7745WHEN1196577875:=$s%=$d% 7750WHEN810701907:CALLZ%,s%,s$:CALLZ%,d%,d$:=s$=d$ 7755WHEN1381258055:CALLY%,s%,s$:CALLY%,d%,d$:=s$=d$ 7760WHEN1280266050:=FNha(s%,d%) 7765WHEN1146377036:=FNia(s%,d%) 7770WHEN1381257040:=!s%=!d% 7775WHEN1380010051:=FNja(s%,d%) 7780OTHERWISE:PROCb(FNmsg_1(A%!12,"WA10",STR$~s%!-4)) 7785ENDCASE 7790ENDIF 7795=0 7800DEFFNha(s%,d%):IFFND(s%,d%,0)THEN=FND(s%,d%,4)ELSE=0 7805DEFFNia(s%,d%):LOCALi%:WHILEs%:IF0<=s%!4-1THEN 7810FORi%=0TOs%!4-1:IFNOTFND(s%,d%,i%*4+8)THEN=0 7815NEXT 7820ENDIF 7825s%=s%!0:d%=d%!0:ENDWHILE:=-1 7830DEFFNja(s%,d%):LOCALi%:WHILEs%:IFs%?4<>d%?4THEN=0 7835IFs%?5<>d%?5THEN=0 7840i%=s%?5:WHILEi%:IFs%?(i%+5)<>d%?(i%+5)THEN=0 7845i%-=1:ENDWHILE:s%=!s%:d%=!d%:ENDWHILE:=-1 7850DEFFNK(fd%,RETURNAc%):LOCALi%,gd%:i%=INSTR($fd%,","):IFi%=0THEN 7855Ac%=FNc($fd%):gd%=fd%+LEN$fd% 7860ELSE:Ac%=FNc(LEFT$($fd%,i%-1)):gd%=fd%+i%:WHILE?gd%=32:gd%+=1:ENDWHILE 7865ENDIF 7870=gd% 7875DEFFNr(fd%,RETURNi$):LOCALi%,pa$,hd%,id%:i$="":i%=0:WHILEfd%?i%=32:i%+=1:ENDWHILE:hd%=-1:id%=(fd%?i%=34):WHILENOT(fd%?i%=13OR(hd%ANDfd%?i%=44)):IFNOTid%ORfd%?i%<>34ORhd%i$+=CHR$fd%?i% 7880IFid%ANDfd%?i%=34hd%=NOThd% 7885i%+=1:ENDWHILE:IFfd%?i%=13THEN 7890gd%=fd%+i% 7895ELSE:gd%=fd%+i%+1:WHILE?gd%=32:gd%+=1:ENDWHILE 7900ENDIF 7905=gd% 7910DEFFNl(c$):LOCALc%,i%,jd%,kd%,ld%,md%,nd%,gd%,od%,kb%:SYS8,17,c$TOc%,,jd%,,Rc%:IFNOT(c%=0ORc%=1)THENSYS8,19,c$,c% 7915IFc%=0THEN=0 7920IF(jd%>>>20)=4095kd%=jd%>>8AND4095ELSEkd%=-1 7925IFkd%<>4038ERROR254,FNmsg_1(A%!12,"OKAL",c$) 7930B%=1096040772:C%=4+Rc%+1:Qc%=USR(P%+12)+4:IFQc%=4ERROR253,FNmsg_1(A%!12,"FA5","DATA") 7935SYS8,16,c$,Qc%:IFRc%>=20ANDQc%!0=1213419859THEN 7940SYS272129,8,-1TOld%:nd%=Qc%!4:B%=1096040772:C%=4+nd%+1:gd%=USR(P%+12)+4:IFgd%=4ERROR253,FNmsg_1(A%!12,"FA5","DATA") 7945SYS131102,6,,,ld%TOC%,,md%;kb%:IF(kb%AND1)ERROR253,FNmsg_1(A%!12,"FA5","squash") 7950SYS272129,4,md%,Qc%+20,Rc%-20,gd%,nd%TOod%:SYS30,7,,md%:B%=1096040772:C%=Qc%-4:CALLP%+16:Qc%=gd%:Rc%=nd% 7955ENDIF 7960wb%=Qc%-4:!wb%=0:xb%=1:B%=Qc%:C%=Rc%:CALLP%+52:IFQc%?(Rc%-1)<>13Rc%+=1:Qc%?(Rc%-1)=13 7965V$=c$:=-1 7970DEFPROCm:B%=1096040772:C%=Qc%-4:CALLP%+16:Qc%=0:Rc%=0:ENDPROC 7975DEFPROCRa:pd%=Qc%:qd%=wb%:rd%=Rc%:sd%=xb%:qa$=V$:ENDPROC 7980DEFPROCSa:Qc%=pd%:wb%=qd%:Rc%=rd%:xb%=sd%:V$=qa$:ENDPROC 7985DEFPROCTb(H%,R%):LOCALs%,t%,s$,z%,N%:R%!(R%!4*4+8)+=1:B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR253,FNmsg_1(A%!12,"FA5","PRNT") 7990IFA%!48THEN 7995s%=A%!48:WHILEs%!0:s%=s%!0:ENDWHILE:s%!0=z% 8000ELSE:A%!48=z% 8005ENDIF 8010z%!0=0:z%!4=H%:B%=R%!8:C%=2:z%!8=USR(P%+28):B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 8015SYS6,161,15TO,,s%:N%!0=(s%AND224)>>5:N%?4=1+((s%AND28)>>2):N%?5=0:SYS6,161,16TO,,s%:N%!8=(s%AND224)>>5:IFNOTFNtTHEN 8020N%!12=0 8025ELSE:SYS6,161,3TO,,s%:SYS6,161,4TO,,t%:IFs%THEN 8030$q%=STR$t%+"."+STR$s%:B%=q%:C%=2:N%!12=USR(P%+28) 8035ELSE:s$=CHR$t%:FORs%=1TO5:SYS6,161,152+s%TO,,t%:IFt%s$+=CHR$t%ELSEs%=5 8040NEXT:$q%=s$:B%=q%:C%=2:N%!12=USR(P%+28) 8045ENDIF 8050ENDIF 8055SYS131107,"PrinterType$5",O%,256,,3TO,,t%:O%?t%=13:B%=O%:C%=2:N%!16=USR(P%+28):N%!20=0:N%!24=0:N%!28=0:N%!32=0:N%?6=0:z%!12=N%:B%=1195789891:C%=4*H%!36:s%=USR(P%+12):IFs%=0ERROR253,FNmsg_1(A%!12,"FA5","CNFG") 8060IF0<=H%!36-1THEN 8065FORt%=0TOH%!36-1:s%!(t%*4)=0:NEXT 8070ENDIF 8075z%!16=s%:z%!20=-1:z%!24=0:z%!28=-1:z%!32=0:z%!36=0:z%!40=0:z%!44=0:IFH%!32AND4THEN 8080z%!48=FNI 8085ELSE:z%!48=0 8090ENDIF 8095z%!52=0:PROCc(H%,z%,-4,0):IFH%!24AND4PROCc(H%,z%,-12,0) 8100PROCk:IFH%!24AND8THEN 8105z%!56=10*H%?(24+1) 8110ELSE:z%!56=-1 8115ENDIF 8120PROCZ(z%):ENDPROC 8125DEFPROCt(RETURNz%,RETURNS%,RETURNqb%):SYS262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=0:z%=A%!48:WHILEz%:IFz%!28=qb%THEN 8130ENDPROC 8135ELSE:z%=z%!0 8140ENDIF 8145ENDWHILE:S%=Ka%:WHILES%:IFS%!16=qb%THEN 8150ENDPROC 8155ELSE:S%=S%!0 8160ENDIF 8165ENDWHILE:ENDPROC 8170DEFPROCVb (RETURNz%,RETURNqb%):SYS262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=0:z%=A%!48:WHILEz%:IFz%!28=qb%THEN 8175ENDPROC 8180ELSE:z%=z%!0 8185ENDIF 8190ENDWHILE:ENDPROC 8195DEFPROCWb (RETURNS%,RETURNqb%):SYS262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=Ka%:WHILES%:IFS%!16=qb%THEN 8200ENDPROC 8205ELSE:S%=S%!0 8210ENDIF 8215ENDWHILE:ENDPROC 8220DEFPROCT(z%):LOCALN%,i%,td%,ud%,vd%:IFz%!24AND8ERROR254,FNmsg_0(A%!12,"OKAJ") 8225Ba%=z%:Ca%=z%!4:N%=z%!12:IFz%!24AND(1<<17)THEN 8230ENDPROC 8235ENDIF 8240IFCa%!24AND4THEN 8245PROCc(Ca%,Ba%,-11,0):PROCs(FNprinter_find_window(Ba%,"connections")):PROCp(FNprinter_find_window(Ba%,"connections")) 8250ELSE:IFz%!40PROCicon_write(Q%,31,$z%!40)ELSEPROCicon_write(Q%,31,$z%!8) 8255IFN%?6AND1PROCicon_select(Q%,37)ELSEPROCicon_deselect(Q%,37) 8260PROCicon_deselect(Q%,0):PROCicon_deselect(Q%,1):PROCicon_deselect(Q%,2):PROCicon_deselect(Q%,3):PROCicon_deselect(Q%,4):PROCicon_deselect(Q%,33):i%=-1:CASEN%!0OF 8265WHEN1:i%=0 8270WHEN2:i%=1 8275WHEN4:IFFNt i%=2 8280WHEN5:i%=4 8285WHEN6:IFFNz i%=3 8290WHEN8:IFCa%!24AND16i%=33 8295ENDCASE 8300IFNOTi%PROCicon_select(Q%,i%) 8305PROCicon_write(Q%,15,FNmsg_0(A%!12,"BR"+STR$N%?4)):i%=N%!8:td%=i%AND3:vd%=(i%AND4)>>2:ud%=(i%AND48)>>4:IF(i%AND8)=0ud%=0ELSEud%+=1 8310PROCicon_write(Q%,17,FNmsg_0(A%!12,"DA"+STR$td%)):PROCicon_write(Q%,18,FNmsg_0(A%!12,"PA"+STR$ud%)):IFvd%=0THEN 8315PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB0")) 8320ELSE:IFtd%=0ANDud%<>0THEN 8325PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1b")) 8330ELSE:IFtd%=3ANDud%=0THEN 8335PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1c")) 8340ELSE:PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1a")) 8345ENDIF 8350ENDIF 8355ENDIF 8360IFN%?5PROCicon_select(Q%,13)ELSEPROCicon_deselect(Q%,13) 8365IFN%?6AND2PROCicon_select(Q%,35)ELSEPROCicon_deselect(Q%,35) 8370PROCu(Q%,25,N%,12):PROCu(Q%,26,N%,20):PROCu(Q%,27,N%,24):PROCu(Q%,28,N%,28):PROCu(Q%,29,N%,32):IFN%!16<>0THEN 8375IF?(N%!16)>32AND?(N%!16)<127PROCu(Q%,30,N%,16)ELSEPROCicon_write(Q%,30,"null:") 8380ELSE:PROCicon_write(Q%,30,"null:") 8385ENDIF 8390IFFNtPROCicon_unshade(Q%,2)ELSEPROCicon_shade(Q%,2) 8395IFFNzPROCicon_unshade(Q%,3)ELSEPROCicon_shade(Q%,3) 8400!V%=Q%:SYS262348,,V%OR1:V%!28=-1:IFCa%!24AND16PROCicon_unshade(Q%,33)ELSEPROCicon_shade(Q%,33) 8405PROCs(Q%):SYS262341,,V%:PROCqb 8410ENDIF 8415ENDPROC 8420DEFPROCu(Nb%,qb%,wd%,_a%):PROCicon_write(Nb%,qb%,FNprinter_read_string(wd%!_a%)):ENDPROC 8425DEFPROCC(wd%,_a%,qb%):IFwd%!_a%THEN 8430B%=1196577875:C%=wd%!_a%:CALLP%+16:wd%!_a%=0 8435ENDIF 8440!X%=Q%:X%!4=qb%:SYS262350,,X%:B%=X%!28:C%=2:wd%!_a%=USR(P%+28):ENDPROC 8445DEFFNv:=FNV(Q%,17,3,"DA",A%!12) 8450DEFFNq:=FNV(Q%,18,4,"PA",A%!12) 8455DEFFNW:IFFNicon_read(Q%,19)=FNmsg_0(A%!12,"SB0")THEN=0ELSE=1 8460DEFPROCHb(xd%):IFxd%=-1xd%=FNW 8465IFxd%=0THEN 8470PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB0")) 8475ELSE:IFFNv=0ANDFNq<>0THEN 8480PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1b")) 8485ELSE:IFFNv=3ANDFNq=0THEN 8490PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1c")) 8495ELSE:PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1a")) 8500ENDIF 8505ENDIF 8510ENDIF 8515ENDPROC 8520DEFFNV(Nb%,qb%,yd%,ra$,zd%):LOCALi%,s$:s$=FNicon_read(Nb%,qb%):IF0<=yd%THEN 8525FORi%=0TOyd%:IFs$=FNmsg_0(zd%,ra$+STR$i%)THEN=i% 8530NEXT 8535ENDIF 8540=0 8545DEFPROClb:LOCALN%,i%,p$,s$:N%=Ba%!12:N%!0=0:IFFNicon_set(Q%,37)THEN 8550N%?6=N%?6OR1 8555ELSE:N%?6=N%?6ANDNOT1 8560ENDIF 8565IFFNicon_set(Q%,0)THEN 8570p$=FNC(1,Ba%):IFp$=""N%!0=1ELSEERROR254,FNmsg_1(A%!12,"OKI",p$) 8575ENDIF 8580IFFNicon_set(Q%,1)THEN 8585p$=FNC(2,Ba%):IFp$=""N%!0=2ELSEERROR254,FNmsg_1(A%!12,"OKJ",p$) 8590ENDIF 8595IFFNicon_set(Q%,2)N%!0=4 8600IFFNicon_set(Q%,3)N%!0=6 8605IFFNicon_set(Q%,4)N%!0=5 8610IFFNicon_set(Q%,33)N%!0=8 8615s$=FNicon_read(Q%,15):FORi%=0TO18:IFFNmsg_0(A%!12,"BR"+STR$i%)=s$THEN 8620N%?4=i%:i%=18 8625ENDIF 8630NEXT:i%=FNvORFNW<<2:IFFNq i%=i%ORFNq-1<<4OR8 8635N%!8=i%:IFFNicon_set(Q%,13)THEN 8640N%?5=1 8645ELSE:N%?5=0 8650ENDIF 8655IFFNicon_set(Q%,35)THEN 8660N%?6=N%?6OR2 8665ELSE:N%?6=N%?6ANDNOT2 8670ENDIF 8675PROCC(N%,12,25):PROCC(N%,20,26):PROCC(N%,24,27):PROCC(N%,28,28):PROCC(N%,32,29):PROCC(N%,16,30):PROCkb(Ba%):PROCf(-1,Ba%,0):IFNOTBa%!20THEN 8680IFBa%!24AND2THEN 8685PROCselect_printer(Ba%,-1,0) 8690ENDIF 8695PROCi(Ba%) 8700ENDIF 8705ENDPROC 8710DEFPROCi(z%):LOCALsa$,i%,x$,ta$,Ad%,H%:IFz%!20=-1ENDPROC 8715H%=z%!4:sa$=FNX(z%):IFz%!44x$=$z%!44ELSEx$=$H%!4 8720ta$="ss_"+x$+","+x$:!O%=-1:O%!4=z%!20:SYS262350,,O%:Ad%=O%!24AND1<<21:IFsa$<>$O%!28ORta$<>$O%!32THEN 8725i%=FNs(sa$,x$,-4,z%!20):PROCD(-1,z%!20):z%!20=i%:IFAd%PROCicon_select(-1,i%) 8730ENDIF 8735ENDPROC 8740DEFFNX(z%):LOCALN%,M%:IFz%!24AND4THEN=FNmsg_0(A%!12,"QU1") 8745IFz%!24AND8THEN 8750M%=z%!32:IFM%?11AND1THEN=FNmsg_0(A%!12,"QU1")ELSE=FNmsg_0(A%!12,"QU2") 8755ENDIF 8760IFz%!24AND32THEN=FNmsg_0(A%!12,"QU3") 8765IFz%!40THEN=$z%!40 8770N%=z%!12:CASEN%!0OF 8775WHEN0,1,2,5:=FNmsg_0(A%!12,"IC"+STR$N%!0) 8780WHEN4:=$N%!12 8785WHEN6:=$N%!24 8790ENDCASE 8795="" 8800DEFPROCCb:LOCAL_a%,od%,wc%,i%,s$,pc%:B%=1414744396:C%=2048:wc%=USR(P%+12):IFwc%=0ERROR253,FNmsg_1(A%!12,"FA5","LIST") 8805SYS393735,1,wc%,2048,500TO_a%;i%:IFi%AND1i%=_a%+4:CALLZ%,i%,s$:ERROR254,s$ 8810PROCmenu_create(_%,FNmsg_0(A%!12,"ME6")):pc%=(_%!28AND256)<>0:od%=wc%:i%=0:WHILEi%<_a%:CALLZ%,od%,s$:od%+=LENs$+1:PROCmenu_item(_%,i%,s$,pc%):i%+=1:ENDWHILE:B%=1414744396:C%=wc%:CALLP%+16:ENDPROC 8815DEFPROCKb:LOCALz%,N%,qb%,kb%:LOCALS%,Bd%,Cd%,lb%,Dd%:REPEAT:PROCVb(z%,qb%):IFz%THEN 8820PROCicon_deselect(Fb%,qb%):IF(z%!24AND1)=0PROCZ(z%) 8825IF(z%!24AND(1<<16))THEN 8830PROCib (z%) 8835ENDIF 8840ENDIF 8845UNTILz%=0:Cd%=0:SYS263872:REPEAT:PROCWb (S%,qb%):IFS%THEN 8850IFS%!20<=0THEN 8855PROCicon_deselect(Fb%,qb%):lb%=FNF (S%!4,S%!8,S%!12):PROCL (Cd%,lb%) 8860ENDIF 8865ENDIF 8870UNTILS%=0:lb%=Cd%:WHILElb%:Bd%=FNy(lb%,0,0,0,kb%):PROCWa (Ka%,$lb%!4):Dd%=lb%:lb%=lb%!0:PROCd (1380799568,Dd%):ENDWHILE:SYS263873:ENDPROC 8875DEFPROCZ(z%):z%!24=z%!24OR1:N%=z%!12:PROCXa(z%):PROCA(z%):IFA%!44=1THEN 8880PROCselect_printer(z%,-1,0) 8885ENDIF 8890ENDPROC 8895DEFPROCXa(z%):LOCALs$,i%,pb%,H%:H%=z%!4:IFz%!44THEN 8900s$=$z%!44 8905ELSE:s$=$H%!4 8910ENDIF 8915i%=FNka(z%):pb%=-4:IFi%=-1THEN 8920i%=FNZ(z%):pb%=-3 8925ENDIF 8930IFi%=-1THEN 8935i%=251658240:pb%=-5 8940ENDIF 8945z%!20=FNs(FNX(z%),s$,pb%,i%):IFvb%THEN 8950PROCD(-1,ub%):vb%=0 8955ENDIF 8960A%!44+=1:ENDPROC 8965DEFFNka(z%):LOCALqb%,Fd%:IFvb%THEN 8970qb%=ub% 8975ELSE:qb%=-1:Fd%=A%!48:WHILEFd%:IFNOTFd%!20qb%=Fd%!20 8980IFFd%=z%Fd%=0ELSEFd%=Fd%!0 8985ENDWHILE 8990ENDIF 8995=qb% 9000DEFFNZ(z%):WHILEz%!20=-1:z%=z%!0:IFz%=0THEN=-1 9005ENDWHILE:=z%!20 9010DEFPROCXb:ub%=FNs(FNmsg_0(A%!12,"NNE"),"s"+FNmsg_0(A%!12,"IC"),-5,251658240):vb%=-1:!q%=A%!40:PROCe:ENDPROC 9015DEFPROCLb:LOCALz%,qb%,Gd%,c$,Dd%:LOCALS%,Gd%,Cd%,lb%,z%:Cd%=0:REPEAT:PROCt(z%,S%,qb%):PROCicon_deselect(Fb%,qb%):IFz%THEN 9020IFz%!24AND(1<<17)THEN 9025lb%=FNF (0,0,z%):PROCL (Cd%,lb%) 9030ELSE:PROCZb(z%) 9035ENDIF 9040ENDIF 9045IFS%ANDS%!20>0THEN 9050PROC_b ($S%!4):IFFNL=0ANDA%!44=0THEN 9055PROCXb 9060ENDIF 9065ENDIF 9070UNTILz%=0ANDS%=0:lb%=Cd%:WHILElb%:z%=lb%!12:c$=$z%!40:PROC`b (z%):PROCac (c$):Dd%=lb%:lb%=lb%!0:PROCd (1380799568,Dd%):ENDWHILE:PROCk:IFW%=0THEN 9075IFA%!44THEN 9080Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 9085PROCselect_printer(Gd%,-1,0):Gd%=0 9090ELSE:Gd%=Gd%!0 9095ENDIF 9100ENDWHILE 9105ENDIF 9110ENDIF 9115ENDPROC 9120DEFPROCZb(z%):LOCALHd%:IFz%!24AND(1<<16)THEN 9125PROCib (z%) 9130ENDIF 9135IFz%!24AND(1<<17)THEN 9140Hd%=-1 9145ENDIF 9150IFz%!24AND1THEN 9155IFz%!24AND(1<<17)THEN 9160Gd%=-1 9165ELSE:IFz%!32THEN 9170Gd%=FN_("WA2",$z%!8) 9175ELSE:Gd%=-1 9180ENDIF 9185ENDIF 9190IFGd%THEN 9195PROCc(z%!4,z%,-10,0):IFNOTz%!20THEN 9200IFA%!44=1ANDFNL=0THEN 9205PROCXb 9210ENDIF 9215IFA%!44=1ANDFNL>0THEN 9220!q%=A%!40:PROCe 9225ENDIF 9230PROCD(-1,z%!20):z%!20=-1:A%!44-=1 9235ENDIF 9240z%!24=z%!24ANDNOT63+65536:IFW%=z%SYS524632,-1:W%=0 9245PROCA(z%) 9250ENDIF 9255ENDIF 9260ENDPROC 9265DEFPROCMb:LOCALi%,z%,K%,Id%,Jd%,Gd%,y$:B%=1482184792:C%=256:Jd%=USR(P%+12):IFJd%=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 9270SYS262358,Fb%,Jd%,1<<21,1<<21:K%=Jd%:SYS263872:WHILENOT!K%:i%=!K%:z%=A%!48:Id%=0:WHILEz%:IF((z%!24AND(1<<17))=0)ANDz%!28=i%THEN 9275IFz%!32THEN 9280SYS263873:Gd%=FN_("WA3",$z%!8):SYS263872:IFGd%PROCA(z%) 9285ELSE:Gd%=-1 9290ENDIF 9295IFGd%THEN 9300y$=$z%!8:PROCbc(z%,Id%):PROCNb(y$) 9305ENDIF 9310z%=0 9315ELSE:Id%=z%:z%=z%!0 9320ENDIF 9325ENDWHILE:K%+=4:ENDWHILE:IFW%=0THEN 9330IFA%!44THEN 9335Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 9340PROCselect_printer(Gd%,-1,0):Gd%=0 9345ELSE:Gd%=Gd%!0 9350ENDIF 9355ENDWHILE 9360ENDIF 9365ENDIF 9370IFW%=0PROCz 9375B%=1482184792:C%=Jd%:CALLP%+16:PROCk:PROCp(Fb%):SYS263873:ENDPROC 9380DEFPROCbc(z%,Id%):LOCALj%,i%,Ra%,H%,R%:H%=z%!4:R%=H%!12:R%=R%!4:PROCc(H%,z%,-9,0):PROCZb(z%):WHILER%:IF$R%!8=$z%!8THEN 9385R%!(R%!4*4+8)-=1:R%=0 9390ELSE:R%=R%!0 9395ENDIF 9400ENDWHILE:IFBa%=z%THEN 9405!q%=Q%:PROCe 9410ENDIF 9415i%=H%!20:WHILEi%:IFi%!12=z%THEN 9420!q%=i%!4:PROCe 9425ENDIF 9430i%=i%!0:ENDWHILE:IFz%!48PROCZa(z%!48) 9435IFW%=z%W%=0 9440PROCfree_structure(z%!8):j%=z%!12:IF(H%!24AND4)THEN 9445Ra%=H%!48:IF1<=Ra%THEN 9450FORi%=1TORa%:PROCfree_structure(!j%):j%+=4:NEXT 9455ENDIF 9460ELSE:PROCfree_structure(j%!12):PROCfree_structure(j%!16):PROCfree_structure(j%!20):PROCfree_structure(j%!24):PROCfree_structure(j%!28):PROCfree_structure(j%!32) 9465ENDIF 9470B%=1413697091:C%=j%:CALLP%+16:j%=z%!16:IFj%THEN 9475Ra%=H%!36:IF0<=Ra%-1THEN 9480FORi%=0TORa%-1:PROCfree_structure(j%!(i%*4)):NEXT 9485ENDIF 9490ENDIF 9495B%=1195789891:C%=j%:CALLP%+16:!q%=Fb%:q%!4=z%!28:SYS262350,,q%:q%!8=1<<7OR1<<23:q%!12=1<<7OR1<<23OR1<<21:SYS262349,,q%:j%=z%!52:WHILEj%:PROCfree_structure(j%!4):PROCfree_structure(j%!8):i%=j%!0:B%=1414418246:C%=j%:CALLP%+16:j%=i%:ENDWHILE:j%=z%!0:B%=1414419024:C%=z% 9500CALLP%+16:IFId%THEN 9505Id%!0=j% 9510ELSE:A%!48=j% 9515ENDIF 9520ENDPROC 9525DEFFN_(oa$,ua$):LOCALx%,y%,w%,h%:PROCicon_write(Db%,0,FNmsg_1(A%!12,oa$,ua$)):PROCicon_write(Db%,3,FNmsg_0(A%!12,oa$+"a")):SYS262351,,q%:x%=!q%:y%=q%!4:!q%=Db%:SYS262347,,q%:w%=q%!12-q%!4:h%=q%!16-q%!8:q%!4=x%-340:q%!8=y%-120:q%!12=q%!4+w% 9530q%!16=q%!8+h%:q%!28=-1:SYS262341,,q%:PROCcc(Db%):sa%=0:REPEAT:PROCv(ma%):UNTILsa%:!q%=Db%:PROCe:PROCdc:=(sa%=3) 9535DEFPROCcc(h%):!q%=h%:SYS262368,,q%:?q%=1:q%!1=q%!4:q%!3=q%!8:q%!5=q%!12:q%!7=q%!16:SYS7,21,q%:ENDPROC 9540DEFPROCdc:LOCALKd%,Ld%,Md%,Nd%,Od%,Pd%:SYS53,-1,4TO,,Ld%:Ld%=1<<Ld%:SYS53,-1,5TO,,Nd%:Nd%=1<<Nd%:SYS53,-1,11TO,,Kd%:Kd%+=1:SYS53,-1,12TO,,Md%:Md%+=1:Od%=Kd%*Ld%:Pd%=Md%*Nd%:?q%=1:q%!1=0:q%!3=0:q%!5=Od%:q%!7=Pd%:SYS7,21,q%:ENDPROC 9545DEFPROCk:LOCALz%,K%,i%:LOCALS%:!O%=Fb%:IFva%THEN 9550FORi%=0TOva%-1:O%!4=i%+4:SYS262340,,O%:NEXT 9555ENDIF 9560IFMa%THEN 9565FORi%=va%TOva%+Ma%:O%!4=i%+4:SYS262340,,O%:NEXT 9570ENDIF 9575va%=0:Ma%=0:!O%=Fb%:O%!4=0:O%!8=a%(4)!4:O%!12=1030:O%!16=a%(4)!12:O%!20=a%(4)!16:O%!24=a%(4)!20:O%!28=a%(4)!24:O%!32=a%(4)!28:z%=A%!48:WHILEz%:SYS262338,,O%TOi%:va%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):z%!28=i%:z%=z%!0:ENDWHILE:S%=Ka%:WHILES% 9580SYS262338,,O%TOi%:Ma%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):S%!16=i%:S%=S%!0:ENDWHILE:SYS262348,,O%OR1:O%!0=0:O%!4=-(va%+Ma%+1)*(a%(4)!12-a%(4)!4):O%!8=O%!52-O%!44:O%!12=0:SYS262359,Fb%,O% 9585O%!4=-(va%+Ma%+2)*(a%(4)!12-a%(4)!4):SYS262353,Fb%,O%!0,O%!4,O%!8,O%!12:IFFNi (Fb%)THEN 9590PROCp(Fb%) 9595ENDIF 9600ENDPROC 9605DEFFNz:LOCALi%:SYS131129,,"NFS_Mount"TO;i%:=((i%AND1)=0) 9610DEFFNt:LOCALi%:SYS131129,,"NetPrint_ReadPSName"TO;i%:=((i%AND1)=0) 9615DEFFNc(s$):LOCALt%,n%,f%:SYS131117,s$,aa%,256TO,t%,n%;f%:IFt%OR(f%AND1)ERROR253,FNmsg_1(A%!12,"FAD",s$) 9620=n% 9625DEFFNT(s$):LOCALQd%,f%:SYS131113,37,s$,aa%,0,0,256TO,,,,,Qd%;f%:IF(Qd%<=0)OR(f%AND1):=s$ 9630aa%?(256-Qd%)=13:=$aa% 9635DEFPROCw(z%,Rd%,Sd%):LOCALp%:p%=ua%:WHILEp%:PROCc(p%,z%,Rd%,Sd%):p%=p%!0:ENDWHILE:ENDPROC 9640DEFPROCc(H%,z%,Rd%,Td%):LOCALi%:LOCALERROR:ONERRORLOCAL:RESTOREERROR:PROCec(H%,z%,Rd%):ENDPROC 9645O%!0=Rd%:O%!4=H%:O%!8=z%:O%!12=Td%:O%!16=ja%:O%!20=P%:O%!24=A%:IFH%!24AND1THEN 9650i%=EVAL("FN"+$H%!4+"_support("+STR$O%+")") 9655ELSE:IF0<=Za%-1THEN 9660FORi%=0TOZa%-1:IF$H%!4=b$(i%)THEN 9665B%=O%:CALLb%(i%) 9670ENDIF 9675NEXT 9680ENDIF 9685ENDIF 9690ENDPROC 9695DEFPROCec(H%,z%,Rd%):IF(z%!24AND8)ERROR254,REPORT$ 9700IFERR=253ERROR253,REPORT$ 9705PROCb(FNw(A%!12,"WA6",$H%!4,STR$Rd%,REPORT$,STR$ERL)):ENDPROC 9710DEFPROCfc(z%):z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 9715DEFPROCpb(z%,c$):LOCALLb%,Ud%,i%:IFc$="configure"THEN 9720IFz%!24AND8ERROR254,FNmsg_0(A%!12,"OKAI") 9725ENDIF 9730Lb%=FNprinter_find_window(z%,c$):PROCs(Lb%):PROCp(Lb%):!O%=Lb%:SYS262348,,O%OR1:Ud%=O%!88:FORi%=0TOUd%:!O%=Lb%:O%!4=i%:SYS262350,,O%:IF(O%!24AND(1<<23))=0THEN 9735IF(O%!24AND(15<<12))=(15<<12)THEN 9740IF(z%!24AND(1<<16))OR(z%!24AND(1<<17))THEN 9745PROCicon_shade (Lb%,i%):PROCcaret_set (-1,-1) 9750ELSE:PROCicon_unshade (Lb%,i%):PROCcaret_set(Lb%,i%) 9755ENDIF 9760ENDPROC 9765ENDIF 9770ENDIF 9775NEXT:ENDPROC 9780DEFFNprinter_find_window(z%,c$):LOCALH%:H%=z%!4:i%=H%!20:WHILEi%:IF$(i%+16)=c$THEN 9785i%!8=H%:i%!12=z%:=i%!4 9790ENDIF 9795i%=i%!0:ENDWHILE:ERROR253,FNmsg_1(A%!12,"FAE",c$):=0 9800DEFPROCH(Lb%,RETURNNb%,RETURNH%,RETURNz%):H%=ua%:WHILEH%:Nb%=H%!20:WHILENb%:IFNb%!4=Lb%THEN 9805z%=Nb%!12:ENDPROC 9810ENDIF 9815Nb%=Nb%!0:ENDWHILE:H%=H%!0:ENDWHILE:Nb%=0:H%=0:z%=0:ENDPROC 9820DEFFNprinter_find_prdata_entry(H%,c$):LOCALR%:IFH%=0THEN=0 9825R%=H%!12:IFR%=0THEN=0 9830R%=R%!4:IFR%=0THEN=0 9835WHILE$R%!8<>c$:R%=R%!0:IFR%=0THEN=0 9840ENDWHILE:=R% 9845DEFFN`(K%):IFK%=0THEN=0 9850IFK%!-4<>1196707401ANDK%!-4<>1381257040THEN 9855ERROR253,FNmsg_0(A%!12,"FA6") 9860ENDIF 9865=!K% 9870DEFFNprinter_read_string(K%):LOCALi%,s$:IFK%=0THEN="" 9875CASEK%!-4OF 9880WHEN1196577875:=$K% 9885WHEN810701907:CALLZ%,K%,s$:=s$ 9890WHEN1381258055:CALLY%,K%,s$:=s$ 9895ENDCASE 9900ERROR253,FNmsg_0(A%!12,"FA7"):="" 9905DEFFNprinter_read_integer_entry(R%,Vd%):IFR%=0THEN=0 9910=FN`(R%!(4+Vd%*4)) 9915DEFPROCprinter_write_integer_entry(R%,Vd%,Wd%):LOCALK%:IFR%<>0THEN 9920K%=R%!(4+Vd%*4):IFK%!-4<>1196707401ANDK%!-4<>1381257040THEN 9925ERROR253,FNmsg_0(A%!12,"FA6") 9930ENDIF 9935!K%=Wd% 9940ENDIF 9945ENDPROC 9950DEFFNprinter_read_string_entry(R%,Vd%):IFR%=0THEN="" 9955=FNprinter_read_string(R%!(4+Vd%*4)) 9960DEFFNprinter_read_boolean_string_entry(R%,Vd%,Xd%):LOCALK%:IFR%=0="" 9965K%=R%!(4+Vd%*4):IFK%!-4<>1280266050ERROR253,FNmsg_0(A%!12,"FA8") 9970IFXd%THEN 9975=FNprinter_read_string(K%!4) 9980ELSE:=FNprinter_read_string(K%!0) 9985ENDIF 9990DEFFNprinter_read_list_integer_entry(R%,Vd%,wc%,Zd%):LOCALK%:IFR%=0THEN=0 9995K%=R%!(4+Vd%*4):IFK%=0=0 10000IFK%!-4<>1146377036ERROR253,FNmsg_0(A%!12,"FA9") 10005WHILEwc%<>1ANDK%:K%=K%!0:wc%-=1:ENDWHILE:IFK%=0=0 10010K%+=8:WHILEZd%<>1:K%+=4:Zd%-=1:ENDWHILE:=FN`(!K%) 10015DEFFNprinter_read_list_string_entry(R%,Vd%,wc%,Zd%):LOCALK%:IFR%=0THEN="" 10020K%=R%!(4+Vd%*4):IFK%=0="" 10025IFK%!-4<>1146377036ERROR253,FNmsg_0(A%!12,"FA9") 10030WHILEwc%<>1ANDK%:K%=K%!0:wc%-=1:ENDWHILE:IFK%=0="" 10035K%+=8:WHILEZd%<>1:K%+=4:Zd%-=1:ENDWHILE:=FNprinter_read_string(!K%) 10040DEFPROCaa(N$,RETURN_d%):LOCALERROR:ONERRORLOCALRESTOREERROR:ERROR0,REPORT$ 10045SYS30,6,,,17+LENN$TO,,_d%:$(_d%+16)=N$:SYS267521,_d%,_d%+16:ENDPROC 10050DEFFNmsg_0(_d%,T$)=FNw(_d%,T$,"","","","") 10055DEFFNmsg_1(_d%,T$,S$)=FNw(_d%,T$,S$,"","","") 10060DEFFNmsg_2(_d%,T$,va$,wa$)=FNw(_d%,T$,va$,wa$,"","") 10065DEFFNG(_d%,T$,va$,wa$,xa$)=FNw(_d%,T$,va$,wa$,xa$,"") 10070DEFFNw(_d%,T$,va$,wa$,xa$,ya$):LOCALF%,L%:SYS398594,_d%,T$,ba%,256,va$,wa$,xa$,ya$TO,,,L%;F%:IFF%AND1THEN=T$ 10075ba%?L%=13:=$ba% 10080DEFPROC_(_d%):IF_d%THEN 10085SYS267524,_d%:SYS131102,7,,_d% 10090ENDIF 10095ENDPROC 10100DEFPROCca(n$):za$=n$:q%!0=524626:q%!4=524614:q%!8=524613:q%!12=524611:q%!16=524610:q%!20=524609:q%!24=524608:q%!28=262345:q%!32=1282:q%!36=12:q%!40=11:q%!44=10:q%!48=8:q%!52=3:q%!56=2:q%!60=1:q%!64=5:q%!68=0 10105SYS262336,300,1263747412,n$,q%TO`d%,Rb%:ENDPROC 10110DEFPROCjb:SYS262365:END 10115DEFFNaa(da%):LOCALae%,be%,z%,t%:IFK$<>""da%=da%OR1 10120IF(da%AND1)=0ORfa%=-1ORda%<>A%!20THEN 10125SYS262343,da%,q%,,La%TOae% 10130ELSE:IFfa%=0ORK$<>""THEN 10135SYS262343,da%ANDNOT1,q%,,La%TOae% 10140ELSE:SYS262369,da%ANDNOT1,q%,ka%+fa%,La%TOae% 10145ENDIF 10150ENDIF 10155SYS66TObe%:ce%=be%-ka%:ka%=be%:z%=A%!48:WHILEz%:t%=z%+56:IFNOT!t%THEN 10160IFce%<!t% !t%-=ce%ELSE!t%=0 10165ENDIF 10170z%=z%!0:ENDWHILE:=ae% 10175DEFPROCoa:LOCALz%,H%,t%:IFK$<>""THEN 10180SYS131080,6,K$:K$="" 10185ENDIF 10190z%=A%!48:WHILEz%:t%=z%+56:IF!t%=0THEN 10195H%=z%!4:PROCc(H%,z%,0,0):!t%=10*H%?(24+1) 10200ENDIF 10205z%=z%!0:ENDWHILE:ENDPROC 10210DEFFNtask_read_env(n$,de%):LOCALWc%,ab%:SYS131107,n$,de%,256,,3TO,,Wc%;ab%:IFab%AND1Wc%=0 10215de%?Wc%=13:=$de% 10220DEFFNla(a$,b$):LOCALee%:SYS274525,-1,a$,b$,3TOee%:=ee% 10225DEFFNtask_lower(s$):LOCALl$,fe%,i%:SYS274519,-1TOfe%:l$="":IF1<=LENs$THEN 10230FORi%=1TOLENs$:l$+=CHR$fe%?ASCMID$(s$,i%,i%):NEXT 10235ENDIF 10240=l$ 10245DEFFNtask_upper(s$):LOCALu$,fe%,i%:SYS274520,-1TOfe%:u$="":IF1<=LENs$THEN 10250FORi%=1TOLENs$:u$+=CHR$fe%?ASCMID$(s$,i%,i%):NEXT 10255ENDIF 10260=u$ 10265DEFPROCda:DIMge%256:ENDPROC 10270DEFPROCma:LOCALr$,r%:r$=REPORT$:r%=INSTR(r$,"in "+CHR$34+"!"):IFr%r$=LEFT$(r$,r%-1) 10275CASEERROF 10280WHEN254:PROCj(r$,1) 10285WHEN253:PROCj(r$,2) 10290OTHERWISE:PROCj(r$+" (&"+STR$~ERR+") @"+STR$ERL,3) 10295ENDCASE 10300ENDPROC 10305DEFPROCj(r$,he%):LOCALr%:SYS262356,,-1:!ge%=ERR:$(ge%+4)=r$+CHR$0:SYS262367,ge%,he%,za$TO,r%:IFr%=2THEN 10310ONERROROFF 10315Qb%=2:PROCI:PROCx 10320ENDIF 10325ENDPROC 10330DEFPROCb(r$):!ge%=1:$(ge%+4)=r$+CHR$0:SYS262367,ge%,1OR1<<4,FNmsg_1(A%!12,"ER2",za$):ENDPROC 10335DEFPROCea:ie%=0:ENDPROC 10340DEFFNs(Aa$,x$,pb%,je%):LOCALt%,s%,i%,v$,w%:IFx$="s"+FNmsg_0(A%!12,"IC")THEN 10345v$="s"+x$:SYS262377,40,,x$TO,,,w% 10350ELSE:SYS393449,40,,x$TO,,,w%;i%:IFi%AND1THEN 10355SYS262377,40,,"s"+FNmsg_0(A%!12,"IC")TO,,,w%:IFLEFT$(x$,3)="su_"THEN 10360v$="ssu"+FNmsg_0(A%!12,"IC") 10365ELSE:v$="ss"+FNmsg_0(A%!12,"IC")+","+FNmsg_0(A%!12,"IC") 10370ENDIF 10375ELSE:IFLEFT$(x$,3)="su_"THEN 10380v$="s"+x$ 10385ELSE:v$="ss_"+x$+","+x$ 10390ENDIF 10395ENDIF 10400ENDIF 10405B%=1179009609:C%=LENAa$+1:t%=USR(P%+12):IFt%=0ERROR253,FNmsg_1(A%!12,"FA5","IBFF") 10410$t%=Aa$:B%=1179009609:C%=LENv$+1:s%=USR(P%+12):IFs%=0ERROR253,FNmsg_1(A%!12,"FA5","IBFF") 10415$s%=v$:SYS53,-1,4TO,,i%:IF(w%<<i%)<LENAa$*16w%=LENAa$*16ELSEw%=w%<<i% 10420X%!0=pb%:X%!4=0:X%!8=-16:X%!12=w%:X%!16=88:X%!20=385888523:X%!24=t%:X%!28=s%:X%!32=LENAa$+1:SYS262338,je%,X%TOi%:=i% 10425DEFPROCD(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:SYS262340,,X%:IFX%!24AND1<<8THEN 10430IFX%!24AND3THEN 10435B%=1179009609:C%=X%!28:CALLP%+16:IFX%!24AND1THEN 10440IFNOTX%!32THEN 10445B%=1179009609:C%=X%!32:CALLP%+16 10450ENDIF 10455ENDIF 10460ENDIF 10465ENDIF 10470ENDPROC 10475DEFPROCicon_write(a%,b%,s$):LOCALh%,i%,n%:PROCcaret_info(h%,i%,n%):!X%=a%:X%!4=b%:SYS262350,,X%:IFLENs$+1>X%!36THEN 10480ERROR253,FNmsg_2(A%!12,"FAH",s$,STR$b%) 10485ENDIF 10490$X%!28=s$:X%!8=0:X%!12=0:SYS262349,,X%:IFh%=a%ANDi%=b%PROCcaret_set(a%,b%) 10495ENDPROC 10500DEFPROCicon_validation(a%,b%,s$):!X%=a%:X%!4=b%:SYS262350,,X%:$X%!32=s$:X%!8=0:X%!12=0:SYS262349,,X%:ENDPROC 10505DEFFNicon_read(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:=$X%!28 10510DEFPROCicon_unshade(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<22:SYS262349,,X%:ENDPROC 10515DEFPROCicon_shade(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<22:X%!12=1<<22:SYS262349,,X%:ENDPROC 10520DEFPROCicon_deselect(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<21:SYS262349,,X%:IFa%=Fb%wa%=0 10525ENDPROC 10530DEFPROCicon_select(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<21:X%!12=1<<21:SYS262349,,X%:IFa%=Fb%wa%=0 10535ENDPROC 10540DEFFNicon_set(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:=(X%!24AND1<<21)<>0 10545DEFPROCicon_info(a%,b%,RETURNke%,RETURNle%,RETURNme%,RETURNne%):!X%=a%:X%!4=b%:SYS262350,,X%:ke%=X%!8:le%=X%!12:me%=X%!16:ne%=X%!20:ENDPROC 10550DEFPROCcaret_set(h%,i%):LOCALj%:j%=LENFNicon_read(h%,i%):SYS262354,h%,i%,-1,-1,,j%:SYS262354,h%,i%,-1,-1,-1,j%:ENDPROC 10555DEFPROCcaret_info(RETURNh%,RETURNi%,RETURNn%):SYS262355,,X%:h%=!X%:i%=X%!4:n%=X%!20:ENDPROC 10560DEFPROCfa:Z$="":ENDPROC 10565DEFPROCIa(Ba$,Ca$):LOCALa$,a%:SYS6,161,140TO,,a%:IF(a%AND1)=1THEN 10570SYS8,17,Ca$TOa%:IFa%=1Z$=Ca$ELSEZ$=Ba$ 10575ELSE:Z$=Ba$ 10580ENDIF 10585SYS262361,,Z$:ENDPROC 10590DEFPROCKa:SYS262362:ENDPROC 10595DEFPROCl(f$,n$,oe%,RETURNLb%):LOCALde%:PROCgc(f$,n$,de%):de%!64=oe%:PROChc(de%,Lb%):B%=1145981271:C%=de%:CALLP%+16:ENDPROC 10600DEFPROCgc(f$,n$,RETURNic%):LOCALpe%,Ra%,qe%,mb%,s%,f%,s$:PROCic(f$,n$,Ra%,qe%):B%=1145981271:C%=Ra%+qe%:ic%=USR(P%+12):IFic%=0ERROR253,FNmsg_1(A%!12,"FA5","WIND") 10605IFf$<>""SYS262361,,f$ 10610IFqe%THEN 10615B%=1179014466:C%=qe%:pe%=USR(P%+12):IFpe%=0ERROR253,FNmsg_1(A%!12,"FA5","BUFF") 10620SYS393435,,ic%,pe%,pe%+qe%,-1,n$TOs%,,,,,,mb%;f% 10625ELSE:SYS393435,,ic%,,,-1,n$TOs%,,,,,,mb%;f% 10630ENDIF 10635IFf$<>""SYS262362 10640IFf%AND1f%=s%+4:CALLZ%,f%,s$:ERROR254,n$+": "+s$ 10645IFmb%=0ERROR254,FNmsg_1(A%!12,"OKAK",n$) 10650ENDPROC 10655DEFPROChc(ic%,RETURNLb%):SYS262337,,ic%TOLb%:ENDPROC 10660DEFPROCp(a%):!V%=a%:SYS262347,,V%:V%!28=-1:SYS262341,,V%:ENDPROC 10665DEFPROC`a(a%,s$):LOCALre%,se%,te%,ue%:!V%=a%:SYS262348,,V%OR1:$V%!76=s$:IFV%!32AND1<<16THEN 10670se%=V%!16:SYS262368,,V%:re%=V%!4:te%=V%!12:ue%=V%!16:SYS262353,-1,re%,se%,te%,ue% 10675ENDIF 10680ENDPROC 10685DEFPROCJa(P$,RETURNK%,RETURNc$):LOCALf%,_a%,Ub%:IFf$=""AND`d%>=300THEN 10690SYS262363,,,,,-1,"*"+STRING$(12,CHR$0),K%TO,,,,,c$,K% 10695ELSE:IFP$=""P$=Z$ 10700f%=OPENINP$:IFK%=0K%=16 10705REPEAT:PTR#f%=K%:_a%=FNj(f%):IF_a%THEN 10710PTR#f%=K%+8:Ub%=FNj(f%):c$=FNM(f%):K%+=24:IFUb%=1_a%=0 10715ELSE:K%=0 10720ENDIF 10725UNTIL_a%=0:SYS131085,,f% 10730ENDIF 10735ENDPROC 10740DEFPROCic(f$,n$,RETURNRa%,RETURNqe%):LOCALi%,ve%,K%,_a%,Ub%,Da$,Ud%:IFf$=""AND`d%>=300THEN 10745SYS262363,,,,,-1,n$TO,Ra%,qe% 10750ELSE:IFf$=""f$=Z$ 10755ve%=OPENINf$:Ra%=0:qe%=0:K%=16:REPEAT:PTR#ve%=K%:_a%=FNj(ve%):IF_a%THEN 10760PTR#ve%=K%+8:Ub%=FNj(ve%):Da$=FNM(ve%):K%+=24:IFUb%=1THEN 10765IFDa$=n$THEN 10770PTR#ve%=_a%+84:Ud%=FNj(ve%):qe%=FNma(ve%,_a%):IFUd%qe%+=FNna(ve%,Ud%,_a%) 10775Ra%=88+(Ud%*32):_a%=0 10780ENDIF 10785ENDIF 10790ENDIF 10795UNTIL_a%=0:SYS131085,,ve% 10800ENDIF 10805ENDPROC 10810DEFFNj(h%):=BGET#h%ORBGET#h%<<8ORBGET#h%<<16ORBGET#h%<<24 10815DEFFNM(h%):LOCALs$,c%:REPEAT:c%=BGET#h%:IFc%>31s$+=CHR$c% 10820UNTILc%<32:=s$ 10825DEFFNma(ve%,_a%):LOCALv%:PTR#ve%=_a%+28:v%=FNj(ve%):IFv%AND1<<31THEN 10830IFv%AND1<<26THEN=FNN(ve%,_a%+56,_a%+72,_a%) 10835ELSE:IFv%AND1THEN=FNN(ve%,_a%+56,_a%+72,_a%) 10840ENDIF 10845=0 10850DEFFNna(ve%,Xc%,_a%):LOCALi%,j%:j%=0:IF0<=Xc%-1THEN 10855FORi%=0TOXc%-1:j%+=FNN(ve%,_a%+88+i%*32+16,_a%+88+i%*32+20,_a%):NEXT 10860ENDIF 10865=j% 10870DEFFNN(ve%,we%,xe%,_a%):LOCALv%,ye%,Ra%,i%:PTR#ve%=we%:v%=FNj(ve%):i%=v%AND256:ye%=(v%AND3)+(i%>>6):CASEye%OF 10875WHEN0,1,2,3,4:Ra%=0 10880WHEN5,7:PTR#ve%=xe%+4:v%=FNj(ve%):IFv%=-1THEN 10885Ra%=0 10890ELSE:PTR#ve%=_a%+v%:Ra%=LENFNM(ve%)+1 10895ENDIF 10900PTR#ve%=xe%+8:Ra%+=FNj(ve%) 10905WHEN6:PTR#ve%=xe%+8:Ra%=FNj(ve%) 10910ENDCASE 10915=Ra% 10920DEFPROCja:LOCALf%:SYS131129,,"DragASprite_Start"TOze%;f%:IFf%AND1ze%=-1 10925SYS131129,,"DragASprite_Stop"TOAe%;f%:IFf%AND1Ae%=-1 10930SYS6,161,28TO,,f%:IF(f%AND2)=0THEN 10935ze%=-1:Ae%=-1 10940ENDIF 10945B%=1163280723:C%=256:Be%=USR(P%+12):IFBe%=0ERROR253,FNmsg_1(A%!12,"FA5","SAVE") 10950ea%=0:ENDPROC 10955DEFPROCAb(Ce%,Fa$):LOCALb$:b$=STR$~Ce%:b$=RIGHT$("000"+b$,3):De%=Ce%:PROCicon_validation(zb%,0,"sfile_"+b$):PROCicon_write(zb%,1,Fa$):ENDPROC 10960DEFPROCnb(Fe%,Ge%):LOCALHe%,Ie%,Je%,Ke%,Le%,Me%,Od%,Pd%,f$,Kd%,Ld%,Md%,Nd%:!Be%=zb%:SYS262347,,Be%:He%=Be%!4-Be%!20:Ie%=Be%!16-Be%!24:PROCicon_info(zb%,0,Je%,Le%,Ke%,Me%):SYS53,-1,4TO,,Ld%:Ld%=1<<Ld%:SYS53,-1,5TO,,Nd%:Nd%=1<<Nd% 10965SYS53,-1,11TO,,Kd%:Kd%+=1:SYS53,-1,12TO,,Md%:Md%+=1:Od%=Kd%*Ld%:Pd%=Md%*Nd%:!Be%=zb%:Be%!4=5:Be%!8=He%+Je%:Be%!12=Ie%+Le%:Be%!16=He%+Ke%:Be%!20=Ie%+Me%:Be%!24=Be%!8-Fe%:Be%!28=Be%!12-Ge%:Be%!32=Od%+Be%!16-Fe% 10970Be%!36=Pd%+Be%!20-Ge%:IFNOTze%THEN 10975f$="file_"+RIGHT$("000"+STR$~De%,3):SYSze%,197,1,f$,Be%+8,Be%+24 10980ELSE:SYS262352,,Be% 10985ENDIF 10990ea%=-1:ENDPROC 10995DEFPROCra:LOCALh%,i%,Ne%,Oe%,Pe%:ea%=0:IFNOTAe%SYSAe% 11000SYS262351,,Be%:Ne%=!Be%:Oe%=Be%!4:h%=Be%!12:i%=Be%!16:IFh%=zb%ENDPROC 11005PROCjc(h%,i%,Ne%,Oe%):ENDPROC 11010DEFPROCjc(h%,i%,Ne%,Oe%):LOCALGa$:Ga$=FNoa:!Be%=48+LENGa$ANDNOT3:Be%!12=0:Be%!16=1:Be%!20=h%:Be%!24=i%:Be%!28=Ne%:Be%!32=Oe%:Be%!36=0:Be%!40=De%:$(Be%+44)=Ga$+CHR$0:SYS262375,17,Be%,h%,i%:ENDPROC 11015DEFFNoa:LOCALf$,i%:f$=FNicon_read(zb%,1):REPEAT:i%=INSTR(f$,":"):IFi%f$=MID$(f$,i%+1) 11020UNTILi%=0:REPEAT:i%=INSTR(f$,"."):IFi%f$=MID$(f$,i%+1) 11025UNTILi%=0:=f$ 11030DEFPROCga:Sb%=0:Qe%=0:ENDPROC 11035DEFPROCmenu_create(RETURN_%,I$):LOCALQ$,i%,Ha$,j$,j%,x%,t%:IFSb%THEN 11040PROCkc:Sb%=0:Qe%=0 11045ENDIF 11050IFLEFT$(I$,1)="#"THEN 11055i%=1:Q$=FNO(I$,",",i%) 11060ELSE:Q$="" 11065ENDIF 11070Ha$=I$:j%=i%:REPEAT:j$=FNO(I$,",",i%):IFj$<>""Qe%+=1 11075UNTILj$="":I$=Ha$:i%=j%:B%=1431192909:C%=28+Qe%*24:Sb%=USR(P%+12):IFSb%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11080IFLENQ$<=12THEN 11085$Sb%=Q$ 11090ELSE:B%=1431192909:C%=LENQ$+2:t%=USR(P%+12):IFt%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11095$t%=Q$+CHR$0:Sb%!0=t% 11100ENDIF 11105Sb%?12=7:Sb%?13=2:Sb%?14=7:Sb%?15=0:Sb%!16=196:Sb%!20=44:Sb%!24=0:x%=LENQ$-3:Sb%!16=(x%*8+6)*2:FORj%=0TOQe%-1:j$=FNO(I$,",",i%):PROCmenu_item(Sb%,j%,j$,LENQ$>12):NEXT:_%=Sb%:ENDPROC 11110DEFPROCkc:LOCALi%,p%,pc%:p%=Sb%+28:pc%=p%!0AND256:IF0<=Qe%-1THEN 11115FORi%=0TOQe%-1:IFp%!8AND256THEN 11120IF(!p%AND4)=0THEN 11125B%=1431192909:C%=p%!12:CALLP%+16 11130ENDIF 11135ENDIF 11140p%+=24:NEXT 11145ENDIF 11150IFpc%THEN 11155B%=1431192909:C%=Sb%!0:CALLP%+16 11160ENDIF 11165B%=1431192909:C%=Sb%:CALLP%+16:ENDPROC 11170DEFPROCmenu_item(RETURN_%,Re%,j$,pc%):LOCALF%,p%,i%,x%,m%:x%=(_%!16/2-6)/8:IFRIGHT$(j$,1)="#"THEN 11175j$=LEFT$(j$):F%=F%OR2 11180ENDIF 11185IFRIGHT$(j$,1)="@"THEN 11190j$=LEFT$(j$):F%=F%OR8 11195ENDIF 11200IFRe%>=Qe%THEN 11205B%=1431192909:C%=Sb%:D%=(Re%-Qe%+1)*24:m%=USR(P%+20):IFm%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11210Sb%=m%:p%=Sb%+28+(Qe%-1)*24:!p%=!p%ANDNOT128:Qe%=Re%+1 11215ENDIF 11220IFRe%=Qe%-1F%=F%OR128 11225IFRe%=0ANDpc%F%=F%OR256 11230p%=Sb%+28+Re%*24:p%!0=F%:p%!4=-1:p%!8=117440545:IFLEFT$(j$,1)="$"THEN 11235!p%+=4:j$=STRING$(12," ") 11240ELSE:IFLENj$<12THEN 11245$(p%+12)=j$ 11250ELSE:B%=1431192909:C%=LENj$+1:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11255$i%=j$:p%!8=p%!8OR256:p%!12=i%:p%!16=-1:p%!20=LENj$+1 11260ENDIF 11265ENDIF 11270_%=Sb%:IFLENj$>x%THEN 11275x%=LENj$:_%!16=(x%*8+6)*2 11280ENDIF 11285ENDPROC 11290DEFPROCBb(_%,Re%,K%,Se%):_%+=28+Re%*24:IFSe%THEN!_%=!_%OR1<<4 11295_%!4=K%:ENDPROC 11300DEFFNO(I$,Ia$,RETURNI%):LOCALL%:L%=I%+1:I%=INSTR(I$+Ia$,Ia$,L%):=MID$(I$,L%,I%-L%) 11305DEFPROCa(Te%,Re%,Wd%):IF((Te%!(28+8+24*Re%)AND4194304)=4194304)<>Wd%THEN 11310Te%!(28+8+24*Re%)=Te%!(28+8+24*Re%)EOR4194304 11315ENDIF 11320ENDPROC 11325DEFFNJ(Te%,Re%):=((Te%!(28+8+24*Re%)AND4194304)=4194304) 11330DEFPROCmenu_tick_match(Te%,Ja$):LOCALRe%,Ka$:Re%=Te%+28:REPEAT:IFRe%!8AND256Ka$=$Re%!12ELSEKa$=$(Re%+12) 11335IFFNla(Ka$,Ja$)=0THEN 11340!Re%=!Re%EOR1:ENDPROC 11345ENDIF 11350IF!Re%AND128ENDPROC 11355Re%+=24:UNTIL0:ENDPROC 11360DEFPROClc(Te%,Re%,Ue%):IFUe%Te%!(28+24*Re%)=Te%!(28+24*Re%)OR1ELSETe%!(28+24*Re%)=Te%!(28+24*Re%)ANDNOT1 11365ENDPROC 11370DEFPROCcb(h%):LOCALx%,y%,Kd%,Ld%,Md%,Nd%:SYS53,-1,4TO,,Ld%:Ld%=1<<Ld%:SYS53,-1,5TO,,Nd%:Nd%=1<<Nd%:SYS53,-1,11TO,,Kd%:Kd%+=1:SYS53,-1,12TO,,Md%:Md%+=1:!q%=h%:SYS262347,,q%:x%=Kd%*Ld%:y%=Md%*Nd%:x%=(x%-q%!12+q%!4)DIV2:y%=(y%+q%!16-q%!8)DIV2 11375SYS262356,,h%,x%,y%:ENDPROC 11380DEFPROCha:LOCALp%:SYS274526,-1,0TOp%:CALLZ%,p%,La$:ENDPROC 11385DEFFNf(n$):IFLa$=".":=VALn$ 11390LOCALi%:i%=INSTR(n$,La$):IFi%<>0:=VAL(LEFT$(n$,i%-1)+"."+MID$(n$,i%+1)) 11395=VALn$ 11400DEFPROCDb(a%):LOCALi%:B%=1163547472:C%=56:Ga%=USR(P%+12):IFGa%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11405IFa%THEN 11410a%=a%!36:IF0<52THEN 11415FORi%=0TO52STEP4:Ga%!i%=a%!i%:NEXT 11420ENDIF 11425ELSE:IF0<=52THEN 11430FORi%=0TO52STEP4:Ga%!i%=0:NEXT 11435ENDIF 11440ENDIF 11445PROCIb:PROCs(Cb%):PROCp(Cb%):PROCcaret_set(Cb%,5):ENDPROC 11450DEFPROCIb:LOCALh%,i%,n%:PROCcaret_info(h%,i%,n%):PROCu(Cb%,5,Ga%,4):PROCM(12,36):PROCM(13,32):PROCM(14,40):PROCM(15,44):PROCM(16,48):PROCsb:IFGa%!52=1THEN 11455PROCicon_unshade(Cb%,33) 11460ELSE:PROCicon_shade(Cb%,33) 11465ENDIF 11470ENDPROC 11475DEFPROCsb:LOCALs$:IFNOTFNicon_set(Cb%,23)ANDNOTFNicon_set(Cb%,22)THEN 11480PROCicon_select(Cb%,23) 11485ENDIF 11490IFFNicon_set(Cb%,23)THEN 11495s$=FNmsg_0(A%!12,"mm") 11500ELSE:s$=FNmsg_0(A%!12,"in") 11505ENDIF 11510PROCicon_write(Cb%,26,s$):PROCicon_write(Cb%,29,s$):PROCicon_write(Cb%,27,s$):PROCicon_write(Cb%,30,s$):PROCicon_write(Cb%,28,s$):PROCicon_write(Cb%,31,s$):PROCF(6,8):PROCF(7,12):PROCF(8,20):PROCF(9,16):PROCF(10,24):PROCF(11,28):ENDPROC 11515DEFPROCM(qb%,_a%):PROCicon_write(Cb%,qb%,STR$Ga%!_a%):ENDPROC 11520DEFPROCF(qb%,_a%):LOCALv%:v%=Ga%!_a%:CASEqb%OF 11525WHEN8:v%=Ga%!12-v% 11530WHEN11:v%=Ga%!8-v% 11535ENDCASE 11540PROCicon_write(Cb%,qb%,FNpa(v%)):ENDPROC 11545DEFFNpa(v%):LOCAL@%:IFFNicon_set(Cb%,23)THEN 11550@%="+F10"+La$+"1":=STR$(v%/c) 11555ELSE:@%="+F10"+La$+"3":=STR$(v%/d) 11560ENDIF 11565DEFPROCBa(f$,Ve%):LOCALJ%,`%,yb%,We%,t$:IFFNl(f$)THEN 11570REPEAT:J%=FNb("pn:"):IFJ%THEN 11575t$=FNqa(`%,$J%):IFt$<>""PROCmc(f$,t$) 11580`%!52=Ve%:yb%=ja%:We%=0:WHILEyb%>0:IF$`%!4=$yb%!4THEN 11585IFyb%!52=0THEN 11590`%!0=yb%!0:PROCfree_structure(yb%!4):B%=1163547472:C%=yb%:CALLP%+16:yb%=-1 11595ELSE:B%=1163547472:C%=`%:CALLP%+16:`%=0:yb%=-1 11600ENDIF 11605ELSE:IF$`%!4<$yb%!4THEN 11610`%!0=yb%:yb%=-1 11615ELSE:We%=yb%:yb%=yb%!0 11620ENDIF 11625ENDIF 11630ENDWHILE:IF`%THEN 11635IFWe%We%!0=`%ELSEja%=`% 11640ENDIF 11645ENDIF 11650UNTILJ%=0:PROCm 11655ENDIF 11660ENDPROC 11665DEFPROCmc(f$,t$):PROCS(FNmsg_2(A%!12,"OKO",f$,t$)):ENDPROC 11670DEFFNqa(RETURN`%,c$):LOCALt$:B%=1163547472:C%=56:`%=USR(P%+12):IF`%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11675`%!0=0:$q%=c$:B%=q%:C%=2:`%!4=USR(P%+28):J%=FNb("pw:"):IFJ%`%!8=VAL$J%ELSE="pw:" 11680J%=FNb("ph:"):IFJ%`%!12=VAL$J%ELSE="ph:" 11685J%=FNb("pb:"):IFJ%`%!16=VAL$J%ELSE="pb:" 11690J%=FNb("pt:"):IFJ%`%!20=VAL$J%ELSE="pt:" 11695J%=FNb("pl:"):IFJ%`%!24=VAL$J%ELSE="pl:" 11700J%=FNb("pr:"):IFJ%`%!28=VAL$J%ELSE="pr:" 11705J%=FNb("tb:"):IFJ%`%!32=VAL$J%ELSE="tb:" 11710J%=FNb("tt:"):IFJ%`%!36=VAL$J%ELSE="tt:" 11715J%=FNb("tl:"):IFJ%`%!40=VAL$J%ELSE="tl:" 11720J%=FNb("tr:"):IFJ%`%!44=VAL$J%ELSE="tr:" 11725J%=FNb("th:"):IFJ%`%!48=VAL$J%ELSE="th:" 11730="" 11735DEFPROCnc(c%,K%):BPUT#c%,"pn: "+$K%!4:BPUT#c%,"pw: "+STR$K%!8:BPUT#c%,"ph: "+STR$K%!12:BPUT#c%,"pb: "+STR$K%!16:BPUT#c%,"pt: "+STR$K%!20:BPUT#c%,"pl: "+STR$K%!24:BPUT#c%,"pr: "+STR$K%!28:BPUT#c%,"tb: "+STR$K%!32:BPUT#c%,"tt: "+STR$K%!36:BPUT#c%,"tl: "+STR$K%!40:BPUT#c%,"tr: "+STR$K%!44:BPUT#c%,"th: "+STR$K%!48:ENDPROC 11740DEFPROCmb:LOCAL`%,s$,Xe%,yb%,We%,c%,z%:LOCALe,f,g,h,i,j:e=FNf(FNicon_read(Cb%,6)):f=FNf(FNicon_read(Cb%,7)):g=FNf(FNicon_read(Cb%,10)):h=FNf(FNicon_read(Cb%,11)):i=FNf(FNicon_read(Cb%,8)):j=FNf(FNicon_read(Cb%,9)):s$=FNicon_read(Cb%,5):IFs$=""ERROR254,FNmsg_0(A%!12,"OKAD") 11745IFFNf(FNicon_read(Cb%,6))=0ERROR254,FNmsg_0(A%!12,"OKAE") 11750IFFNf(FNicon_read(Cb%,7))=0ERROR254,FNmsg_0(A%!12,"OKAE") 11755IF(i+j>f)ERROR254,FNmsg_1(A%!12,"OKAY",FNmsg_0(A%!12,"OKAZ")) 11760IF(g+h>e)ERROR254,FNmsg_1(A%!12,"OKAY",FNmsg_0(A%!12,"OKBA")) 11765SYS263872:`%=ja%:WHILE`%:IF$`%!4=s$THEN 11770Xe%=`%:`%=0 11775ELSE:`%=`%!0 11780ENDIF 11785ENDWHILE:IFXe%IFXe%!52=2ERROR254,FNmsg_0(A%!12,"OKAX") 11790IFXe%=0THEN 11795B%=1163547472:C%=56:Xe%=USR(P%+12):IFXe%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11800Xe%!0=0:$q%=s$:B%=q%:C%=2:Xe%!4=USR(P%+28):yb%=ja%:We%=0:WHILEyb%>0:IF$Xe%!4<$yb%!4THEN 11805Xe%!0=yb%:yb%=-1 11810ELSE:We%=yb%:yb%=yb%!0 11815ENDIF 11820ENDWHILE:IFWe%We%!0=Xe%ELSEja%=Xe% 11825ENDIF 11830PROCo(6,Xe%,8,-1,Ze%):PROCo(7,Xe%,12,-1,Ze%):PROCo(9,Xe%,16,-1,Ze%):PROCo(8,Xe%,20,-1,Ze%):PROCo(10,Xe%,24,-1,Ze%):PROCo(11,Xe%,28,-1,Ze%):PROCo(13,Xe%,32,0,Ze%):PROCo(12,Xe%,36,0,Ze%):PROCo(14,Xe%,40,0,Ze%):PROCo(15,Xe%,44,0,Ze%):PROCo(16,Xe%,48,0,Ze%):Xe%!52=1 11835PROCoc:z%=A%!48:WHILEz%:IFz%!36=Xe%THEN 11840IFz%!24AND2THEN 11845PROCselect_printer(z%,-1,0):PROCwb(z%):PROCz 11850ENDIF 11855ENDIF 11860z%=z%!0:ENDWHILE:SYS263873:ENDPROC 11865DEFPROCoc:LOCALc%,`%,_e%,s$,fb%:IFia%THEN 11870s$="<Printers$Dir>"+".Remote.ID"+h$+".PaperRW" 11875ELSE:s$="<Printers$Dir>"+".PaperRW" 11880ENDIF 11885SYS131080,17,s$TOfb%;f%:IF(f%AND1)!fb%=254:SYS43,fb% 11890IF(fb%=0)THEN 11895SYS131080,11,s$,4038,,0,0TOfb%;f%:IF(f%AND1)PROCb(FNmsg_0(A%!12,"WA14")):ENDPROC 11900ELSE:SYS131080,4,s$,,,,0TOfb%;f%:IF(f%AND1)=0SYS131080,4,s$,,,,3TOfb%;f% 11905IF(f%AND1)PROCb(FNmsg_0(A%!12,"WA14")):ENDPROC 11910ENDIF 11915SYS131085,143,s$TOc%;f%:IF(f%AND1)PROCb(FNmsg_0(A%!12,"WA14")):ENDPROC 11920IFc%THEN 11925`%=ja%:WHILE`%:IF`%!52=1THEN 11930PROCnc(c%,`%):_e%+=1 11935ENDIF 11940`%=`%!0:ENDWHILE:SYS131085,,c%:IF_e%THEN 11945SYS131080,18,s$,4038:SYS131080,4,s$,,,,19 11950ELSE:SYS131080,6,s$ 11955ENDIF 11960ENDIF 11965ENDPROC 11970DEFPROCo(qb%,wd%,_a%,`e%,RETURNVe%):LOCALv,v%:v=FNf(FNicon_read(Cb%,qb%)):CASEqb%OF 11975WHEN8:v=FNf(FNicon_read(Cb%,7))-v 11980WHEN11:v=FNf(FNicon_read(Cb%,6))-v 11985ENDCASE 11990IF`e%THEN 11995IFFNicon_set(Cb%,23)v%=v*cELSEv%=v*d 12000ELSE:v%=v 12005ENDIF 12010IFwd%!_a%<>v%THEN 12015Ve%=-1:wd%!_a%=v%:IFGa%Ga%!_a%=v% 12020ENDIF 12025ENDPROC 12030DEFPROCrb:LOCALs$,`%,We%,i%,z%:SYS263872:s$=FNicon_read(Cb%,5):`%=ja%:WHILE`%>0:IF$`%!4=s$THEN 12035IF`%!52=1THEN 12040z%=A%!48:WHILEz%:IFz%!36=`%ERROR254,FNmsg_0(A%!12,"OKQa") 12045z%=z%!0:ENDWHILE:IFWe%THEN 12050We%!0=`%!0 12055ELSE:ja%=`%!0 12060ENDIF 12065PROCfree_structure(`%!4):B%=1163547472:C%=`%:CALLP%+16:PROCoc 12070ELSE:ERROR254,FNmsg_0(A%!12,"OKR") 12075ENDIF 12080FORi%=0TO52STEP4:Ga%!i%=0:NEXT:PROCIb:`%=-1 12085ELSE:We%=`%:`%=`%!0 12090ENDIF 12095ENDWHILE:IF`%=0ERROR254,FNmsg_0(A%!12,"OKQ") 12100SYS263873:ENDPROC 12105DEFPROCtb:PROCs(A%!40):!q%=A%!40:SYS262348,,q%OR1:q%!48=q%!56-(A%!44*pa%*2)-(A%!32*pa%):SYS262359,A%!40,q%+44:q%!28=-1:SYS262341,,q%:ENDPROC 12110DEFPROCkb(z%):IFNOTFNi(Fb%)ENDPROC 12115!V%=Fb%:V%!4=z%!28:SYS262350,,V%:SYS262353,Fb%,V%!8,V%!12,V%!16,V%!20:ENDPROC 12120DEFPROCf(y%,z%,M%):LOCALMb%:IFNOTFNi(A%!40)ENDPROC 12125IFy%=-1THEN 12130B%=z%:C%=M%:y%=USR(P%+48) 12135ENDIF 12140!V%=A%!40:SYS262347,,V%:V%!12=V%!12-V%!4:V%!4=0:V%!8=y%-pa%:V%!16=y%:SYS262353,!V%,V%!4,V%!8,V%!12,V%!16:ENDPROC 12145DEFPROCpc(y%,z%,af%,bf%):LOCAL_e%:IFNOTFNi(A%!40)ENDPROC 12150IFy%=-1THEN 12155B%=z%:C%=M%:y%=USR(P%+48) 12160ENDIF 12165!V%=A%!40:SYS262347,,V%:V%!12=V%!12-V%!4:V%!4=0:_e%=2:WHILEaf%<>bf%:_e%+=1:af%=af%!0:ENDWHILE:V%!8=y%-pa%*_e%:V%!16=y%:SYS262353,!V%,V%!4,V%!8,V%!12,V%!16:ENDPROC 12170DEFPROCgb(cf%,O$,Ma$,B$,z%,Ub%):B%=cf%:C%=q%:$C%=O$:D%=O%:$D%=Ma$:E%=O%+256:$E%=B$:F%=z%:G%=Ub%:CALLP%+24:ENDPROC 12175DEFPROCn(z%,M%,uc%):LOCALyb%,p%,N%:IFza%=z%ANDAa%=M%Aa%=0:SYS262356,-1 12180p%=M%!44:IFp%THEN 12185IFp%!40THEN 12190z%!24=z%!24ANDNOT36:IFz%!48THEN 12195!q%=z%!48:PROCe 12200ENDIF 12205ENDIF 12210ENDIF 12215IFz%!32=M%THEN 12220z%!32=M%!0:yb%=0 12225ELSE:yb%=z%!32:WHILEyb%!0<>M%:yb%=yb%!0:ENDWHILE:yb%!0=M%!0 12230ENDIF 12235IFM%!12THEN 12240SYS131085,,M%!12:M%!12=0:z%!24=z%!24ANDNOT8:PROCi(z%):IFNOTz%!28THEN 12245O%!0=Fb%:O%!4=z%!28:O%!8=0:O%!12=1<<22:SYS262349,,O% 12250ENDIF 12255ENDIF 12260p%=0:REPEAT:SYS524624,p%TOp%:IFp%IFp%=M%!40ORp%=M%!72SYS524617,p% 12265UNTILp%=0:IFM%!40THEN 12270N%=z%!12:IFN%!0=1ORN%!0=2SYS6,21,FNo(N%!0) 12275SYS131085,0,M%!40:M%!40=0:PROCqc(N%!0):!q%=M%:PROCc(z%!4,z%,-7,q%) 12280ENDIF 12285IFM%!72THEN 12290SYS131085,,M%!72:M%!72=0 12295ENDIF 12300SYS131080,6,$M%!68:PROCfree_structure(M%!68):IFM%?11AND2SYS131080,6,$M%!20 12305PROCfree_structure(M%!16):PROCfree_structure(M%!20):PROCfree_structure(M%!24):p%=M%!44:IFp%THEN 12310PROCfree_structure(p%!104):PROCfree_structure(p%!108):PROCfree_structure(p%!112):PROCfree_structure(p%!120):B%=1112887380:C%=p%:CALLP%+16 12315ENDIF 12320IFM%!52THEN 12325B%=1179009620:C%=M%!52:CALLP%+16 12330ENDIF 12335B%=1430607185:C%=M%:CALLP%+16:A%!32-=1:IFA%!32<=0A%!20=A%!20OR1 12340IFuc%THEN 12345!q%=A%!40:SYS262348,,q%OR1:IFq%!32AND1<<16THEN 12350q%!48=q%!56-A%!44*pa%*2-A%!32*pa%:SYS262359,A%!40,q%+44:SYS262341,,q%:B%=z%:C%=yb%:CALLP%+32 12355ENDIF 12360ENDIF 12365ENDPROC 12370DEFPROCA(z%):LOCALM%,df%:SYS263872:REPEAT:M%=z%!32:IFM%PROCn(z%,M%,0) 12375UNTILM%=0:!q%=A%!40:SYS262348,,q%OR1:IFq%!32AND1<<16THEN 12380q%!48=q%!56-A%!44*pa%*2-A%!32*pa%:SYS262359,A%!40,q%+44:SYS262341,,q%:B%=z%:C%=0:CALLP%+32 12385ENDIF 12390SYS263873:ENDPROC 12395DEFPROCI:LOCALz%:z%=A%!48:WHILEz%:PROCA(z%):z%=z%!0:ENDWHILE:A%!32=0:ENDPROC 12400DEFPROCna:LOCALef%,j%,z%,M%:REPEAT:IFA%!24A%!24=!(A%!24+0) 12405IFA%!24=0A%!24=A%!48 12410UNTILA%!24:z%=A%!24:IF(z%!24AND4)=0THEN 12415A%!28=z%!32:ef%=0:WHILEA%!28:IF?(A%!28+11)AND1THEN 12420A%!28=0 12425ELSE:IF?(A%!28+11)AND4THEN 12430ef%=A%!28:A%!28=!(A%!28+0) 12435ELSE:IF!(A%!28+12)THEN 12440PROCrc(z%,A%!28) 12445ELSE:IF(z%!24AND32)=0THEN 12450IFA%!28<>z%!32THEN 12455IFef%ef%!0=!(A%!28+0) 12460!(A%!28+0)=z%!32:z%!32=A%!28:PROCpc(-1,z%,A%!28,ef%) 12465ENDIF 12470IFBa%=z%THEN 12475!q%=Q%:PROCe 12480ENDIF 12485j%=z%!4:j%=j%!20:WHILEj%:IF$(j%+16)="configure"THEN 12490IFj%!12=z%THEN 12495!q%=j%!4:PROCe 12500ENDIF 12505ENDIF 12510j%=j%!0:ENDWHILE:PROCrc(z%,A%!28) 12515ENDIF 12520ENDIF 12525A%!28=0 12530ENDIF 12535ENDIF 12540ENDWHILE 12545ENDIF 12550A%!32=0:z%=A%!48:WHILEz%:M%=z%!32:WHILEM%:A%!32+=1:M%=M%!0:ENDWHILE:z%=z%!0:ENDWHILE:IFA%!32=0A%!20=A%!20OR1 12555ENDPROC 12560DEFFNra(M%,ff%,RETURN_$):LOCALy$,i%,c$,H%:_$="":y$=RIGHT$("00"+STR$~M%!36,3):SYS131107,"Alias$@PrintType_"+y$,,-1TO,,i%:IFi%<0_$="@PrintType_"+y$:=-1 12565CASEM%!36OF 12570WHEN-1:c$=FNmsg_0(A%!12,"UNT") 12575WHEN8192:PROCj(FNmsg_0(A%!12,"OKT"),1):=0 12580WHEN4096:PROCj(FNmsg_0(A%!12,"OKS"),1):=0 12585WHEN4095,2808:M%!36=4095:=-1 12590WHEN4054,4055,4074,4075,4094:M%!36=4094:=-1 12595WHENff%:M%!36=ff%:=-1 12600OTHERWISE:c$=FNtask_read_env("File$Type_"+y$,q%):IFc$=""c$=FNmsg_1(A%!12,"TYP",y$) 12605ENDCASE 12610CASEFNsa(c$,M%)OF 12615WHEN4:M%!36=4094:=-1 12620WHEN2:M%!36=4095:=-1 12625ENDCASE 12630=0 12635DEFFNsa(c$,M%):LOCALx%,y%,w%,h%:PROCicon_write(Bb%,0,FNmsg_2(A%!12,"WA5",c$,$M%!24)):SYS262351,,q%:x%=!q%:y%=q%!4:!q%=Bb%:SYS262347,,q%:w%=q%!12-q%!4:h%=q%!16-q%!8:q%!4=x%-340:q%!8=y%-120:q%!12=q%!4+w%:q%!16=q%!8+h%:q%!28=-1 12640SYS262341,,q%:PROCcc(Bb%):sa%=0:REPEAT:PROCv(ma%):UNTILsa%:!q%=Bb%:PROCe:PROCdc:=sa% 12645DEFPROCsc(gf%,hf%,if%,Na$):IFgf%SYS131085,0,gf% 12650IFhf%EXT#hf%=if% 12655IFhf%SYS131085,0,hf% 12660SYS131080,6,Na$:ENDPROC 12665DEFPROChb(Oa$,Na$):LOCALjf%,kf%,lf%,if%,i%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCsc(jf%,kf%,if%,Na$):PROCj(REPORT$,1):ENDPROC 12670jf%=OPENINNa$:lf%=EXT#jf%:IFlf%THEN 12675SYS263872:kf%=OPENUPOa$:if%=EXT#kf%:PTR#kf%=if%:FORi%=1TOlf%DIV512:SYS12,4,jf%,O%,512:SYS12,2,kf%,O%,512:NEXT:IFlf%MOD512SYS12,4,jf%,O%,lf%MOD512:SYS12,2,kf%,O%,lf%MOD512 12680CLOSE#kf%:SYS263873 12685ENDIF 12690CLOSE#jf%:SYS8,6,Na$:ENDPROC 12695DEFPROCrc(z%,M%):LOCALH%,N%,mf%,b%,t%,P$,t$,_$,Qa%,Ra%,nf%,s%,Vb%,z$,of%,G$:LOCALA$,B$,Xb%,l%,f%:H%=z%!4:N%=z%!12:mf%=H%!28:IFM%!12=0THEN 12700PROCselect_printer(z%,0,0):IF(z%!24AND4)<>0ENDPROC 12705P$=$M%!20:L$=$M%!16:M$=$M%!24:IFN%!0=5THEN 12710Vb%=(N%?6AND2)<>0 12715ELSE:Vb%=(N%?6AND1)<>0 12720ENDIF 12725IFVb%THEN 12730g$=FNm(0):IFg$=""THEN 12735z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 12740ENDIF 12745IFN%!0=5THEN 12750SYS36,"PrinterType$5",g$,LENg$:PROCJ(5) 12755ELSE:SYS36,"PrinterType$10",g$,LENg$:PROCJ(10) 12760ENDIF 12765G$=g$ 12770ENDIF 12775z$=FNm(0):IFz$=""THEN 12780z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 12785ENDIF 12790SYS36,"Printer$Temp",z$,LENz$:q%!0=48+LENP$ANDNOT3:q%!12=0:q%!16=524613:q%!40=M%!36:$(q%+44)=P$+CHR$0:SYS262375,18,q%:ta%=0:REPEAT:PROCv(la%):UNTILta%:b%=-1:IFta%<>2THEN 12795b%=FNra(M%,mf%,_$):IFb%THEN 12800IF_$<>""THEN 12805SYS262366,_$+" "+P$ 12810ENDIF 12815ENDIF 12820ENDIF 12825IFNOTb%THEN 12830PROCn(z%,M%,-1):ENDPROC 12835ENDIF 12840IFVb%THEN 12845s$=FNn(z%,-1):IFs$<>""THEN 12850PROCb(s$):IFz%!32THEN 12855z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0) 12860ENDIF 12865ENDIF 12870ENDIF 12875IFNOT(M%!36=4095ORM%!36=4094ORM%!36=mf%)THEN 12880SYS8,17,z$TOt%,,Qa%,,Ra%:IFt%THEN 12885IFM%?11AND2THEN 12890IFK$<>""SYS131080,6,K$ 12895K$=$M%!20 12900ENDIF 12905PROCfree_structure(M%!20):$q%=z$:B%=q%:C%=2:M%!20=USR(P%+28):M%!28=Ra%:M%!36=(Qa%AND1048320)>>8:M%?11=M%?11OR2 12910ELSE:IFVb%THEN 12915IFN%!0=5THEN 12920PROChb($N%!16,G$):PROCn(z%,M%,-1) 12925ELSE:SYS8,17,G$TOb%,,,,Ra%:IFb%=0ORRa%=0THEN 12930SYS131080,6,G$:PROCn(z%,M%,-1) 12935ELSE:IF(M%?11AND2)SYS131080,6,$M%!20 12940PROCfree_structure(M%!20):$q%=G$:B%=q%:C%=2:M%!20=USR(P%+28):M%!28=Ra%:M%!36=mf%:M%?11=M%?11OR2 12945ENDIF 12950ENDIF 12955ELSE:A$=$M%!16:B$=$M%!24:PROCn(z%,M%,-1):IFN%!0=9ANDq$<>""THEN 12960c$=$(z%!40):K%=INSTR(c$," "):WHILEK%:MID$(c$,K%,1)=CHR$160:K%=INSTR(c$," ",K%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Na%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 12965IFFNB (z%,A$,B$)THEN 12970Xb%=W%!4:SYS131113,25,w$,C$ 12975ELSE:SYS131080,6,w$ 12980ENDIF 12985L$="":M$="":s$=FNn(z%,-1):IFs$<>""THEN 12990PROCb(s$) 12995ENDIF 13000ENDIF 13005ENDIF 13010PROCselect_printer(0,-1,-1) 13015ENDIF 13020ENDIF 13025ELSE:CASEN%!0OF 13030WHEN1:IFz%!24AND128THEN 13035g$="devices#buffer"+STR$FNP(1)+":$."+FNU 13040ELSE:g$="devices#buffer"+STR$FNP(1)+":$.Parallel" 13045ENDIF 13050SYS36,"PrinterType$1",g$,LENg$ 13055WHEN2:g$="devices#buffer"+STR$FNP(2)+":$.Serial":SYS36,"PrinterType$2",g$,LENg$ 13060ENDCASE 13065SYS263872:IFN%!0=5AND(N%?6AND2)<>0THEN 13070SYS131085,207,g$TOb%;t%:IF(t%AND1)=0PTR#b%=EXT#b% 13075ELSE:SYS131085,143,g$TOb%;t% 13080ENDIF 13085IFt%AND1i%=b%+4:CALLZ%,i%,t$ 13090SYS263873:PROCselect_printer(0,-1,-1):IFt%AND1THEN 13095PROCfc(z%):PROCqc(N%!0):ERROR254,FNmsg_1(A%!12,"OKP",t$) 13100ENDIF 13105M%!40=b%:SYS131085,64,$M%!20TOM%!12;t%:IF(t%AND1)M%!12=0 13110IFM%!12=0THEN 13115PROCn(z%,M%,-1):ERROR254,FNmsg_1(A%!12,"OKAF",$M%!20) 13120ENDIF 13125t$=FNm(0):IFt$=""THEN 13130z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 13135ENDIF 13140SYS131080,11,t$,4093TOb%;t%:IF(t%AND1)=0SYS131085,207,t$TOb%;t% 13145IFt%AND1THEN 13150PROCfc(z%):b%+=4:CALLZ%,b%,s$:ERROR254,FNmsg_1(A%!12,"OKP",s$) 13155ENDIF 13160M%!72=b%:$q%=t$:B%=q%:C%=2:M%!68=USR(P%+28):B%=1179009620:C%=1024:s%=USR(P%+12):IFs%=0ERROR253,FNmsg_1(A%!12,"FA5","TBFF") 13165M%!52=s%:z%!24=z%!24OR8:PROCi(z%):PROCf(-1,z%,0):IFM%!36<>mf%THEN 13170IFz%!24AND64THEN 13175PROCn(z%,M%,-1):IFz%!40=0s$=$z%!8ELSEs$=$z%!40 13180ERROR254,FNmsg_1(A%!12,"OKAC",s$) 13185ENDIF 13190PROCtc(M%,mf%) 13195ENDIF 13200ENDIF 13205ELSE:IFEOF#M%!12ANDM%!56=0THEN 13210t%=EXT#M%!72-PTR#M%!72:IFt%THEN 13215IFN%!0=1ORN%!0=2THEN 13220SYS6,128,NOTFNo(N%!0)TO,Ra%,Qa%:Ra%=Ra%ORQa%<<8:IFRa%>1024Ra%=1024 13225ELSE:Ra%=1024/2 13230ENDIF 13235PROCuc(M%,t%,Ra%):ENDPROC 13240ENDIF 13245nf%=-1:IFN%!0=1ORN%!0=2THEN 13250SYS6,152,FNo(N%!0)TO;b%:IF(b%AND2)=0nf%=0 13255ENDIF 13260IFnf%THEN 13265PROCi(z%):A$=$M%!16:B$=$M%!24:PROCn(z%,M%,-1):IFN%!0=9ANDq$<>""THEN 13270c$=$(z%!40):K%=INSTR(c$," "):WHILEK%:MID$(c$,K%,1)=CHR$160:K%=INSTR(c$," ",K%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Na%):IFFNB (z%,A$,B$)THEN 13275Xb%=W%!4:SYS131113,25,w$,C$ 13280ELSE:SYS131080,6,w$ 13285ENDIF 13290s$=FNn(z%,-1):IFs$<>""THEN 13295PROCb(s$) 13300ENDIF 13305ENDIF 13310ENDIF 13315ELSE:PROCvc(z%,M%,mf%) 13320ENDIF 13325ENDIF 13330ENDPROC 13335DEFPROCtc(M%,ff%):LOCALi%,p%,c$:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCwc(A%!24,A%!28) 13340B%=1112887380:C%=124:p%=USR(P%+12):IFp%=0ERROR253,FNmsg_1(A%!12,"FA5","TPUB") 13345M%!44=p%:IF0<=124-4 13350FORi%=0TO124-4STEP4:p%!i%=0:NEXT 13355ENDIF 13360?O%=3:SYS7,14,O%:SYS192,O%,O%+5,250:B%=O%+5:C%=2:p%!120=USR(P%+28):IFM%?11AND2THEN 13365c$=$M%!16+" - "+$M%!24 13370ELSE:c$=$M%!20:IFLENc$>40THEN 13375c$=RIGHT$(c$,40):c$=MID$(c$,1+INSTR(c$,".")) 13380ENDIF 13385ENDIF 13390$q%=c$:B%=q%:C%=2:p%!112=USR(P%+28):p%!16=1:$q%=STRING$(32," "):B%=q%:C%=5:D%=32:p%!104=USR(P%+28):p%!96=128:PROCG(A%!24,A%!28,-1):ENDPROC 13395DEFPROCwc(z%,M%):PROCn(z%,M%,-1):IFz%!32<>0THEN 13400z%!24=z%!24OR32:PROCi(z%) 13405ENDIF 13410ERROR254,FNmsg_1(A%!12,"OKPa",REPORT$):ENDPROC 13415DEFPROCvc(z%,M%,ff%):LOCALl%,t%,pf%,Wc%,b$,p%,ac%,N%,qf%,H%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCwc(z%,M%) 13420N%=z%!12:H%=z%!4:ac%=M%!44:IFN%!0=1ORN%!0=2THEN 13425SYS6,128,NOTFNo(N%!0)TO,Wc%,l%:Wc%=Wc%ORl%<<8:IFWc%>1024Wc%=1024 13430ELSE:Wc%=1024/2 13435ENDIF 13440l%=EXT#M%!72-PTR#M%!72:IFM%!56l%=0 13445IFl%PROCuc(M%,l%,Wc%):ENDPROC 13450SYS263872:l%=M%!28-PTR#M%!12:IFM%!36=ff%THEN 13455IFPTR#(M%!12)=0THEN 13460q%!8=M%!40:q%!12=M%!12:PROCG(z%,M%,-20) 13465ENDIF 13470IFl%>Wc%l%=Wc% 13475SYS12,4,M%!12,q%,l%:SYS12,2,M%!40,q%,l% 13480ELSE:IFM%!36=4095OR(H%!32AND1)<>0THEN 13485CASEac%!92OF 13490WHEN0:q%!8=M%!72:PROCG(z%,M%,-2):M%!32=-1:ac%!92=1 13495WHEN1:q%!8=M%!72:PROCG(z%,M%,-3):M%!32=0:ac%!92=2 13500WHEN2:IFH%!32AND2THEN 13505IFM%!56=0THEN 13510PROCxc(0):q%!8=M%!56:PROCyc(M%,FNta(z%,M%,-4)):PROCzc(z%,M%,Wc%):IFac%!92=3THEN 13515q%!8=M%!72:PROCG(z%,M%,-14):ac%!92=1 13520ENDIF 13525ELSE:PROCzc(z%,M%,Wc%) 13530ENDIF 13535ELSE:IFM%!56=0THEN 13540t%=1024/4:IFt%>Wc%t%=Wc% 13545M%!60=0:PROCxc(t%):IFac%!40THEN 13550PROCfc(z%):PROC_a(z%):p%=ac%!40 13555ENDIF 13560ENDIF 13565IFWc%>M%!56Wc%=M%!56 13570IFac%!40<>0ANDWc%>p%Wc%=p% 13575IFWc%SYS12,2,M%!40,M%!52+M%!60,Wc% 13580M%!56-=Wc%:M%!60+=Wc% 13585ENDIF 13590ENDCASE 13595ELSE:t%=LENFNprinter_read_string(ac%!108):WHILEl%ANDWc%>t%:b$=FNua(BGET#M%!12,ac%):l%-=1:IFb$<>""BPUT#M%!40,b$; 13600Wc%-=LENb$:ENDWHILE 13605ENDIF 13610ENDIF 13615IFEOF#M%!12ANDM%!56=0THEN 13620q%!8=M%!72:PROCG(A%!24,A%!28,-15) 13625ENDIF 13630IFM%!28=0pf%=0ELSEpf%=PTR#M%!12*100/M%!28 13635IFpf%<>M%!32THEN 13640M%!32=pf%:PROCf(-1,z%,M%) 13645ENDIF 13650PTR#M%!72=0:SYS263873:ENDPROC 13655DEFPROCuc(M%,rf%,Wc%):IFrf%>Wc%rf%=Wc% 13660SYS12,4,M%!72,q%,rf%:SYS12,2,M%!40,q%,rf%:IFEXT#M%!72-PTR#M%!72=0THEN 13665PTR#M%!72=0:EXT#M%!72=0 13670ENDIF 13675ENDPROC 13680DEFFNua(C%,ac%):LOCALr$:IFC%=10ORC%=13THEN 13685IFac%!16=1ORac%!16=C%r$=FNprinter_read_string(ac%!108) 13690ac%!16=C% 13695ELSE:IFac%!16r$=FNprinter_read_string(ac%!108) 13700r$+=CHR$C%:ac%!16=0 13705ENDIF 13710=r$ 13715DEFPROCyc(M%,s$):LOCALsf%,tf%:tf%=M%!52:sf%=M%!56:IFs$<>""THEN 13720$(tf%+sf%)=s$:M%!56+=LENs$ 13725ENDIF 13730ENDPROC 13735DEFPROCzc(z%,M%,Wc%):LOCALsf%,tf%:tf%=M%!52:sf%=M%!56:IFsf%THEN 13740IFN%!0=1ORN%!0=2THEN 13745IFsf%>=Wc%ENDPROC 13750ENDIF 13755tf%?sf%=10:sf%+=1:tf%?sf%=13:SYS12,2,M%!40,tf%,sf%:M%!56=0 13760ENDIF 13765ENDPROC 13770DEFPROCG(z%,M%,uf%):q%!0=uf%:q%!4=M%:PROCc(z%!4,z%,-8,q%):ENDPROC 13775DEFFNta(z%,M%,uf%):LOCALs$,i%:q%!0=uf%:q%!4=M%:PROCc(z%!4,z%,-8,q%):i%=q%+8:CALLY%,i%,s$:=s$ 13780DEFPROCxc(F%):LOCALH%:H%=z%!4:B%=H%:C%=M%:D%=ac%:E%=O%+128:E%!0=H%:E%!4=z%:E%!8=M%:E%!12=ac%:E%!16=q%:E%!20=O%+356:$(O%+356)=CHR$164+$H%!4+"_support("+STR$O%+")":O%!0=-8:O%!4=H%:O%!8=z%:O%!12=q%:O%!16=ja%:O%!20=P%:O%!24=F%:IFF%=0CALLP%+4ELSECALLP%+0 13785ENDPROC 13790DEFFNP(t%):CASEt%OF 13795WHEN1:IFA%!80=0THEN 13800IFA%!76<>3THEN 13805A%!80=3 13810ELSE:A%!80=10 13815ENDIF 13820ENDIF 13825=A%!80 13830WHEN2:IFA%!76=0THEN 13835IFA%!80<>3THEN 13840A%!76=3 13845ELSE:A%!76=2 13850ENDIF 13855ENDIF 13860=A%!76 13865ENDCASE 13870=0 13875DEFPROCqc(t%):CASEt%OF 13880WHEN1:A%!80=0 13885WHEN2:A%!76=0 13890ENDCASE 13895ENDPROC 13900DEFFNo(t%):CASEt%OF 13905WHEN1:=A%!80 13910WHEN2:=A%!76 13915ENDCASE 13920=0 13925DEFFNR:LOCALfb%,vf%:SYS88,3TOfb%,vf%:IF(fb%AND61440)=4096AND(vf%AND61440)=4096:=-1 13930=0 13935DEFFNU:LOCALfb%:SYS8,5,"Devices:FastParallel"TOfb%:IFfb%<>0THEN 13940:="FastParallel" 13945ELSE::="Parallel" 13950ENDIF 13955DEFFNrmload_latest_module(c$,k$):LOCALwf%,xf%,yf%:LOCALK%,f%,vf%,zf%,Af%,s$,Bf%:wf%=-1:SYS131102,18,c$TO,,,K%;f%:IF(f%AND1)=0ANDK%!20<>0THEN 13960K%+=(K%!20):WHILE?K%<>9AND?K%<>0:K%+=1:ENDWHILE:IF?K%<>0THEN 13965wf%=0:K%+=1:WHILE?K%<>32:IF?K%>=ASC"0"AND?K%<=ASC"9"THEN 13970wf%=wf%*10+?K%-ASC"0" 13975ENDIF 13980K%+=1:ENDWHILE 13985ENDIF 13990ENDIF 13995xf%=-1:vf%=0:zf%=-1:REPEAT:SYS131102,20,vf%,zf%TO,vf%,zf%,K%,Bf%,,Af%;f%:IF(f%AND1)=0THEN 14000CALLZ%,K%,s$:IFs$=c$xf%=VAL(STR$~(Af%))/100 14005ENDIF 14010UNTIL(xf%<>-1)OR(f%AND1)<>0:yf%=-1:SYS131085,67,k$TOf%;K%:IF(K%AND1)f%=0 14015IFf%<>0THEN 14020PTR#f%=20:K%=BGET#f%+((BGET#f%)<<8)+((BGET#f%)<<16)+((BGET#f%)<<24):IFK%<>0THEN 14025PTR#f%=K%:REPEAT:vf%=BGET#f%:UNTILvf%=0ORvf%=9:IFvf%<>0THEN 14030yf%=0:REPEAT:vf%=BGET#f%:IFvf%>=ASC"0"ANDvf%<=ASC"9"THEN 14035yf%=yf%*10+vf%-ASC"0" 14040ENDIF 14045UNTILvf%=32 14050ENDIF 14055ENDIF 14060CLOSE#f% 14065ENDIF 14070IFwf%>xf%vf%=wf%ELSEvf%=xf% 14075IFvf%>yf%f%=vf%ELSEf%=yf% 14080vf%=0:IFxf%=f%THEN 14085IFBf%<1THEN 14090SYS131102,4,c$:SYS131102,3,c$TOK%;vf% 14095ENDIF 14100ENDIF 14105IFyf%=f%ANDyf%>xf%ANDyf%>wf%THEN 14110SYS131102,1,k$TOK%;vf% 14115ENDIF 14120IF(vf%AND1)=0SYS131102,18,c$TOK%;vf% 14125IF(vf%AND1)!K%=253:SYS43,K% 14130=f% 14135DEFPROC` (Cf%):LOCALf%,g%,Df%,Ff%,s$:ia%=0:IFFNrmload_latest_module("PDriver","Printers:Modules.PDriver") 14140IFFNrmload_latest_module("RemotePrinterSupport","Printers:Modules.RemPrnSpt") 14145Df%=0:SYS131102,18,"Freeway"TO;f%:IF(f%AND1)=0THEN 14150SYS131129,,"Freeway_Status"TO;g%:IF(g%AND1)=0THENSYS424580,0TO,Df%ELSEDf%=1 14155ENDIF 14160SYS131102,18,"RemotePrinterSupport"TO;Ff%:SYS131102,18,"ShareFS"TO;g%:IF(f%AND1)OR(Df%=0)OR(g%AND1)OR(Ff%AND1)THEN 14165Ja%=0 14170ELSE:SYS131077,"RMEnsure ShareFS 2.00 ERROR Foo"TO;f%:IF(f%AND1)THEN 14175Ja%=0 14180ELSE:h$=FNtask_read_env("Inet$LocalAddr",q%):Ja%=-1:PROCAc:PROCBc:SYS424323,2:Pa$="<Wimp$ScrapDir>.Printers":s$=FNtask_read_env ("Printers$Dir",q%):IFINSTR(s$,"Share:")THEN 14185ia%=-1 14190ELSE:ia%=0 14195ENDIF 14200ENDIF 14205ENDIF 14210IF(Ff%AND1)=0THEN 14215SYS424320TOLa% 14220ENDIF 14225IFia%THEN 14230SYS131080,8,"<Printers$Path>Remote"TO;f%:s$="<Printers$Path>Remote.ID"+h$:SYS131080,8,s$TO;f% 14235ENDIF 14240ENDPROC 14245DEFPROCAc:SYS293504,0,2:ENDPROC 14250DEFFNk(Gf%):LOCALW$:CALLZ%,Gf%,W$:=W$ 14255DEFPROCla:ENDPROC 14260DEFPROCBc:LOCALHf%,If%,Jf%,Kf%,jc%,Zb%,c$,kb%:LOCALLf%,Mf%,c$,Qa$,S%,Gd%:If%=0:Jf%=0:Ma%=0:REPEAT:If%=Jf%:SYS293507,0,2,0,0,0,0,0,If%TO,,Kf%,,jc%,,,Jf%:IF(Jf%>0)THEN 14265Lf%=FNg (1196577875,Kf%):Mf%=FNg (1196577875,jc%+1):Nf%=FNg (810701907,Kf%):Of%=FNg (810701907,jc%+1):SYS293507,0,2,Kf%,Nf%,jc%+1,Of%,0,If%TO,,,,,,Zb%:Of%?jc%=0:$Lf%=FNk (Nf%):$Mf%=FNk (Of%):PROCd (810701907,Nf%):PROCd (810701907,Of%) 14270S%=FNF (Lf%,Mf%,Zb%):PROCL (Ka%,S%):c$=$Lf%:IFFNva (c$)THEN 14275Bd%=FNy (S%,0,0,-1,kb%):IFNOTkb%THEN 14280PROC_b (c$):PROCN (c$):IFW%=0THEN 14285IFA%!44THEN 14290Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 14295PROCselect_printer(Gd%,-1,0):Gd%=0 14300ELSE:Gd%=Gd%!0 14305ENDIF 14310ENDWHILE 14315ENDIF 14320ENDIF 14325ENDIF 14330ENDIF 14335Ma%+=1 14340ENDIF 14345UNTIL(Jf%<0):ENDPROC 14350DEFPROCac (c$):LOCALLf%,Mf%,jc%,Zb%,Qa$,ab%,S%,Ra$,Gd%,kb%,mb%:SYS424578,0,2,c$,0,0TO,,,jc%,,Zb%;ab%:IF(ab%AND1)THEN 14355ENDPROC 14360ENDIF 14365mb%=0:S%=Ka%:WHILES%:IF($S%!4=c$)AND((S%!20)<=0)THEN 14370ENDPROC 14375ENDIF 14380S%=S%!0:ENDWHILE:Lf%=FNg (1196577875,LENc$+1):Mf%=FNg (1196577875,jc%+1):Of%=FNg (810701907,jc%+1):$Lf%=c$:SYS424578,0,2,c$,jc%+1,Of%TO;ab%:IF(ab%AND1)THEN 14385ENDPROC 14390ENDIF 14395Of%?jc%=0:$Mf%=FNk (Of%):PROCd (810701907,Of%):S%=FNF (Lf%,Mf%,Zb%):PROCL (Ka%,S%):Ma%+=1:IFFNva (c$)THEN 14400Bd%=FNy (S%,0,0,-1,kb%):IFNOTkb%THEN 14405PROC_b (c$):PROCN (c$):IFW%=0THEN 14410IFA%!44THEN 14415Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 14420PROCCc(Gd%,-1,0,-1,kb%):Gd%=0 14425ELSE:Gd%=Gd%!0 14430ENDIF 14435ENDWHILE 14440ENDIF 14445ENDIF 14450ENDIF 14455ENDIF 14460PROCk:ENDPROC 14465DEFPROC_b (c$):LOCALWe%,Hf%,mb%,Pf%:Hf%=Ka%:We%=0:mb%=0:IFHf%THEN 14470REPEAT:IF($Hf%!4)=c$ANDHf%!20>0THEN 14475mb%=-1 14480ELSE:We%=Hf%:Hf%=Hf%!0 14485ENDIF 14490UNTILmb%OR(Hf%=0):IF(We%=0)AND(Hf%<>0)THEN 14495Ka%=Hf%!0:PROCD (-2,Hf%!20):PROCd (1196577875,Hf%!4):PROCd (1196577875,Hf%!8):PROCd (1380799568,Hf%) 14500ELSE:IFHf%THEN 14505We%!0=Hf%!0:PROCD (-2,Hf%!20):PROCd (1196577875,Hf%!4):PROCd (1196577875,Hf%!8):PROCd (1380799568,Hf%) 14510ENDIF 14515ENDIF 14520ENDIF 14525ENDPROC 14530DEFFNva (c$):LOCALHf%,Qf%:Hf%=Ka%:Qf%=0:WHILEHf%ANDNOTQf%:IF$Hf%!4=c$ANDHf%!20>0THEN 14535Qf%=-1 14540ELSE:Hf%=Hf%!0 14545ENDIF 14550ENDWHILE:=Qf% 14555DEFPROCN (c$):LOCALz%,Id%,K%,N%,Gd%,y$,H%,`$:IFFNwa (Ka%,c$)THEN 14560PROCWa (Ka%,c$) 14565ELSE:Id%=0:z%=A%!48:K%=z%:N%=z%!12:WHILEK%:IF$K%!40=c$ANDN%!0=9THEN 14570K%=0 14575ELSE:Id%=z%:z%=z%!0:K%=z%:N%=z%!12 14580ENDIF 14585ENDWHILE:IFz%THEN 14590H%=z%!4:`$=$H%!4:y$=$z%!8:PROCUa (c$,`$,y$):PROCbc (z%,Id%):PROCNb (y$) 14595ENDIF 14600ENDIF 14605IFFNi (Fb%)THEN 14610PROCk:PROCp (Fb%) 14615ENDIF 14620ENDPROC 14625DEFFNu(Zb%):=STR$~Zb% 14630DEFFNg (Rf%,Ra%):LOCALSf%:B%=Rf%:C%=Ra%:Sf%=USR(P%+12):IF(Sf%=0)THEN 14635ERROR253,FNmsg_1 (A%!12,"FA5",CHR$((B%AND-16777216)>>24)+CHR$((B%AND16711680)>>16)+CHR$((B%AND65280)>>8)+CHR$(B%AND255)) 14640ENDIF 14645=Sf% 14650DEFPROCd (Rf%,wd%):B%=Rf%:C%=wd%:CALLP%+16:ENDPROC 14655DEFPROCK (RETURNTf%,i$):$q%=i$:B%=q%:C%=2:Tf%=USR(P%+28):ENDPROC 14660DEFFNF (Lf%,Mf%,Uf%):LOCALSf%:Sf%=FNg (1380799568,24):Sf%!0=0:Sf%!4=Lf%:Sf%!8=Mf%:Sf%!12=Uf%:Sf%!16=-1:Sf%!20=-1:=Sf% 14665DEFFNxa (c$,qb%,R$):LOCALSf%,Vf%,zd%:Sf%=FNg (1380799568,24):PROCK (Vf%,c$):PROCK (zd%,R$):Sf%!0=0:Sf%!4=Vf%:Sf%!8=zd%:Sf%!12=-1:Sf%!16=-1:Sf%!20=qb%:=Sf% 14670DEFPROCL (RETURNwc%,Re%):LOCALHf%:IFwc%=0THEN 14675wc%=Re% 14680ELSE:Hf%=wc%:WHILE(Hf%!0<>0):Hf%=Hf%!0:ENDWHILE:Hf%!0=Re% 14685ENDIF 14690ENDPROC 14695DEFFNwa (RETURNwc%,c$):LOCALHf%:IFwc%=0THEN 14700=0 14705ELSE:Hf%=wc%:WHILEHf%:IF$Hf%!4=c$THEN 14710=-1 14715ELSE:Hf%=Hf%!0 14720ENDIF 14725ENDWHILE 14730ENDIF 14735=0 14740DEFPROCWa (RETURNwc%,c$):LOCALWe%,Hf%,mb%,Pf%:IFwc%THEN 14745Hf%=wc%:We%=0:mb%=0:REPEAT:IF($Hf%!4)=c$THEN 14750mb%=-1 14755ELSE:We%=Hf%:Hf%=Hf%!0 14760ENDIF 14765UNTILmb%OR(Hf%=0):IF(We%=0)AND(Hf%<>0)THEN 14770wc%=Hf%!0:PROCd (1196577875,Hf%!4):PROCd (1196577875,Hf%!8):PROCd (1380799568,Hf%) 14775ELSE:IFHf%THEN 14780We%!0=Hf%!0:PROCd (1196577875,Hf%!4):PROCd (1196577875,Hf%!8):PROCd (1380799568,Hf%) 14785ENDIF 14790ENDIF 14795ENDIF 14800ENDPROC 14805DEFPROCua:LOCALRd%,z%,N%,Gd%:LOCALhb%,Wf%,s$,H%,s%,t%,l%,t$,K%:REPEAT:SYS424321,,,-1TORd%,,Wf%:IFRd%>0THEN 14810IFWf%>0THEN 14815hb%=FNg (1196577875,Wf%):SYS424321,,hb%,Wf% 14820ELSE:SYS424321,,0,0 14825ENDIF 14830CASERd%OF 14835WHEN1:IFW%THEN 14840N%=W%!12:IFN%!0=9ANDq$<>""THEN 14845t$=$(W%!40):K%=INSTR(t$," "):WHILEK%:MID$(t$,K%,1)=CHR$160:K%=INSTR(t$," ",K%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+t$:C$=q$+"RemQueue."+h$+"."+STR$(Na%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 14850IFL$=""THEN 14855L$=FNmsg_0(A%!12,"UNKN") 14860ENDIF 14865IFM$=""THEN 14870M$=FNmsg_0(A%!12,"UNKN") 14875ENDIF 14880IFFNB (W%,L$,M$)THEN 14885H%=W%!4:SYS131113,25,w$,C$ 14890ELSE:SYS131080,6,w$ 14895ENDIF 14900L$="":M$="":s$=FNn(W%,-1):IFs$<>""THEN 14905PROCb(s$) 14910ENDIF 14915ENDIF 14920ENDIF 14925ENDIF 14930WHEN2:PROCDc (FNk (hb%)) 14935WHEN3:IFJa%THEN 14940PROCac (FNk (hb%)) 14945ENDIF 14950WHEN4:PROCN (FNk (hb%)) 14955WHEN5 14960WHEN6:PROCFc (FNk (hb%)) 14965WHEN7:PROCGc:PROC` (0) 14970WHEN8:PROCHc 14975ENDCASE 14980IF(Wf%>0)THEN 14985PROCd (1196577875,hb%) 14990ENDIF 14995ENDIF 15000UNTILRd%<0:IFW%=0THEN 15005IFA%!44THEN 15010Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 15015PROCselect_printer(Gd%,-1,0):Gd%=0 15020ELSE:Gd%=Gd%!0 15025ENDIF 15030ENDWHILE 15035ENDIF 15040ENDIF 15045ENDPROC 15050DEFPROCxa:PROCGc:PROC` (0):ga%=0:ENDPROC 15055DEFPROCFc (c$):ENDPROC 15060DEFFNda:LOCALC$,f%,v%,w%,e$,Xc%,Xf%:REPEAT:C$=q$+"RemQueue."+h$+"."+STR$Na%:SYS424326:SYS131080,5,C$TOv%;f%:SYS424325:IFf%AND1THEN 15065Na%=-1:=FNmsg_0 (A%!12,"OKAS",FNk(v%+4)) 15070ENDIF 15075IF(v%<>0)THEN 15080Na%+=1 15085ENDIF 15090UNTILv%=0:="" 15095DEFPROCDc (Sa$):LOCALTa$,Ua$,Lb%,Va$,B$,c%,z%:LOCALK%,c$,H%,Ub%,Wa$,A$:B$=MID$(Sa$,INSTR(Sa$,".")+1):Ta$=Pa$+"."+Sa$:Ua$=Pa$+".RemQueue."+B$+"I":Va$="":O$="":h%=OPENINUa$:IFh%=0THEN 15100ENDPROC 15105ENDIF 15110c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%<>0):Va$+=CHR$c%:c%=BGET#h%:ENDWHILE:c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%<>0):Wa$+=CHR$c%:c%=BGET#h%:ENDWHILE:c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%<>0):A$+=CHR$c%:c%=BGET#h%:ENDWHILE:B$="":c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%>31):B$+=CHR$c%:c%=BGET#h%:ENDWHILE:CLOSE#h%:SYS131080,6,Ua$:K%=A%!48:z%=0:WHILE(K%):IF(K%!40=0)THEN 15115H%=K%!4:c$=$(H%!4) 15120ELSE:c$=$(K%!40) 15125ENDIF 15130IFc$=Va$THEN 15135z%=K%:K%=0 15140ELSE:K%=K%!0 15145ENDIF 15150ENDWHILE:IF(z%<>0)THEN 15155H%=z%!4:SYS131080,23,Ta$TO,,,,,,Ub%:PROCgb (-1,"("+FNmsg_0 (A%!12,"IC9")+") "+A$,Ta$,B$,z%,Ub%) 15160ENDIF 15165ENDPROC 15170DEFPROCfb (Zf%,o$):LOCALe%,f%:SYS403072,Zf%TOe%;f%:IF(f%AND1)THEN 15175L$=FNmsg_0(A%!12,"UNKN"):M$=FNmsg_0(A%!12,"UNKN") 15180ELSE:L$=FNk (e%):M$=o$ 15185ENDIF 15190ENDPROC 15195DEFFNB (z%,A$,o$):LOCALSa$,h%,f%,c$,K%:Sa$=q$+"RemQueue."+h$+"."+STR$(Na%)+"I":c$=$z%!40:SYS131085,131,Sa$TOh%;f%:IF(f%AND1)h%=0 15200IFh%<>0THEN 15205BPUT#h%,c$+CHR$0+h$+CHR$0+A$+CHR$0+o$:SYS131085,0,h%TO;f% 15210ENDIF 15215IF(f%AND1)ORh%=0:=0 15220=-1 15225DEFPROCJb:LOCALz%,qb%,S%:IFNOTFNxTHEN 15230PROCj(FNmsg_0(A%!12,"OKAV"),1):ENDPROC 15235ENDIF 15240IFINSTR(FNya,"Share:")>0THEN 15245PROCb (FNmsg_0 (A%!12,"OKAT")):ENDPROC 15250ENDIF 15255REPEAT:PROCt (z%,S%,qb%):PROCicon_deselect (Fb%,qb%):IFz%AND((z%!24AND(1<<17))=0)THEN 15260PROCOa (z%) 15265ENDIF 15270UNTIL(z%=0)AND(S%=0):ENDPROC 15275DEFPROCOa (z%):LOCALc$,_f%,ic%,`f%,W$,f%,fb%,f$,ag%,Xa$,H%:IF(z%!24AND(1<<17))>0THEN 15280ENDPROC 15285ENDIF 15290IF(z%!40=0)THEN 15295H%=z%!4:c$=$(H%!4) 15300ELSE:c$=$(z%!40) 15305ENDIF 15310IFNOTFNxTHEN 15315PROCj(FNmsg_1(A%!12,"OKAW",c$),1):z%!24=z%!24AND(NOT(1<<16)):ENDPROC 15320ENDIF 15325IFINSTR(FNya,"Share:")>0THEN 15330PROCb (FNmsg_1 (A%!12,"OKAU",c$)):z%!24=z%!24AND(NOT(1<<16)):ENDPROC 15335ENDIF 15340R$=$(z%!8):IF(z%!24AND1)=0THEN 15345PROCZ (z%) 15350ENDIF 15355_f%=0:REPEAT:SYS131107,"Inet$LocalAddr*",0,1<<31,_f%,0TO,,`f%:IF`f%<0THEN 15360ic%=FNg (1196577875,NOT(`f%)+1):IF(ic%>0)THEN 15365SYS35,"Inet$LocalAddr*",ic%,NOT(`f%),_f%,0TO,,,_f%:ic%?(NOT(`f%))=0:W$=FNk (ic%):PROCd (1196577875,ic%):f$="unshare _S"+W$:SYS131077,f$:f$="share <Wimp$ScrapDir>.Printers _S"+W$+" -noicon":SYS131077,f$ 15370ENDIF 15375ENDIF 15380UNTIL`f%>=0:PROCIc (z%,c$):SYS424578,0,2,c$,0,0TO,,,,,Zb%;f%:IF(f%AND1)=0THEN 15385PROCb (FNmsg_1 (A%!12,"OKAQ",c$)):ENDPROC 15390ENDIF 15395ag%=A%!48:WHILEag%:IF(ag%!40=0)THEN 15400H%=ag%!4:Xa$=$(H%!4) 15405ELSE:Xa$=$(ag%!40) 15410ENDIF 15415IF(Xa$=c$)AND((ag%!24AND(1<<16))>0)THEN 15420PROCb (FNmsg_1 (A%!12,"OKAQa",c$)):ENDPROC 15425ENDIF 15430ag%=ag%!0:ENDWHILE:SYS424577,0,2,c$,LENR$,R$TOfb%;f%:IF(f%AND1)THEN 15435PROCb (FNmsg_1 (A%!12,"OKAQ",c$)):ENDPROC 15440ENDIF 15445z%!24=z%!24OR(1<<16):ENDPROC 15450DEFPROCib (z%):LOCALc$,`f%,ic%,bg%,R$,W$,H%:IF(z%!40=0)THEN 15455H%=z%!4:c$=$(H%!4) 15460ELSE:c$=$(z%!40) 15465ENDIF 15470IF(z%!24AND(1<<16))THEN 15475z%!24=z%!24AND(-1-(1<<16)) 15480ENDIF 15485IFJa%THEN 15490SYS293505,1,2,c$,0,0 15495ENDIF 15500ENDPROC 15505DEFPROCJc:ENDPROC 15510DEFPROCP:cg%=Qc%:dg%=wb%:eg%=!wb%:fg%=Rc%:gg%=xb%:Za$=V$:ENDPROC 15515DEFPROCQ:Qc%=cg%:wb%=dg%:!wb%=eg%:Rc%=fg%:xb%=gg%:V$=Za$:ENDPROC 15520DEFPROCPa:hg%=Qc%:ig%=wb%:jg%=!wb%:kg%=Rc%:lg%=xb%:_a$=V$:ENDPROC 15525DEFPROCQa:Qc%=hg%:wb%=ig%:!wb%=jg%:Rc%=kg%:xb%=lg%:V$=_a$:ENDPROC 15530DEFFNy(S%,mg%,ng%,og%,RETURNpg%):LOCAL`a$,ab$,`$:LOCALVa$,s$,bb$,c$,qg%:LOCALab%,rg%,sg%,tg%,mb%,p%,z%:LOCALERROR:pg%=0:SYS263872:`a$="Share::_S"+FNu (S%!12)+".$":ab%=0:SYS424326:SYS131080,17,`a$TO;ab%:SYS424325:IF(ab%AND1)THEN 15535IFog%THEN 15540pg%=-1 15545ELSE:PROCb(FNmsg_1 (A%!12,"OKAOs",$S%!4)) 15550ENDIF 15555SYS263873:=0 15560ENDIF 15565c$=$S%!4:p%=INSTR(c$," "):WHILEp%:MID$(c$,p%,1)=CHR$160:p%=INSTR(c$," ",p%+1):ENDWHILE:bb$=`a$+"."+c$:z%=FNza(S%,bb$,mg%,ng%,og%,pg%):SYS263873:=z% 15570DEFFNza (S%,cb$,ab%,ng%,og%,RETURNpg%):LOCALhb%,H%,K%,s$,U%,Cc%,Dc%,Fc%,Gc%,Hc%,Sc%:LOCALz%,N%,Ra$,`$,sg%,i%,ug%,eb%,vg%,wg%,xg%,yg%:LOCALzg%,pg%,qg%:pg%=0:IFNOTFNl (cb$)THEN 15575SYS263873:IFog%THEN 15580pg%=-1:=0 15585ELSE:PROCb (FNmsg_1(A%!12,"OKAOs",$S%!4)) 15590ENDIF 15595ENDIF 15600SYS263872:PROCOb(H%):Fc%=H%!12:IFFc%THEN 15605Cc%=Fc%!4:IFCc%THEN 15610K%=!wb%:U%=H%!8:U%=U%!4:J%=FNb($(U%+16)):IFJ%THEN 15615WHILECc%:IF$Cc%!8=$J%THEN 15620PROCm:SYS263873:z%=FNAa($S%!4,$S%!8,H%,Cc%,ng%,og%,pg%):=z% 15625ENDIF 15630Dc%=Cc%:Cc%=Cc%!0:ENDWHILE 15635ELSE:PROCq(FNmsg_1(A%!12,"OKZc",$(U%+16))) 15640ENDIF 15645!wb%=K% 15650ELSE:Dc%=0 15655ENDIF 15660ELSE:Dc%=0 15665ENDIF 15670PROCW(H%!8,Dc%,Fc%,0,Gc%,Hc%,H%):PROCm:H%!24=H%!24OR2:z%=FNAa($S%!4,$S%!8,H%,Dc%,ng%,og%,pg%):SYS263873:=z% 15675DEFPROC`b (z%):LOCALi%,K%,Id%,Jd%,Gd%,y$,qb%,S%,Ag%:PROCt (Ag%,S%,qb%):IF(NOTAg%)ANDS%THEN 15680ENDPROC 15685ENDIF 15690SYS263872:K%=A%!48:WHILEK%:IFK%!0=z%THEN 15695Id%=K%:K%=0 15700ELSE:K%=K%!0 15705ENDIF 15710ENDWHILE:y$=$z%!8:PROCbc(z%,Id%):PROCNb(y$):IFW%=0THEN 15715IFA%!44THEN 15720Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 15725PROCselect_printer(Gd%,-1,0):Gd%=0 15730ELSE:Gd%=Gd%!0 15735ENDIF 15740ENDWHILE 15745ENDIF 15750ENDIF 15755IFW%=0PROCz 15760B%=1482184792:C%=Jd%:CALLP%+16:PROCk:IFFNi(Fb%)THEN 15765PROCp(Fb%) 15770ENDIF 15775SYS263873:ENDPROC 15780DEFFNBa (H%):LOCALz%,Sf%:z%=A%!48:Sf%=0:WHILEz%:IFz%!4=H%THEN 15785Sf%=-1:z%=0 15790ELSE:z%=z%!0 15795ENDIF 15800ENDWHILE:=Sf% 15805DEFFNL:LOCALHf%,Sf%:Sf%=0:Hf%=Ka%:WHILEHf%:IFHf%!20>0THEN 15810Sf%+=1 15815ENDIF 15820Hf%=Hf%!0:ENDWHILE:=Sf% 15825DEFPROCHc:LOCALz%,Gd%:IFNOTJa%THEN 15830ENDPROC 15835ENDIF 15840z%=A%!48:WHILEz%:IFz%!24AND(1<<17)THEN 15845PROCN ($z%!40) 15850ENDIF 15855z%=z%!0:ENDWHILE:PROCGc:PROCk:IFW%=0THEN 15860IFA%!44THEN 15865Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 15870PROCselect_printer(Gd%,-1,0):Gd%=0 15875ELSE:Gd%=Gd%!0 15880ENDIF 15885ENDWHILE 15890ENDIF 15895ENDIF 15900Ja%=0:ENDPROC 15905DEFPROCGc:LOCALHf%,df%,Gd%:Hf%=Ka%:WHILEHf%:df%=Hf%!0:IFHf%!20<=0THEN 15910PROCN ($Hf%!4) 15915ENDIF 15920Hf%=df%:ENDWHILE:IFW%=0THEN 15925IFA%!44THEN 15930Gd%=A%!48:WHILEGd%:IFNOTGd%!20THEN 15935PROCselect_printer(Gd%,-1,0):Gd%=0 15940ELSE:Gd%=Gd%!0 15945ENDIF 15950ENDWHILE 15955ENDIF 15960ENDIF 15965ENDPROC 15970DEFFNQ(H%,db$,s$):="Printers:Remote.ID"+db$+"."+$H%!4+"."+s$ 15975DEFPROCKc (z%):ENDPROC 15980DEFFNAa(c$,R$,H%,R%,ng%,og%,RETURNpg%):LOCALs%,t%,s$,z%,N%:pg%=0:R%!(R%!4*4+8)+=1:B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR254,FNmsg_1(A%!12,"FA5","PRNT") 15985IFA%!48THEN 15990s%=A%!48:WHILEs%!0:s%=s%!0:ENDWHILE:s%!0=z% 15995ELSE:A%!48=z% 16000ENDIF 16005z%!0=0:z%!4=H%:B%=R%!8:C%=2:z%!8=USR(P%+28):B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR254,FNmsg_1(A%!12,"FA5","CNCT") 16010N%!0=9:N%?4=1+((s%AND28)>>2):N%?5=0:SYS6,161,16TO,,s%:N%!8=(s%AND224)>>5:IFNOTFNtTHEN 16015N%!12=0 16020ELSE:SYS6,161,3TO,,s%:SYS6,161,4TO,,t%:IFs%THEN 16025$q%=STR$t%+"."+STR$s%:B%=q%:C%=2:N%!12=USR(P%+28) 16030ELSE:s$=CHR$t%:FORs%=1TO5:SYS6,161,152+s%TO,,t%:IFt%s$+=CHR$t%ELSEs%=5 16035NEXT:$q%=s$:B%=q%:C%=2:N%!12=USR(P%+28) 16040ENDIF 16045ENDIF 16050SYS131107,"PrinterType$5",O%,256,,3TO,,t%:O%?t%=13:B%=O%:C%=2:N%!16=USR(P%+28):N%!20=0:N%!24=0:N%!28=0:N%!32=0:N%?6=0:z%!12=N%:B%=1195789891:C%=4*H%!36:s%=USR(P%+12):IFs%=0ERROR254,FNmsg_1(A%!12,"FA5","CNFG") 16055IF0<=H%!36-1THEN 16060FORt%=0TOH%!36-1:s%!(t%*4)=0:NEXT 16065ENDIF 16070z%!16=s%:z%!20=-1:z%!24=0:z%!28=-1:z%!32=0:z%!36=0:z%!40=0:z%!44=0:IFH%!32AND4THEN 16075z%!48=FNI 16080ELSE:z%!48=0 16085ENDIF 16090z%!52=0:PROCc(H%,z%,-4,0):IFH%!24AND4PROCc(H%,z%,-12,0) 16095PROCK (z%!40,$S%!4):PROCk:IFH%!24AND8THEN 16100z%!56=10*H%?(24+1) 16105ELSE:z%!56=-1 16110ENDIF 16115z%!24=z%!24OR(1<<17):IFNOTng%THEN 16120PROCLc(z%,og%,pg%) 16125ENDIF 16130=z% 16135DEFPROCUa (c$,`$,R$):LOCALz%,qb%,pb%,p%,Bg%,Hf%:z%=A%!48:IFNOTz%THEN 16140qb%=251658240:pb%=-5 16145ELSE:qb%=FNZ (z%):pb%=-3 16150ENDIF 16155ea$="su_"+`$:Bg%=FNs (c$,ea$,pb%,qb%):PROCL (Ka%,FNxa (c$,Bg%,R$)):IFA%!48=0ANDub%>0THEN 16160PROCD (-1,ub%):ub%=-1 16165ENDIF 16170ENDPROC 16175DEFPROCVa(z%):LOCALJ%,R%,d%,N%,h%,X$,yb%,H%:gb%=z%!16:H%=z%!4:h%=FNc($FNe("cs:")):IF0<=h%-1THEN 16180FORd%=0TOh%-1:J%=FNd:IFJ%THEN 16185T%=FNa(J%,"nl:"):IFT%THEN 16190gb%!(d%*4)=0 16195ELSE:T%=FNa(J%,"in:"):IFT%THEN 16200gb%!(d%*4)=FNstore_integer(FNc($T%)) 16205ELSE:T%=FNa(J%,"st:"):IFT%THEN 16210B%=T%:C%=2:gb%!(d%*4)=USR(P%+28) 16215ELSE:T%=FNa(J%,"s0:"):IFT%THEN 16220B%=T%:C%=3:gb%!(d%*4)=USR(P%+28) 16225ELSE:T%=FNa(J%,"gs:"):IFT%THEN 16230B%=T%:C%=4:gb%!(d%*4)=USR(P%+28) 16235ELSE:T%=FNa(J%,"pt:"):IFT%THEN 16240B%=1381257040:C%=4:gb%!(d%*4)=USR(P%+12):IFgb%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 16245!gb%!(d%*4)=FNCa($T%) 16250ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 16255ENDIF 16260ENDIF 16265ENDIF 16270ENDIF 16275ENDIF 16280ENDIF 16285ENDIF 16290NEXT 16295ENDIF 16300PROCZ (z%):ENDPROC 16305DEFFNya:=FNtask_read_env ("Wimp$ScrapDir",ba%) 16310DEFPROCIc (z%,c$):LOCALH%,yb%,R%,c%,eb%,U%,wc%,i%,j%,k%,l%,s$,p%,eb$,sb%,Cg%,Dg%:SYS263872:H%=z%!4:eb$=$z%!8:IFH%THEN 16315IFH%!8THEN 16320p%=INSTR(c$," "):WHILEp%:MID$(c$,p%,1)=CHR$160:p%=INSTR(c$," ",p%+1):ENDWHILE:c%=OPENOUT("<Wimp$ScrapDir>.Printers."+c$):BPUT#c%,"cl: "+$H%!4:eb%=H%!8:yb%=H%!12:IF$(eb%+12)<>"printers"THEN 16325BPUT#c%,$(eb%+12)+":":BPUT#c%,"#" 16330ENDIF 16335R%=yb%!4:WHILER%:IFR%!(R%!4*4+8)THEN 16340U%=eb%!4:i%=R%+8:IFLEFT$($(U%+16),6)="pr_nme"THEN 16345IFFNprinter_read_string(!i%)=eb$THEN 16350Cg%=-1 16355ELSE:Cg%=0 16360ENDIF 16365ELSE:Cg%=-1 16370ENDIF 16375WHILEU%:IFCg%THENBPUT#c%,$(U%+16)+" "; 16380IF!i%=0THEN 16385IFU%!4=6THEN 16390IFCg%THENBPUT#c%,48 16395ELSE:IFU%!4=1THEN 16400IFCg%THENBPUT#c%,48 16405ENDIF 16410ENDIF 16415IFCg%THENBPUT#c%,10 16420ELSE:j%=!i%:CASEU%!4OF 16425WHEN1:IFCg%THENBPUT#c%,STR$!j% 16430WHEN2:IFCg%THENBPUT#c%,FNprinter_read_string(j%) 16435WHEN3:IFCg%THENBPUT#c%,FNprinter_read_string(j%) 16440WHEN4:IFCg%THENBPUT#c%,FNungstrans(FNprinter_read_string(j%)) 16445WHEN5:IFCg%THENBPUT#c%,10 16450CASEU%!8OF 16455WHEN1:IFCg%THENBPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 16460WHEN2:IFCg%THENBPUT#c%," "+FNprinter_read_string(j%!0) 16465IFCg%THENBPUT#c%," "+FNprinter_read_string(j%!4) 16470WHEN3:IFCg%THENBPUT#c%," "+FNprinter_read_string(j%!0) 16475IFCg%THENBPUT#c%," "+FNprinter_read_string(j%!4) 16480WHEN4:IFCg%THENBPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)) 16485IFCg%THENBPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 16490WHEN7:IFCg%THENBPUT#c%," "; 16495IFCg%THENPROCr(!j%!0,H%,c%,Dg%) 16500IFCg%THENBPUT#c%,", "; 16505IFCg%THENPROCr(!j%!4,H%,c%,Dg%) 16510ENDCASE 16515WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:IFCg%THENBPUT#c%,STR$l% 16520WHILEj%:IF0<=j%!4-1THEN 16525FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 16530WHEN1196707401:IFCg%THENBPUT#c%," "+STR$!l%+", "; 16535WHEN1196577875:IFCg%THENBPUT#c%," "+$l%+", "; 16540WHEN810701907:CALLZ%,l%,s$:IFCg%THENBPUT#c%," "+s$+", "; 16545WHEN1381258055:CALLY%,l%,s$:IFCg%THENBPUT#c%," "+FNungstrans(s$)+", "; 16550WHEN1381257040:IFCg%THENPROCr (!l%,H%,c%,Dg%) 16555IFCg%THENBPUT#c%,"##" 16560ENDCASE 16565NEXT 16570ENDIF 16575IFCg%THENPTR#c%=PTR#c%-2 16580IFCg%THENBPUT#c%,10 16585j%=!j%:ENDWHILE 16590WHEN7:IFCg%THENPROCr (!j%,H%,c%,Dg%) 16595WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:IFCg%THENBPUT#c%,STR$l% 16600WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 16605FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 16610ENDIF 16615IFCg%THENBPUT#c%," "+FNungstrans(s$) 16620j%=!j%:ENDWHILE 16625ENDCASE 16630ENDIF 16635U%=U%!0:i%+=4:ENDWHILE:IFCg%THENBPUT#c%,"#" 16640ENDIF 16645R%=R%!0:ENDWHILE:CLOSE#c%:SYS131080,18,"<Wimp$ScrapDir>.Printers."+c$,4038:SYS131080,4,"<Wimp$ScrapDir>.Printers."+c$,,,,3 16650ENDIF 16655ENDIF 16660SYS263873:ENDPROC 16665DEFPROCr (K%,H%,c%,Dg%):LOCALfb$,eb%,U%,mb%,i%,j%,gb$,sb%,k%,l%,p%,s$:Dg%+=1:gb$=FNp (K%,H%):U%=INSTR(gb$,":"):fb$=MID$(gb$,1,U%-1):eb%=H%!8:mb%=0:WHILEeb%ANDNOTmb%:IF$(eb%+12)=fb$THEN 16670mb%=-1 16675ELSE:eb%=eb%!0 16680ENDIF 16685ENDWHILE:IFNOTmb%ANDNOTeb%THEN 16690ENDPROC 16695ENDIF 16700BPUT#c%," "+fb$+":":U%=eb%!4:i%=FNCa (gb$):IFi%=0THEN 16705ENDPROC 16710ENDIF 16715i%=i%+8:WHILEU%:BPUT#c%,$(U%+16)+" ";:IF!i%=0THEN 16720IFU%!4=6THEN 16725BPUT#c%,48 16730ELSE:IFU%!4=1THEN 16735BPUT#c%,48 16740ENDIF 16745ENDIF 16750BPUT#c%,10 16755ELSE:j%=!i%:CASEU%!4OF 16760WHEN1:BPUT#c%,STR$!j% 16765WHEN2:BPUT#c%,FNprinter_read_string(j%) 16770WHEN3:BPUT#c%,FNprinter_read_string(j%) 16775WHEN4:BPUT#c%,FNungstrans(FNprinter_read_string(j%)) 16780WHEN5:BPUT#c%,10:CASEU%!8OF 16785WHEN1:BPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 16790WHEN2:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 16795WHEN3:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 16800WHEN4:BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)):BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 16805WHEN7:BPUT#c%," ";:PROCr(!j%!0,H%,c%,Dg%):BPUT#c%,", ";:PROCr(!j%!4,H%,c%,Dg%) 16810ENDCASE 16815WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:IF0<=j%!4-1THEN 16820FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 16825WHEN1196707401:BPUT#c%," "+STR$!l%+", "; 16830WHEN1196577875:BPUT#c%," "+$l%+", "; 16835WHEN810701907:CALLZ%,l%,s$:BPUT#c%," "+s$+", "; 16840WHEN1381258055:CALLY%,l%,s$:BPUT#c%," "+FNungstrans(s$)+", "; 16845WHEN1381257040:PROCr (!l%,H%,c%,Dg%):BPUT#c%,"##" 16850ENDCASE 16855NEXT 16860ENDIF 16865PTR#c%=PTR#c%-2:BPUT#c%,10:j%=!j%:ENDWHILE 16870WHEN7:PROCr (!j%,H%,c%,Dg%) 16875WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 16880FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 16885ENDIF 16890BPUT#c%," "+FNungstrans(s$):j%=!j%:ENDWHILE 16895ENDCASE 16900ENDIF 16905U%=U%!0:i%+=4:ENDWHILE:BPUT#c%,"#":ENDPROC 16910DEFFNCa(s$):LOCALj%,k%,t$:j%=INSTR(s$,":"):t$=MID$(s$,j%+1):s$=LEFT$(s$,j%-1):j%=H%!8:k%=0:WHILEj%:IF$(j%+12)=s$THEN 16915j%=H%!12:WHILEk%:j%=j%!0:k%-=1:ENDWHILE:k%=VALt$-1:j%=j%!4:WHILE(j%!(j%!4*4+8)=0)AND(j%>0):j%=j%!0:ENDWHILE:WHILEk%:j%=j%!0:IFj%!(j%!4*4+8)THEN 16920k%-=1 16925ENDIF 16930ENDWHILE:=j% 16935ELSE:j%=j%!0:k%+=1 16940ENDIF 16945ENDWHILE:PROCb(FNmsg_2(A%!12,"FAG",s$,t$)):=0 16950DEFPROCLc(z%,og%,RETURNpg%):pg%=0:z%!24=z%!24OR1:N%=z%!12:PROCXa(z%):PROCA(z%):IFA%!44=1THEN 16955PROCCc(z%,-1,0,og%,pg%) 16960ENDIF 16965ENDPROC 16970DEFPROCCc(z%,dc%,ec%,og%,RETURNpg%):LOCALfc%,i%,s$:pg%=0:fc%=W%:IFNOTec%W%=z% 16975IFW%=0ENDPROC 16980s$=FNn(W%,0):IFs$<>""THEN 16985IFdc%THEN 16990W%!24=W%!24ANDNOT2 16995ENDIF 17000W%!24=W%!24OR4:PROCi(W%):PROCf(-1,W%,0):IFW%=fc%THEN 17005PROCicon_deselect(-1,fc%!20):fc%=0 17010ENDIF 17015W%=fc%:IFog%THEN 17020pg%=-1 17025ELSE:PROCb(s$) 17030ENDIF 17035ENDPROC 17040ENDIF 17045PROCc(W%!4,W%,-6,0):PROCwb(W%):PROCz:IFdc%THEN 17050IFfc%THEN 17055PROCicon_deselect(-1,fc%!20):fc%!24=fc%!24ANDNOT2 17060ENDIF 17065W%!24=W%!24OR2:PROCicon_select(-1,W%!20):SYS524608TO,,,,i%:IF?i%CALLZ%,i%,s$:SYS36,"Printer$",i%,LENs$ 17070ELSE:W%=fc% 17075ENDIF 17080ENDPROC
�>squished.RunImage ��,�$ |È™263872:�A%84,A%!16 256,V%256,aa%256,O%512,q%1024,X%256,ba%256:�a%(4):�aa("Printers:Messages",A%!12):��_(A%!12):���,�$ X�ba:�ca(�msg_0(A%!12,"ID")):�da:�ea:�fa:�ga:�ha:�ia:�P%+8:�ja:�ka:�la:È™263873:��ma �ca%� %$(q%+44)=aa$:?(q%+44+�(aa$))=0:�O #� (�:�v(A%!20):�0:� -(��v(da%):�r%,t%,z%:r%=�aa(da%):ÈŽr%� 2�0:�na:�oa 7 �1:�pa <�2:È™262341,,q% A �3:�e F �6:�qa K�7:�ea%� P�ra U�:�w(W%,7,q%) Z� _ �8:�sa d �9:�ta i�13:!(q%!0)=0:�ua n�17,18:�va(r%) s�19:�wa x:�w(W%,r%,q%) }� �'fa%=-1:z%=A%!48:È•z%:t%=z%!56:�t%� ��fa%=-1fa%=t%��t%<fa%fa%=t% �� �z%=z%!0:�:ÈŽga%� ��1:fa%+=500:ga%=2 ��2:�xa:ga%=0 �� �� �x��ka:�k$:q%!0=24:q%!12=0:q%!16=524611:q%!20=34:È™262375,18,q%:ha%=q%!8:�ya:�za:�Aa:�` (-1):k$="<Printers$Dir>":�ia%� �:k$+=".Remote":È™131080,8,k$:k$+=".ID"+h$:È™131080,8,k$ �� ��k$+=".":È™36,"PrinterChoices$Path",k$,�k$,0,0:�Ba("Printers:PaperRO",2):�Ba("PrinterChoices:PaperRW",1):�ja%=0�253,�msg_0(A%!12,"FAK") ��Ca:fa%=-1:È™66�ka%:�Da:� �3��ya:A%!20=12589105:la%=12589427:ma%=12589361:� �r��ba:�h%,l%,a%,w%:È™131080,8,"<Printers$Dir>":h%=�"Printers:Code":l%=�#h%:È™41,21,h%�,a%,w%:�#h%:�(w%�255)=46� � P%=a% �'�:�P%l%+1:È™8,16,"Printers:Code",P% �� �Z%=P%+64:Y%=P%+68:� �L��Aa:�na%,oa%:È™16�na%:È™73,"/g,quit/s,/g,pdf/s,/g",na%,O%,256:�O%!12=0� � ca%=0 ��:ca%=-1 �� �aa$="":na%=O%!16:�na%<>0� �<oa%=!na%�65535:na%+=2:È•oa%:aa$+=�(?na%):na%+=1:oa%-=1:� �� � ���za:c=1814.4*72000/(180<<8):d=72000:pa%=44:qa%=0:ra%=0:sa%=0:ta%=0:ua%=0:va%=0:A%!48=0:A%!44=0:W%=0:wa%=0:J$="":xa%=0:ya%=0:za%=0:Aa%=0:A%!24=0:A%!28=0:g$="null:":Ba%=0:Ca%=0:A%!32=0:ba$="":A%!36=0:Da%=0:Fa%=0:ja%=0:Ga%=0:Ha%=0 �ș6,204,,255�,Ia%:K$="":ca$="":A%!76=0:A%!80=0:Ja%=0:Ka%=0:La%=0:Ma%=0:h$="":Na%=0:q$="":L$="":M$="":Oa%=0:Pa%=0:ga%=0:ia%=0:� x��ia:�c%,d%,Qa%,Ra%,Sa%,Ta%,Ua%:�a$():�a$(255):Sa%=0:Ta%=0:Va%=0:Wa%=0:Xa%=0:Za%=0:c%=-1:�:�Fa(k$,U$,c$,c%):�c$<>""� ZÈ™8,17,"Printers:"+c$+".Resources.Support"�d%,,Qa%,,Ra%:�d%=1�(Qa%�-1048576)=-1048576� $Ra%=Ra%+3��3:ÈŽ(Qa%�1048320)>>8� "�4091:�Ra%>Sa%Sa%=Ra% '�Va%<255a$(Va%)=c$ , Va%+=1 1�4092:Ta%+=Ra%:Wa%+=1 6� ;� @� E%�c$="":�Wa%>0�b%(Wa%-1),b$(Wa%-1) JUa%=�+Ta%+Sa%+16*1024:�=Ua% O�(�+Ta%+Sa%+16*1024)<Ua%� T>Ua%=Ua%/1024:Ua%=Ua%-Ua%�8+8:�253,�msg_1(A%!12,"FA4",�Ua%) Y� ^�Va%>0� cR�c$(Va%-1):�d%=0�Va%-1:c$(d%)="Printers:"+a$(d%)+".Resources.Support":�:È£c$() h� m� rT��Fa(�k$,�U$,�c$,�_a%):�i%,`a%,ab%:�_a%=-1k$=�task_read_env("Printers$Path",ba%) w�:�_a%=-1� |�k$=""� �c$="":� �� �i%=�k$,","):�i%=0i%=�k$+1 �!U$=�k$,i%-1):��U$)="."U$=�U$) �U$+=�0:k$=�k$,i%+1):_a%=0 �� �AÈ™131084,10,U$,ba%,1,_a%,256,"*"�,,,`a%,_a%;ab%:�(ab%�1)`a%=0 ��`a%=1� ��ba%!16=2� �i%=ba%+20:�Z%,i%,c$:� �� ��:_a%=-1 �� ��0:� �v��Ga(c$):�Qa%,Ra%,f$:f$="Printers:"+c$+".Resources.Support":È™8,17,f$�d%,,Qa%,,Ra%:Ra%=Ra%+3��3:�d%<>1È™8,19,f$,d% �2�(Qa%�-1048576)<>-1048576�254,�msg_1("FA3",c$) �Ȏ(Qa%�1048320)>>8� � �4091 ��4092:�Za%<Wa%� �4�u%Ra%:b%(Za%)=u%:b$(Za%)=c$:È™8,16,f$,u%:Za%+=1 �� �:�254,�msg_1("FA3",c$) �� �� ����Ha(c$,�bb%):�d%,Qa%,f$,h%,cb%,db%,H%:�eb%:È™131080,8,"PrinterChoices:"+c$:f$="Printers:"+c$+".Resources.Support":È™8,17,f$�d%,,Qa%:�d%<>1È™8,19,f$,d% �2�(Qa%�-1048576)<>-1048576�254,�msg_1("FA3",c$) JB%=1347769168:C%=60:bb%=�(P%+12):�bb%=0�253,�msg_1(A%!12,"FA5","PSUP") ÈŽ(Qa%�1048320)>>8� �4091:bb%!24=1 �4092:bb%!24=0 =:B%=1347769168:C%=bb%:�P%+16:�254,�msg_1(A%!12,"FA3",c$) � !kbb%!0=0:$q%=c$:B%=q%:C%=2:bb%!4=�(P%+28):bb%!8=0:bb%!12=0:È™8,17,�h(bb%,"Resources.!Sprites")�d%:�d%=1� &UÈ™131077,"IconSprites "+�h(bb%,"Resources.!Sprites")�C%;d%:�(d%�1)!C%=253:È™43,C% +� 01È™8,17,�h(bb%,"Resources.Messages")�d%:�d%=1� 52�aa(�h(bb%,"Resources.Messages"),d%):bb%!16=d% :�:bb%!16=0 ?� DMÈ™8,17,�h(bb%,"Resources.Templates")�d%:�d%<>1�254,�msg_1(A%!12,"FA2",c$) Ij�Ia(�h(bb%,"Resources.Templates"),�h(bb%,"Resources.Template3D")):d%=0:db%=bb%+20:�:�Ja("",d%,c$):�d%� N_�l("",c$,1,h%):B%=1145981271:C%=16+1+�c$:cb%=�(P%+12):�cb%=0�253,�msg_1(A%!12,"FA5","WIND") SEcb%!0=0:cb%!4=h%:cb%!8=0:cb%!12=0:$(cb%+16)=c$:!db%=cb%:db%=cb%+0 X� ]U�d%=0:�Ka:�c(bb%,0,-1,0):笤l(�h(bb%,"Template"))�254,�msg_1(A%!12,"OK1a",$bb%!4) b�La(bb%):�m:�ia%� g笤l(�Q(bb%,h$,"PrData"))� l�f$="<Printers$Dir>"+".Remote.ID"+h$+"."+$bb%!4:È™131080,8,f$:f$="<Printers$Dir>"+".Remote.ID"+h$+"."+$bb%!4+".PrData":d%=�(f$):�d%=0� q#�254,�msg_1(A%!12,"OK1",$bb%!4) v��:eb%=bb%!8:È•eb%:�#d%,$(eb%+12)+":":�#d%,"#":eb%=eb%!0:�:�#d%:È™8,18,f$,4038:笤l(�Q(bb%,h$,"PrData"))�254,�msg_1(A%!12,"OK1",$bb%!4) {� �� �;�:笤l(�h(bb%,"PrData"))�254,�msg_1(A%!12,"OK1",$bb%!4) �� �8�Ma(bb%):�m:�Ba(�h(bb%,"Resources.PaperRO"),0):�ua%� �$H%=ua%:È•H%!0:H%=H%!0:�:H%!0=bb% � �:ua%=bb% �� �� �9��Na:�z%,H%,t%:fa%=-1:z%=A%!48:È•z%:H%=z%!4:�H%!24�8� �/t%=10*H%?(24+1):�fa%=-1fa%=t%��t%<fa%fa%=t% �z%!56=t% ��:z%!56=-1 �� �z%=z%!0:�:È™66�ka%:� �Sݤx:�da$,f%,fb%,s$:�z%,H%,c$:da$=�task_read_env("Wimp$ScrapDir",ba%):�da$="":=0 ��da$<>ca$� �9È™131080,8,"<Wimp$ScrapDir>.Printers"�fb%;f%:�(f%�1)� �Lfb%+=4:�Z%,fb%,s$:�b(�msg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) ��:ca$=da$:�Ja%� �xÈ™131080,8,"<Wimp$ScrapDir>.Printers.RemQueue"�fb%;f%:�(f%�1)=0È™131080,8,"<Wimp$ScrapDir>.Printers.RemSpool"�fb%;f% ��(f%�1)� �Lfb%+=4:�Z%,fb%,s$:�b(�msg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) �� �� �!z%=A%!48:È•z%:�z%!24�(1<<16)� ��(z%!40=0)� H%=z%!4:c$=$(H%!4) �:c$=$(z%!40) � �Oa (z%) � z%=z%!0:� � %� *=-1 /���Da:�c%,d%,s$,J%,c$,H%,gb%,t%,hb%,ib%,jb%,kb%:�ab%,lb%,S%,mb%,nb%,ob%,i$,z%,pb%,qb%,ea$,p%,rb%,s$,sb%:�nb%,tb%:ub%=�s(�msg_0(A%!12,"NNE"),"s"+�msg_0(A%!12,"IC"),-5,251658240):vb%=-1:�ia%� 4@s$="<Printers$Dir>"+".Remote.ID"+h$+".Settings":È™8,17,s$�c% 9,�:È™8,17,"<Printers$Dir>"+".Settings"�c% >� C �c%=1� H �ia%� M%笤l (s$)�254,�msg_0(A%!12,"OKD") R@�:笤l("<Printers$Dir>"+".Settings")�254,�msg_0(A%!12,"OKD") W� \J%=�b("fv:"):�J%=0� a�j(�msg_0(A%!12,"OKV"),1) f�:�c($J%)<>1� k�j(�msg_0(A%!12,"OKV"),1) p5�:�P:�:J%=�b("cl:"):�Pa:ab%=0:lb%=�b("fg:"):�lb%� uab%=�c ($lb%) z� #hb%=�b("sn:"):�hb%c$=$hb%�c$="" �*�Qa:�(J%>0)�((ab%�(1<<17))=0)�(lb%>0)� �d%=�$J%,":"):�d%=0d%=�$J%+1 �Hs$=�$J%,d%+1):$J%=�$J%,d%-1):H%=ua%:ib%=0:È•H%��ib%:�$H%!4=$J%ib%=-1 ��ib%H%=H%!0 ��:�ib%� �'�Ra:�Ga($J%):�Ha($J%,H%):�Sa:ib%=-1 �� � �ib%� �#hb%=�b("nm:"):�hb%c$=$hb%�c$="" �"�b(�msg_2(A%!12,"WA1",$J%,c$)) � �:�Ta(H%) �� �� �I�J%=0:�Q:�:J%=�b("cl:"):nb%=!wb%:tb%=xb%:�P:ab%=0:lb%=�b("fg:"):�lb%� �ab%=�c ($lb%) �� �#lb%=�b("pn:"):�lb%i$=$lb%�i$="" �#hb%=�b("sn:"):�hb%c$=$hb%�c$="" �)�Q:�(J%>0)�((ab%�(1<<17))>0)�(lb%>0)� �%mb%=0:S%=Ka%:È•S%��mb%:�c$=$S%!4� � mb%=-1 � �:S%=S%!0 �� ��:�mb%��Ja%� �p%=�$J%,":"):�p%=0� p%=�$J% � �Ua (c$,�$t%,1,p%-1)," ") �:�ab%�1� Y�P:z%=�y (S%,ab%,-1,0,kb%):�Q:�P:!wb%=nb%:xb%=tb%:�Va (z%):�Q:�Wa (Ka%,$S%!4):�ab%�2� z%!24=z%!24�2 �:z%!24=z%!24��2 $� )d%=ja%:È•d%:�$d%!4=i$� .z%!36=d%:d%=0 3�:d%=d%!0:�d%=0� 89d%=ja%:z%!36=d%:�b(�G(A%!12,"WA11",i$,$d%!4,c$)):d%=0 =� B� G� L� Q� V� [ �J%=0 `� e� j�m o� t0�w(A%!48,-5,0):rb%=0:z%=A%!48:È•z%:�z%!24�2� yrb%=-1:jb%=z%:z%=0 ~ �:z%=z%!0 �� ��:z%=A%!48:�(�rb%)�(z%)� ��select_printer (z%,-1,0) ��:�rb%�jb%� ��select_printer (jb%,-1,0) �� �� �� �F��Ta(H%):�J%,R%,z%,d%,N%,h%,X$,yb%:J%=�e("nm:"):X$=$J%:�H%!44>100� � �b(�msg_1(A%!12,"WA7",X$)):� �� �(yb%=H%!12:R%=yb%!4:È•R%>0:�$R%!8=X$� �R%!(R%!4*4+8)+=1:R%=-1 � �:R%=R%!0 �� ��:�R%=0� � �b(�msg_1(A%!12,"WA8",X$)):� �� �HB%=1414419024:C%=68:z%=�(P%+12):�z%=0�253,�msg_1(A%!12,"FA5","PRNT") �OB%=J%:C%=2:z%!8=�(P%+28):z%!0=0:z%!4=H%:�H%!24�8z%!56=10*H%?(24+1)�z%!56=-1 � �H%!24�4� �\h%=�c($�e("cn:")):B%=1413697091:C%=h%*4:N%=�(P%+12):�N%=0�253,�msg_1(A%!12,"FA5","CNCT") �z%!12=N%:�0<=h%-1� ��d%=0�h%-1:J%=�d:�J%� �T%=�a(J%,"nl:"):�T%� N%!(d%*4)=0 �:T%=�a(J%,"in:"):�T%� %N%!(d%*4)=�store_integer(�c($T%)) �:T%=�a(J%,"st:"):�T%� "B%=T%:C%=2:gb%!(d%*4)=�(P%+28) �:T%=�a(J%,"s0:"):�T%� "B%=T%:C%=3:gb%!(d%*4)=�(P%+28) #�:T%=�a(J%,"gs:"):�T%� ("B%=T%:C%=4:gb%!(d%*4)=�(P%+28) -�:T%=�a(J%,"pt:"):�T%� 2UB%=1381257040:C%=4:N%!(d%*4)=�(P%+12):�N%!(d%*4)=0�253,�msg_1(A%!12,"FA5","POTR") 7!N%!(d%*4)=�H($T%,0) <!�:�R(�msg_1(A%!12,"OKH",$J%)) A� F� K� P� U� Z� _� d� i� nJ�:B%=1413697091:C%=36:N%=�(P%+12):�N%=0�253,�msg_1(A%!12,"FA5","CNCT") sDz%!12=N%:N%!0=�c($�e("ct:")):N%!4=�c($�e("bd:")):笤R�(N%?4>15)� x@�j(�msg_1(A%!12,"OKAM",�msg_0(A%!12,"BR"+�(N%?4))),1):N%?4=0 }� ��N%!8=�c($�e("ft:")):C%=2:B%=�e("et:"):N%!12=�(P%+28):B%=�e("fl:"):N%!16=�(P%+28):B%=�e("ns:"):N%!20=�(P%+28):B%=�e("np:"):N%!24=�(P%+28):B%=�e("nu:"):N%!28=�(P%+28):B%=�e("no:"):N%!32=�(P%+28):J%=�b("cf:"):�J%� �N%?6=�c($J%) ��:N%?6=0 �� �ȎN%!0� ��4:笤t� �<N%!0=0:�b(�msg_2(A%!12,"WA9",$z%!8,�msg_0(A%!12,"CN4"))) �� ��6:笤z� �<N%!0=0:�b(�msg_2(A%!12,"WA9",$z%!8,�msg_0(A%!12,"CN6"))) �� �� �� �^h%=�c($�e("cs:")):B%=1195789891:C%=h%*4:gb%=�(P%+12):�gb%=0�253,�msg_1(A%!12,"FA5","CNFG") �z%!16=gb%:�0<=h%-1� ��d%=0�h%-1:J%=�d:�J%� �T%=�a(J%,"nl:"):�T%� �gb%!(d%*4)=0 ��:T%=�a(J%,"in:"):�T%� �&gb%!(d%*4)=�store_integer(�c($T%)) ��:T%=�a(J%,"st:"):�T%� �"B%=T%:C%=2:gb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"s0:"):�T%� �"B%=T%:C%=3:gb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"gs:"):�T%� �"B%=T%:C%=4:gb%!(d%*4)=�(P%+28) �:T%=�a(J%,"pt:"):�T%� WB%=1381257040:C%=4:gb%!(d%*4)=�(P%+12):�gb%!(d%*4)=0�253,�msg_1(A%!12,"FA5","POTR") !gb%!(d%*4)=�H($T%,0) !�:�R(�msg_1(A%!12,"OKH",$J%)) � � "� '� ,� 1� 6� ;� @� EWz%!20=-1:z%!24=�c($�e("fg:")):z%!28=-1:z%!32=0:J%=�e("pn:"):d%=ja%:È•d%:�$d%!4=$J%� Jz%!36=d%:d%=0 O�:d%=d%!0:�d%=0� T:d%=ja%:z%!36=d%:�b(�G(A%!12,"WA11",$J%,$d%!4,X$)):d%=0 Y� ^� c[�:C%=2:B%=�e("sn:"):z%!40=�(P%+28):B%=�e("ic:"):z%!44=�(P%+28):�H%!32�4z%!48=�I�z%!48=0 hz%!52=0:�z%!24�1� m�Xa(z%):�z%!24�2� r�select_printer(z%,-1,0) w� |� ��z%!24�(1<<16)�Ja%� ��Oa (z%) �� �1d%=A%+48:È•!d%:d%=!d%+0:�:!d%=z%:va%+=1:�Na:� �<ݤe(fa$):�J%:J%=�b(fa$):�J%=0�R(�msg_1(A%!12,"OKG",fa$)) �=J% �(��R(e$):�S(�msg_1(A%!12,"OKE",e$)):� �(ݤh(H%,s$):="Printers:"+$H%!4+"."+s$ �ݤA(h%):�p%:�h%=-2�=-1 ��h%=zb%�=-1 ��h%=Ab%�=-1 ��h%=Bb%�=-1 ��h%=Cb%�=-1 ��h%=Db%�=-1 ��h%=A%!40�=-1 ��h%=Q%�=-1 ��h%=Fb%�=-1 ��h%=Gb%�=-1 �p%=A%!48:È•p%:�p%!48=h%�=-1 �p%=p%!0:�:=0 ����Ca:�i%,ga$,ha$,Hb%,Ib%,Jb%,Kb%,j%:�Ia("Printers:Templates","Printers:Template3D"):�l("","info",1,Gb%):�l("","prntctrl",1,Fb%):�l("","connections",1,Q%):�l("","queue",1,A%!40):�l("","query",1,Db%) ���l("","papersize",1,Cb%):�l("","howquery",1,Bb%):�l("","shutdown",1,Ab%):�l("","save",1,zb%):�Ka:�icon_write(Gb%,3,�msg_0(A%!12,"VSN")):�j%=0�5:B%=1178878793:C%=40:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","ICDF") �!i%=A%!40:i%!4=j%:È™262350,,i%:È™262340,,i%:A%!(52+4*j%)=i%+8:�:�j%=0�4:B%=1178878793:C%=40:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","ICDF") �'!i%=Fb%:i%!4=j%:È™262350,,i%:�j%=4� �ș262340,,i% �U�:B%=1482184792:C%=i%!36+1:i%!28=�(P%+12):�i%!28=0�253,�msg_1(A%!12,"FA5","XXXX") � oa%(j%)=i%+8:�:�j%=0�3:a%(j%)!16=a%(4)!16:�:�j%=0�3:�icon_write(Fb%,j%,�msg_0(A%!12,�icon_read(Fb%,j%))):�:� ݤba(a,b):�a>b�=a�=b WݤI:�p%:�Ia("Printers:Templates","Printers:Template3D"):�l("","pause",1,p%):�Ka:=p% Q��Za(Lb%):!O%=Lb%:È™262348,,O%�1:B%=1179014466:C%=O%!76:�P%+16:È™262339,,O%:� ,��pa:�Mb%,i%,t$,ia$,z%,H%,Nb%:�S%:ÈŽ!q%� !/�A%!40:È™262344,,q%�Mb%:B%=q%:C%=Mb%:�P%+36 &p�Fb%:È™262344,,q%�Mb%:È•Mb%:�i%=0�3:a%(i%)!4=a%(4)!4:a%(i%)!12=a%(4)!12:�:z%=A%!48:Ob%=0:È•z%:Ob%+=1:�z%!40� +$a%(0)!20=$z%!40 0�:?a%(0)!20=13 5� :c$a%(1)!20=$z%!8:t$=�!(z%!12+0):ia$=�msg_0(A%!12,"IC"+t$):�ia$="IC"+t$ia$=�msg_1(A%!12,"ICx",t$) ?!$a%(2)!20=ia$:�z%!24�(1<<16)� Dt$="SHA" I�:�z%!24�1� Nt$="ACT" S�:t$="INA" X� ]� b�$a%(3)!20=�msg_0(A%!12,t$):�i%=0�3:È™262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):�:z%=z%!0:�:S%=Ka%:È•S%:$a%(0)!20=$S%!4:$a%(1)!20=$S%!8:$a%(2)!20=�msg_0 (A%!12,"IC9"):�S%!20>0� g"$a%(3)!20=�msg_0 (A%!12,"UNA") l$�:$a%(3)!20=�msg_0 (A%!12,"INA") q� vk�i%=0�3:È™262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):�:S%=S%!0:�:È™262346,,q%�Mb%:� {&:�H(!q%,Nb%,H%,z%):�c(H%,z%,1,q%) �� �� �,��_a(z%):�y%,s$:�z%!40s$=$z%!40�s$=$z%!8 ���`a(z%!48,�msg_1(A%!12,"PAU",s$)):!O%=-2:È™262347,,O%:y%=O%!4-O%!20:O%!4=z%!20:È™262350,,O%:y%+=O%!16-680:!O%=z%!48:È™262347,,O%:O%!12=(O%!12-O%!4)+y%:O%!16=140+240:O%!4=y%:O%!8=O%!16-240:O%!28=-1:È™262341,,O%:� �E��s(Lb%):!O%=24:O%!12=0:O%!16=262347:O%!20=Lb%:È™262375,17,O%,0:� �*��e:�i%,j%,z%,H%,Nb%:�s(!q%):�A(!q%)� �ș262342,,q% �&�:�H(!q%,Nb%,H%,z%):�c(H%,z%,3,q%) �� �� �#��free_structure(p%):�i%:�p%=0� �Ȏp%!-4� � �1146377036:È•p%:�0<=p%!4-1� �/�i%=0�p%!4-1:�free_structure(p%!(i%*4+8)):� �� �.i%=p%!0:B%=1146377036:C%=p%:�P%+16:p%=i%:� �V�1280266050:�free_structure(p%!0):�free_structure(p%!4):B%=1280266050:C%=p%:�P%+16 �P�1196707401,1196577875,810701907,1381258055,1381257040:B%=p%!-4:C%=p%:�P%+16 �>�1380010051:È•p%:i%=!p%:B%=1380010051:C%=p%:�P%+16:p%=i%:� �':�253,�msg_1(A%!12,"FAA",�~(p%-4)) �� �� �3��va(r%):�s$,z%,H%,Nb%,Pb%,i%:Pb%=q%!4:ÈŽq%!16� ��0:�I:�x � �1:�ab ��2:�q%!36� 9È™262356,,-1:i%=q%+44:�Z%,i%,s$:�icon_write(Q%,30,s$) � �3:�bb �5:�q%!40=4038� ,q%!12=q%!8:q%!16=4:È™262375,17,q%,Pb%:�O � �8:�A%!32� % �!q%<>20� *�(q%!20�1)=0Qb%=1�Qb%=2 /�:Qb%=1 4� 98q%!12=q%!8:È™262375,19,q%,Pb%:A%!20=A%!20�1:�cb(Ab%) >� C5�10:�#q%!20,"/"+�task_read_env("Printers$Dir",O%) H,�11:z%=A%!48:È•z%:�(z%!24�8)<>0�z%<>ra%� M"r%=z%!12:�r%!0=q%!20�q%!24<=0� Rcs$=�msg_0(A%!12,"INU"):!q%=32+�s$��3:q%!12=q%!8:q%!16=12:$(q%+28)=s$+�0:È™262375,17,q%,Pb%:z%=0 W� \� a�z%z%=z%!0 f� k �12:qa%=2 p�1282:�A(q%!32)� u�db z�:�H(q%!32,Nb%,H%,z%):�Nb%� �c(H%,z%,r%,q%) ��:�q%!36� � �xa%�c (xa%!4,xa%,r%,q%)��db �� �� �� ��262345:�q%!20=Ab%� ��A%!32>0A%!20=A%!20��1 � �:�eb �� ��524609:A%!36=0 ��524610:�W%� �q%!20=-2:q%!24=W%!20:�ab ��:z%=A%!48:�z%� �%q%!20=1:s$=�msg_0(A%!12,"OKU")+�0 �'�:q%!20=2:s$=�msg_0(A%!12,"OKW")+�0 �� �K!q%=28+�s$��3:q%!12=q%!8:q%!16=524612:$(q%+24)=s$+�0:È™262375,17,q%,Pb% �� ��524611:�q%!4<>Rb%� � �q%!0=20� � �I:�x ��:�q%!12=ha%� �!�b(�msg_0(A%!12,"FAJ")):�I:�x �,�:q%!12=q%!8:q%!20=34:È™262375,17,q%,Pb% �� � � �524614:ta%=2 �524626:�W%� �select_printer(W%,-1,0) � :�x $�w(W%,r%,q%) )� .� 3��db:�s$,z%,F$:ÈŽq%!32� 8�-2:�A%!48=0� =.�interactive_help(�msg_0(A%!12,"ICON0")):� B� G)�y(q%!36,z%):�z%!40s$=$z%!40�s$=$z%!8 L/�interactive_help(�msg_1(A%!12,"ICON1",s$)) QP�zb%:s$=�msg_0(A%!12,"SAVE"+�q%!36):�s$="SAVE"+�q%!36s$=�msg_0(A%!12,"SAVE") V�interactive_help(s$) [V�Ab%:s$=�msg_0(A%!12,"SHTDWN"+�q%!36):�s$="SHTDWN"+�q%!36s$=�msg_0(A%!12,"SHTDWN") `�interactive_help(s$) eS�Bb%:s$=�msg_0(A%!12,"HWQRY"+�q%!36):�s$="HWQRY"+�q%!36s$=�msg_0(A%!12,"HWQRY") j�interactive_help(s$) oS�Cb%:s$=�msg_0(A%!12,"PAPER"+�q%!36):�s$="PAPER"+�q%!36s$=�msg_0(A%!12,"PAPER") t�interactive_help(s$) yS�Db%:s$=�msg_0(A%!12,"QUERY"+�q%!36):�s$="QUERY"+�q%!36s$=�msg_0(A%!12,"QUERY") ~�interactive_help(s$) �3�A%!40:�interactive_help(�msg_0(A%!12,"QUEUE")) �#�Q%:F$="CNCT"+�q%!36:�q%!36=13� �$�icon_set(Q%,13)F$+="b"�F$+="a" �� ��q%!36=35� �$�icon_set(Q%,35)F$+="b"�F$+="a" �� ��q%!36=37� �$�icon_set(Q%,37)F$+="b"�F$+="a" �� �5s$=�msg_0(A%!12,F$):�s$=F$s$=�msg_0(A%!12,"CNCT") ��interactive_help(s$) �2�Fb%:�interactive_help(�msg_0(A%!12,"PRCTRL")) �0�Gb%:�interactive_help(�msg_0(A%!12,"INFO")) �%:È™262388,1,V%,q%!32,q%!36:ÈŽJ$� ��"ME1":�!V%<>2� �1�interactive_help(�msg_0(A%!12,"HME1-"+�!V%)) ��:�A%!44=0� �.�interactive_help(�msg_0(A%!12,"HME1-2a")) �/�:�interactive_help(�msg_0(A%!12,"HME1-2")) �� �� �P�"ME2","ME3","ME4","ME5","ME6","MP1":�interactive_help(�msg_0(A%!12,"H"+J$)) ��"MQ1":�J(Sb%,!V%)� ��!V%>3�Aa%=0� -�interactive_help(�msg_0(A%!12,"SMQ1-7")) 5�:�interactive_help(�msg_0(A%!12,"SMQ1-"+�(!V%))) � �:�!V%<>4� 3�interactive_help(�msg_0(A%!12,"HMQ1-"+�(!V%))) �:�Aa%!12� .�interactive_help(�msg_0(A%!12,"HMQ1-4a")) #0�:�interactive_help(�msg_0(A%!12,"HMQ1-4b")) (� -� 2� 7�"MC1":�J(Sb%,!V%)� <�!V%=6� A/�interactive_help(�msg_0(A%!12,"SMC1-6")):� F� K(È™262358,Fb%,O%,1<<21,1<<21:�!O%=-1� P-�interactive_help(�msg_0(A%!12,"SMC1-2")) U/�:�interactive_help(�msg_0(A%!12,"SMC1-0")) Z� _3�:�interactive_help(�msg_0(A%!12,"HMC1-"+�!V%)) d� i�"MC1s":�J(Sb%,!V%)� n�!V%=7� s0�interactive_help(�msg_0(A%!12,"SMC1s-7")):� x� }�!V%=2�Ja%=0� �0�interactive_help(�msg_0(A%!12,"SMC1s-2")):� �� �(È™262358,Fb%,O%,1<<21,1<<21:�!O%=-1� �.�interactive_help(�msg_0(A%!12,"SMC1s-3")) �0�:�interactive_help(�msg_0(A%!12,"SMC1s-0")) �� �4�:�interactive_help(�msg_0(A%!12,"HMC1s-"+�!V%)) �� �� �� �� �p��interactive_help(m$):�Pb%:!q%=24+�m$��3:q%!12=q%!8:q%!16=1283:$(q%+20)=m$+�0:Pb%=q%!4:È™262375,17,q%,Pb%:� �&��ab:�s$,i%,y%,z%,M%:�q%!20=A%!40� �X!V%=A%!40:È™262347,,V%:B%=q%!32-V%!16+V%!24:y%=�(P%+44):i%=A%!16:z%=!i%:M%=i%!4:�z%� �q%!20=-2:q%!24=z%!20 �� ��:�y(q%!24,z%) �� �&�q%!20<>-2�254,�msg_0(A%!12,"OKN") �Bi%=q%+44:�Z%,i%,s$:i%=�s$:È•i%>0:�s$,i%,1)="."��s$,i%,1)=":"� �s$=�s$,i%+1):i%=0 �� �Hi%-=1:�:ba$=s$:A%!36=0:Da%=q%!4:s$=�m(-1):�(z%!32)<>0�(z%!24�36)<>0� �uÈ™131108,"Printer$Temp",,-1:q%!0=48+�s$��3:q%!12=q%!8:q%!16=2:q%!36=-1:$(q%+44)=s$+�0:È™262375,17,q%,Da%:Fa%=q%!8 ���:q%!12=q%!8:È™262375,19,q%,Da%:�select_printer(z%,0,0):È™36,"Printer$Temp",s$,�s$:q%!16=524608:È™262375,18,q%,Da%:�fb (Da%,ba$) �� � ݤm(Tb%):�c%:笤x� �Tb%� �254,�msg_0(A%!12,"OKAO") $�:�j(�msg_0(A%!12,"OKAO"),1):="" � "� 'c�:Ha%+=1:È™8,17,"<Wimp$ScrapDir>.Printers."+�Ha%�c%:�c%=0:=�S("<Wimp$ScrapDir>.Printers."+�Ha%) ,7��bb:�s$,i%,z%,O$,o$,Ub%,Pb%:�q%!40=4038�q%!20=Fb%� 1�O:� 6� ;Di%=q%+44:�Z%,i%,o$:È™8,17,o$�Ub%:�(Ub%�2)�(q%!40<4096)q%!40=4096 @�q%!20=A%!40� EX!V%=A%!40:È™262347,,V%:B%=q%!32-V%!16+V%!24:y%=�(P%+44):i%=A%!16:z%=!i%:M%=i%!4:�z%� Jq%!20=-2:q%!24=z%!20 O� T� Y&�q%!20<>-2�254,�msg_0(A%!12,"OKN") ^mA%!36=Fa%<>0�Fa%=q%!12:q%!12=q%!8:q%!16=4:Pb%=q%!4:È™262375,17,q%,Pb%:Fa%=0:�y(q%!24,z%):Ub%=q%!40:�z%=0� c&�Ub%<>4038�254,�msg_0(A%!12,"OKW") h�O:� m� r�A%!36� wbÈ™272000,Da%�i%:�Z%,i%,O$:o$=ba$:s$=�task_read_env("Printer$Temp",O%):�s$=""i%=q%+44:�Z%,i%,s$ |p�:i%=q%+44:�Z%,i%,s$:i%=�s$:ȕ�s$,i%,1)<>".":i%-=1:�:o$=�s$,i%+1):i%=1:ȕ�s$,i%,1)<>".":i%+=1:�:O$=�s$,i%-1) �� � �gb(A%!36,O$,s$,o$,z%,Ub%):� ���eb:ÈŽJ$� ��"MQ1":�za%� �*�Aa%Aa%?11=Aa%?11��8�za%!24=za%!24��16 �$�f(-1,za%,Aa%):ya%=0:za%=0:Aa%=0 �� �X�"MC1","MC1s":È™262358,Fb%,O%,1<<21,1<<21:�!O%�O%!4=-1�wa%=0�icon_deselect(Fb%,!O%) �� �J$="":� �Q��wa:�s$,z%,M%,N%,Vb%,G$,H%,z$,t%,Qa%,Ra%,Wb%,o$:�C$,z%,mb%,w$,c$,A$:ÈŽq%!16� � �11:qa%=1 �6�524608:�y(q%!24,z%):�z%=0�254,�msg_0(A%!12,"OKW") �1M%=z%!32:H%=z%!4:N%=z%!12:�M%=0�(z%!24�36)=0� �i%=q%+44:�Z%,i%,o$:ÈŽN%!0� ��5:Vb%=(N%?6�2)<>0 ��9:Vb%=0 �:Vb%=(N%?6�1)<>0 �� � �Vb%� �g$=�m(-1):�N%!0=5� �%È™36,"PrinterType$5",g$,�g$:�J(5) �)�:È™36,"PrinterType$10",g$,�g$:�J(10) �� � G$=g$ �� z$=�m(-1):È™36,"Printer$Temp",z$,�z$:q%!0=20:q%!16=524613:È™262375,18,q%,Da%:ta%=0:�:�v(la%):�ta%:b%=(ta%=2):Wb%=q%!4:�Vb%� s$=�n(z%,-1):�s$<>""� �b(s$):�z%!32� $z%!24=z%!24�4:�i(z%):�f(-1,z%,0) � � !� &�b%� +È™8,17,z$�t%,,Qa%,,Ra%:�t%� 0s$=z$:È™8,23,z$�,,,,,,Ub% 5�:�Vb%� :�N%!0=5� ?�hb($N%!16,G$):� D�:s$=G$:Ub%=H%!28 I� N�:�N%!0=9�q$<>""� S�c$=$(z%!40):K%=�c$," "):È•K%:�c$,K%,1)=�160:K%=�c$," ",K%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Na%):È™131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� X-È™272000,Da%�i%:�Z%,i%,A$:�B (z%,A$,o$)� ]Xb%=W%!4:È™131113,25,w$,C$ b�:È™131080,6,w$ g� l� q� v�select_printer(W%,0,-1):� {� �� �?È™272000,Wb%�O$:i%=�o$:È•i%>0:�o$,i%,1)="."��o$,i%,1)=":"� �o$=�o$,i%+1):i%=0 �� �%i%-=1:�:�gb(-1,O$,s$,o$,z%,Ub%):� �� �� ���select_printer(z%,0,-1):È™36,"Printer$Temp",,-1:s$=�m(-1):q%!0=48+�s$��3:q%!16=2:q%!36=-1:$(q%+44)=s$+�0:È™262375,17,q%,Da%:Fa%=q%!8 ��524613:ta%=1 �:�w(W%,19,q%) �� �� �+��x:�H%:�z%,c$,Ub%,c$,Zb%,f%,N%:�z:�W%� �1c$=$W%!40:N%=W%!12:H%=W%!4:Ub%=H%!28:�N%!0=9� �8È™424578,0,2,c$,0,0�,,,,,Zb%;f%:�(Zb%>0)�((f%�0)=0)� �ș424323,0,Zb%,c$,Ub% �� �� �� � �Ja%� �#z%=A%!48:È•z%:�(z%!24)�(1<<16)� ��(z%!40=0)� �H%=z%!4:c$=$H%!4 ��:c$=$z%!40 �� ��ib (z%) � z%=z%!0:� � qÈ™131077,"%Wipe <Wimp$ScrapDir>.Printers.* RF~C~V":H%=ua%:È•H%:�_(H%!16):H%=H%!0:�:�_(A%!12):�w(0,-2,0):�jb:� (��sa:�H%,z%,Nb%,D$,H$,_b%:笤A(!q%)� +�H(!q%,Nb%,H%,z%):�z%!40D$=$z%!40�D$="" 1_b%=W%:�c(H%,z%,8,q%):�$(Nb%+16)="configure"� %�z%!40H$=$z%!40�H$="" *�H$<>D$� /�(z%!24�(1<<16))� 48�kb(z%):�i(z%):�f(-1,z%,0):�(H%!24�4)=0�i(Q%)�T(z%) 9I�:�b (�msg_0(A%!12,"OKAP")):H$=D$:�d (1196577875,z%!40):�K (z%!40,D$) >� C� H�z%!20<>-1�_b%<>W%� M�select_printer(_b%,-1,0) R� W� \�:�q%!24=13� a ÈŽ!q%� f!�Q%:�lb:�J$="ME6"È™262356,,-1 k !q%=Q%:�e p�Cb%:�mb:!q%=Cb%:�e u>�zb%:È™262356,,-1:�icon_write(Q%,30,�T(�icon_read(zb%,1))) z� �:È™262364,q%!24 �� �� �� �X��U(`b%):�i%:!V%=`b%:È™262348,,V%�1:i%=V%!88:È•i%:�icon_deselect(`b%,i%-1):i%-=1:�:� �@��qa:�z%,qb%,M%,ac%,H%,Nb%,H$,D$,B%,C%,_b%:�S%:�A(q%!12)=0� �-�H(q%!12,Nb%,H%,z%):�z%!40D$=$z%!40�D$="" �8_b%=W%:�c(Nb%!8,Nb%!12,6,q%):�$(Nb%+16)="configure"� ��z%!40H$=$z%!40�H$="" ��H$<>D$� ��(z%!24�(1<<16))� �8�kb(z%):�i(z%):�f(-1,z%,0):�(H%!24�4)=0�i(Q%)�T(z%) �I�:�b (�msg_0(A%!12,"OKAP")):H$=D$:�d (1196577875,z%!40):�K (z%!40,D$) �� �� ��z%!20<>-1�_b%<>W%� ��select_printer(_b%,-1,0) �� �� � �:ÈŽq%!8� ��1024:ÈŽq%!12� ��Fb%:�q%!16� �笤icon_set(q%!12,q%!16)� �'�U(q%!12):�icon_select(q%!12,q%!16) �� ��:�U(q%!12) � � �256:ÈŽq%!12� �Fb%:�q%!16� �icon_set(q%!12,q%!16)� �icon_deselect(q%!12,q%!16) �:�icon_select(q%!12,q%!16) $� )� .� 3�64:�q%!12=zb%�nb(!q%,q%!4) 8�2:ÈŽq%!12� =�-2:�g("ME1",-1,0) B�A%!40:�g("MQ1",-1,0) G�Fb%:�g("MC1s",-1,0) L�Q%:ÈŽq%!16� Q�8:�g("ME2",-1,-1) V�11:�g("ME3",-1,-1) [�14:�g("ME4",-1,-1) `�16:�g("ME5",-1,-1) e�20:�g("ME6",-1,-1) j�32:�g("SVE",-1,-1) o� t!�Cb%:�q%!16=47�g("MP1",-1,-1) y� ~�4:ÈŽq%!12� ��-2:�ob ��Db%:sa%=q%!16 ��Bb%:sa%=q%!16 ��zb%:�q%!16=2� �9È™262356,,-1:�icon_write(Q%,30,�T(�icon_read(zb%,1))) �� ��Ab%:È™262356,,-1:�q%!16=3� �!q%=A%!40:�e:�I:ÈŽQb%� ��1:È™262364,508 � �2:�x �� ��:A%!20=A%!20��1 �� ��Fb%:�q%!16� �笤icon_set(q%!12,q%!16)� �'�U(q%!12):�icon_select(q%!12,q%!16) �� ��t(z%,S%,qb%):�z%� �(�c(z%!4,z%,-3,0):�pb(z%,"configure") �� �� ��Q%:ÈŽq%!16� ��0,1,2,3,4,33:�qb ��5:�lb:!q%=Q%:�e ��8:�g("ME2",-1,-1) �11:�g("ME3",-1,-1) �14:�g("ME4",-1,-1) �16:�g("ME5",-1,-1) �20:�g("ME6",-1,-1) �32:�g("SVE",-1,-1) �38:!q%=Q%:�e � #�Cb%:ÈŽq%!16� (�42:�mb:!q%=Cb%:�e -�33:�rb:!q%=Cb%:�e 24�48:B%=1163547472:C%=Ga%:�P%+16:Ga%=0:!q%=Cb%:�e 7&�23,22:�icon_select(Cb%,q%!16):�sb <�47:�g("MP1",-1,-1) A� F!:z%=A%!48:È•z%:�z%!48=q%!12� KM%=z%!32:ac%=M%!44:�ac%� P�ac%!40� U �q%!16=4� Z�n(z%,M%,-1) _>�:z%!24=z%!24��36:ac%!40=0:�i(z%):�f(-1,z%,0):!q%=z%!48:�e d� i� n� sz%=0 x �:z%=z%!0 }� �� �� ��1:ÈŽq%!12� ��-2:�ob ��Q%:ÈŽq%!16� ��0,1,2,3,4,33:�qb � �5:�lb �� ��Cb%:ÈŽq%!16� ��42:�mb ��33:�rb �&�23,22:�icon_select(Cb%,q%!16):�sb �� �� �� �� �� �-��qb:�c%,h%,i%,n%:c%=-1:�icon_set(Q%,1)� ܿ�icon_unshade(Q%,15):�icon_unshade(Q%,8):�icon_unshade(Q%,17):�icon_unshade(Q%,11):�icon_unshade(Q%,18):�icon_unshade(Q%,14):�icon_unshade(Q%,19):�icon_unshade(Q%,16):�icon_unshade(Q%,13) ��:�icon_shade(Q%,15):�icon_shade(Q%,8):�icon_shade(Q%,17):�icon_shade(Q%,11):�icon_shade(Q%,18):�icon_shade(Q%,14):�icon_shade(Q%,19):�icon_shade(Q%,16):�icon_shade(Q%,13) �� ��icon_set(Q%,2)� �3�icon_unshade(Q%,25):�icon_unshade(Q%,20):c%=25 �+�:�icon_shade(Q%,25):�icon_shade(Q%,20) �� ��icon_set(Q%,3)� ]�icon_unshade(Q%,26):�icon_unshade(Q%,27):�icon_unshade(Q%,28):�icon_unshade(Q%,29):c%=26 Q�:�icon_shade(Q%,26):�icon_shade(Q%,27):�icon_shade(Q%,28):�icon_shade(Q%,29) � �icon_set(Q%,4)� H�icon_unshade(Q%,30):�icon_unshade(Q%,32):�icon_unshade(Q%,35):c%=30 >�:�icon_shade(Q%,30):�icon_shade(Q%,32):�icon_shade(Q%,35) "� '�c%=-1� ,+�caret_info(h%,i%,n%):�h%=Q%È™262354,-1 1�:�caret_set(Q%,c%) 6� ;� @*��y(Lb%,�z%):z%=A%!48:È•z%:�z%!20=Lb%� Ez%=z%!0:�:� J;��ob:�z%,bc%,cc%:cc%=�-1:bc%=(q%!8=1):�y(q%!16,z%):�z%� O �bc%� T�cc%�T(z%)��tb Y�:�cc%� ^(�c(z%!4,z%,-3,0):�pb(z%,"configure") c.�:�select_printer(z%,-1,0):�i(Fb%)�ub(z%) h� m� r� w� | �vb(z%):� �=��select_printer(z%,dc%,ec%):�fc%,i%,s$:fc%=W%:�ec%W%=z% � �W%=0� �s$=�n(W%,0):�s$<>""� � �dc%� �W%!24=W%!24��2 �� ��W%!32� �$W%!24=W%!24�4:�i(W%):�f(-1,W%,0) �� ��W%=fc%� �/�icon_deselect(-1,fc%!20):È™524632,-1:fc%=0 �� �W%=fc%:�b(s$):� �� �%�c(W%!4,W%,-6,0):�wb(W%):�z:�dc%� � �fc%� �.�icon_deselect(-1,fc%!20):fc%!24=fc%!24��2 �� �]W%!24=W%!24�2:�icon_select(-1,W%!20):È™524608�,,,,i%:�?i%�Z%,i%,s$:È™36,"Printer$",i%,�s$ ��:W%=fc% �� �� �H��wb(z%):�`%:`%=z%!36:È™524612,,`%!8,`%!12,`%!24,`%!16,`%!28,`%!20:� �8��z:!ba%=20:ba%!12=0:ba%!16=524615:È™262375,17,ba%:� ��ݤC(gc%,z%):�p$,r%,s$,i%:p$=�msg_0(A%!12,"CLM"):!q%=32+�p$��3:q%!12=0:q%!16=11:q%!20=gc%:q%!24=0:$(q%+28)=p$+�0:È™262375,18,q%:qa%=0:ra%=z%:�:�v(la%):�qa%:ra%=0:�qa%=2i%=q%+28:�Z%,i%,s$:=s$ �="" �ݤn(z%,hc%):�N%,p$,H%,fb%,f%,s$,ic%:�ja$,fb%,ab%,Zb%,c$,K%:�fb%=0�255:aa%?fb%=q%?fb%:�:H%=z%!4:N%=z%!12:g$=�task_read_env("PrinterType$"+�N%!0,ba%):È™6,204,Ia%:È™424324:ÈŽN%!0� �1:�hc%� /p$=�C(1,z%):�p$<>""�=�msg_1(A%!12,"OKI",p$) � ic%=�o(1):�ic%=0ic%=3 �z%!24�128� !%g$="devices#buffer"+�ic%+":$."+�U &,�:g$="devices#buffer"+�ic%+":$.Parallel" +� 0 �2:�hc%� 5/p$=�C(2,z%):�p$<>""�=�msg_1(A%!12,"OKJ",p$) :� ?[È™87,5,N%?4:È™87,6,N%?4:È™87,1,N%!8:È™87,0,N%?5,�1:È™6,204,1�,Ia%:ic%=�o(2):�ic%=0ic%=3 D(g$="devices#buffer"+�ic%+":$.Serial" I'�4:�$N%!12=""�=�msg_0(A%!12,"OKAG") N?g$="NetPrint#"+$N%!12+":":È™263872:È™262659,$N%!12:È™263873 S�5:g$="null:":�N%!16<>0� X&�?(N%!16)>32�?(N%!16)<127g$=$N%!16 ]� b$È™131080,17,g$�fb%;f%:�f%�1fb%=0 g �fb%� l=È™131085,67,g$�fb%;f%:�(f%�1)=0�#fb%:È™131080,18,g$,H%!28 q*�:È™131080,11,g$,H%!28�fb%;f%:�(f%�1)� vfb%+=4:�Z%,fb%,s$:=s$ {� �� � �6:s$=�ca(N%,g$):�s$<>""�=s$ �O�8:È™131107,"PrinterType$8",O%,256,,3�,,f%:O%?f%=13:g$=$O%:�g$=""g$="null:" ��9:�Ja%� �>c$=$z%!40:È™424578,0,2,c$,0,0�fb%,,,jc%,,Zb%;ab%:�(ab%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� �'È™424323,1,Zb%,c$�fb%;ab%:�(ab%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� �}q$="Share::_S"+�u(Zb%)+".":ja$="Share::_S"+�u(Zb%)+".RemSpool."+h$:È™293254:È™131080,8,ja$,,,0�fb%;ab%:È™293253:�(ab%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� �bja$="Share::_S"+�u(Zb%)+".RemQueue."+h$:È™293254:È™131080,8,ja$,,,0�fb%;ab%:È™293253:�(ab%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� �s$=�da:�s$<>""� �=�msg_1 (A%!12,"OKAR",c$) �� ߎK%=�c$," "):È•K%:�c$,K%,1)=�160:K%=�c$," ",K%+1):�:g$="Share::_S"+�u(Zb%)+".RemSpool."+h$+"."+c$:È™293254:È™131080,17,g$�fb%;f%:�f%�1fb%=0 � �fb%� �=È™131085,67,g$�fb%;f%:�(f%�1)=0�#fb%:È™131080,18,g$,H%!28 �ș293253 �3�:È™131080,11,g$,H%!28�fb%;f%:È™293253:�(f%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� � �:=�msg_1 (A%!12,"OKAR",c$) � � MÈ™36,"PrinterType$"+�N%!0,g$,�g$:�J(N%!0):�fb%=0�255:q%?fb%=aa%?fb%:�:="" ��xb(ic%):�ic%È™6,21,ic% � %5��J(kc%):�x%:�:��:�yb:�xb(�o(x%)):È™6,5,kc%:� *È™6,245,,255�,x%:�x%<>kc%� /�zb:È™6,5,kc%:�yb 4� 9� >��zb:È™6,229:� C��yb:È™6,229,1:� H4ݤca(N%,�a$):�c%,f%,s$:笤z�=�msg_0(A%!12,"OKL") M!�N%!20=0�=�msg_0(A%!12,"OKK") R>a$="NFS#Printer::"+$N%!20:�N%!24=0a$+=".lp"�a$+="."+$N%!24 W(�N%!28=0a$+=".nobody"�a$+="."+$N%!28 \�N%!32a$+="."+$N%!32 a È™131085,143,a$�c%;f%:�f%�1� f ÈŽ!c%� k�204:=�msg_0(A%!12,"OKM") p):f%=c%+4:�Z%,f%,s$:=s$+" ("+�!c%+")" u� z� È™131085,,c%:="" �8��g(ka$,lc%,mc%):�y%,i%,nc%,oc%,pc%:�z%,S%,qb%:�lc%� �qc%=q%!0-64:rc%=q%!4 �� � �mc%� �q!O%=q%!12:O%!4=q%!16:È™262350,,O%:nc%=O%!16:oc%=O%!20:È™262347,,O%:qc%=O%!20+O%!4+nc%+2:rc%=O%!24+O%!16+oc%-2 �� ��ka$="SVE"� �8�Ab(Ca%!28,�msg_0(A%!12,"OP")):È™262356,,zb%,qc%,rc% ��:ÈŽka$� �y�"ME1":�menu_create(_%,�msg_0(A%!12,"ME1")):�Bb(_%,0,Gb%,0):�a(_%,2,A%!44=0):rc%=96+(5+1)*pa%:�vb%za%=0��y(q%!16,za%) ��"ME2":�R� �R�menu_create(_%,�msg_0(A%!12,"ME2")+�msg_0(A%!12,"ME2a")+�msg_0(A%!12,"ME2b")) �?�:�menu_create(_%,�msg_0(A%!12,"ME2")+�msg_0(A%!12,"ME2b")) �� �*�menu_tick_match(_%,�icon_read(Q%,15)) �V�"ME3":�menu_create(_%,�msg_0(A%!12,"ME3")):�menu_tick_match(_%,�icon_read(Q%,17)) �V�"ME4":�menu_create(_%,�msg_0(A%!12,"ME4")):�menu_tick_match(_%,�icon_read(Q%,18)) �R�"ME5":�menu_create(_%,�msg_0(A%!12,"ME5")):pc%=(_%!28�256)<>0:�(�v=0��q<>0)� ��v=3��q=0� �-�menu_item(_%,1,�msg_0(A%!12,"ME5c"),pc%) �/�:�menu_item(_%,1,�msg_0(A%!12,"ME5a"),pc%) �� �� �*�menu_tick_match(_%,�icon_read(Q%,19)) ��"ME6":�lc%�Cb *�menu_tick_match(_%,�icon_read(Q%,25)) �"MQ1":�lc%� m�eb:ya%=rc%:!q%=A%!40:È™262347,,q%:B%=ya%-q%!16+q%!24:ya%=�(P%+44):i%=A%!16:za%=!i%:Aa%=i%!4:�Aa%=-1Aa%=0 �Aa%=0� R�menu_create(_%,�msg_1(A%!12,"MQ1",�msg_0(A%!12,"MQ1a"))):�za%za%!24=za%!24�16 �:�Aa%!12� =�menu_create(_%,�msg_1(A%!12,"MQ1",�msg_0(A%!12,"MQ1a"))) $?�:�menu_create(_%,�msg_1(A%!12,"MQ1",�msg_0(A%!12,"MQ1b"))) )� .Aa%?11=Aa%?11�8 3� 8�f(-1,za%,Aa%) =� BX�a(_%,0,0):�a(_%,1,0):�a(_%,2,0):�a(_%,3,0):�a(_%,4,0):�a(_%,5,0):�a(_%,6,0):�Aa%=0� G'�a(_%,4,-1):�a(_%,5,-1):�a(_%,6,-1) L&�:�Aa%?11�5�a(_%,4,-1)��a(_%,5,-1) Q� V�za%!24�36� [�a(_%,0,-1):�a(_%,1,-1) `�:�a(_%,2,-1) e� j'�"MP1":�create_paper_menu(_%,Cb%,5) o?�"MC1","MC1s":�menu_create(_%,�msg_0(A%!12,"MC1s")):�Ja%=0� t�a(_%,2,-1) y� ~8È™262358,Fb%,O%,1<<21,1<<21:�(!O%=-1�O%!4=-1)�wa%=0� � �!O%�icon_deselect(Fb%,!O%) ��q%!12=Fb%�q%!16>3� � �icon_select(Fb%,q%!16):i%=1 � �:i%=0 �� � �:i%=2 �� � ÈŽi%� �n�0:�a(_%,0,-1):�a(_%,1,-1):�a(_%,2,-1):�a(_%,3,-1):�a(_%,4,-1):�a(_%,5,-1):�a(_%,7,-1):�A%!48=0�a(_%,6,-1) ��1:�t (z%,S%,qb%):�S%� �4�a (_%,0,-1):�a (_%,1,-1):�a (_%,2,-1):�S%!20>0� ��a (_%,3,-1) ��:�a (_%,4,-1) �� ��a (_%,5,-1) �� ��z%� ��z%!24�(1<<17)� �7�a (_%,1,-1):�a (_%,2,-1):�a (_%,3,-1):�a (_%,5,-1) �� �� ��2:�a(_%,0,-1):�a(_%,1,-1) �� �� �&J$=ka$:�display_menu(0,_%,qc%,rc%) � � ���create_paper_menu(�Lb%,`b%,qb%):�`%,i%,pc%:�menu_create(Lb%,�msg_0(A%!12,"MP1")):pc%=(Lb%!28�256)<>0:`%=ja%:i%=0:È•`%:�menu_item(Lb%,i%,$`%!4,pc%):i%+=1:`%=`%!0:�:�menu_tick_match(Lb%,�icon_read(`b%,qb%)):� ?��display_menu(z%,_%,sc%,tc%):xa%=z%:È™262356,,_%,sc%,tc%:� /ݤwas_adjust_used:È™262351,,O%:=(O%!8�1)<>0 .��ta:�bc%,uc%,`%,i%,h%,n%,z%,qb%:�S%:�xa%� �c(xa%!4,xa%,9,q%):� #� (bc%=�was_adjust_used:ÈŽJ$� -�"ME1":ÈŽ!q%� 2�1:�vb(za%) 7 �2:�tb <�3:�Db(za%) A�4:�Fb:�Gb F�5:�A%!32� K A%!20=A%!20�1:Qb%=2:�cb(Ab%) P�:�x U� Z� _-�"ME2":�icon_write(Q%,15,$(!q%*24+40+_%)) d5�"ME3":�icon_write(Q%,17,$(!q%*24+40+_%)):�Hb(-1) i5�"ME4":�icon_write(Q%,18,$(!q%*24+40+_%)):�Hb(-1) n�"ME5":�Hb(!q%) sT�"ME6":�menu_tick_match(_%,�icon_read(Q%,25)):�icon_write(Q%,25,$(!q%*24+40+_%)) x�"MQ1":uc%=-1:ÈŽ!q%� }�0:za%!24=za%!24�4 ��1:za%!24=za%!24�32 �'�2:za%!24=za%!24��36:i%=za%!32:�i%� �i%=i%!44:�i%� ��i%!40� �i%!40=0:�za%!48� �!q%=za%!48:�e �� �� �� �� ��3:�A(za%):uc%=0 ��4:�Aa%!12� �Aa%?11=Aa%?11�1 ��:Aa%?11=Aa%?11�4 �� ��5:Aa%?11=Aa%?11��5 ��6:�n(za%,Aa%,-1):uc%=0 �� � �uc%� ��i(za%):�!q%<3� ��f(-1,za%,0) ��:�f(ya%,za%,Aa%) �� �� �K�"MP1":`%=ja%:i%=!q%:È•i%:`%=`%!0:i%-=1:�:�i%=0�52�4:Ga%!i%=`%!i%:�:�Ib ��"MC1","MC1s":ÈŽ!q%� �0:�t(z%,S%,qb%):�z%� (�c(z%!4,z%,-3,0):�pb(z%,"configure") � �1:�t(z%,S%,qb%):�z%� �T(z%) � " �2:�Jb ' �3:�Kb:�k , �4:�Lb:�k 1 �5:�Mb:�k 6�6:�A%!48� ;�0<=va%-1� @(�i%=0�va%-1:�icon_select(Fb%,i%+4):� E� J� O �Ka%� T�0<=Ma%-1� Y,�i%=va%�va%+Ma%:�icon_select(Fb%,i%+4):� ^� c� h wa%=-1 m�7:�U(Fb%) r� w� | �bc%� �ș262351,,q%:�g(J$,0,0) � �:�eb �� �� �<��Fb:�c%,f%,H%,z%,K%,p%,Ra%,s$,f$:�vc%,S%:È™263872:�ia%� �4f$="<Printers$Dir>"+".Remote.ID"+h$+".Settings1" �&�:f$="<Printers$Dir>"+".Settings1" �� �LÈ™131085,143,f$�c%;f%:�f%�1f%=c%+4:�Z%,f%,s$:�254,�msg_1(A%!12,"OKB",s$) �D�:��:È™131085,0,c%:È™131080,6,f$:�254,�msg_1(A%!12,"OKB",�$) �h�#c%,"fv: 1":z%=A%!48:È•z%:H%=z%!4:�#c%,"cl: "+$H%!4+":"+�H%!40:�#c%,"nm: "+$z%!8:K%=z%!12:�H%!24�4� �'Ra%=H%!48:�#c%,"cn: "+�Ra%:�1<=Ra%� � �f%=1�Ra%:p%=!K%:K%+=4:ÈŽ-1� ��p%=0:�#c%,"nl: " �&�p%!-4=1196707401:�#c%,"in: "+�!p% �%�p%!-4=1196577875:�#c%,"st: "+$p% �-�p%!-4=810701907:�Z%,p%,s$:�#c%,"s0: "+s$ �:�p%!-4=1381258055:�Y%,p%,s$:�#c%,"gs: "+�ungstrans(s$) �,�p%!-4=1381257040:�#c%,"pt: "+�p(!p%,H%) �1:È™131085,,c%:�254,�msg_1(A%!12,"OKC",$z%!8) �� �� �� �E�:�#c%,"ct: 16_"+�~K%!0:�#c%,"bd: 16_"+�~K%!4:�K%!8�48K%!8=K%!8�8 �B�#c%,"ft: 16_"+�~K%!8:�#c%,"et: ";:�K%!12=0�#c%,10��#c%,$K%!12 �,�#c%,"fl: ";:�K%!16=0�#c%,10��#c%,$K%!16 ,�#c%,"ns: ";:�K%!20=0�#c%,10��#c%,$K%!20 ,�#c%,"np: ";:�K%!24=0�#c%,10��#c%,$K%!24 ,�#c%,"nu: ";:�K%!28=0�#c%,10��#c%,$K%!28 ,�#c%,"no: ";:�K%!32=0�#c%,10��#c%,$K%!32 �#c%,"cf: 16_"+�~K%?6 � !0K%=z%!16:Ra%=H%!36:�#c%,"cs: "+�Ra%:�1<=Ra%� & �f%=1�Ra%:p%=!K%:K%+=4:ÈŽ-1� +�p%=0:�#c%,"nl: " 0&�p%!-4=1196707401:�#c%,"in: "+�!p% 5%�p%!-4=1196577875:�#c%,"st: "+$p% :-�p%!-4=810701907:�Z%,p%,s$:�#c%,"s0: "+s$ ?:�p%!-4=1381258055:�Y%,p%,s$:�#c%,"gs: "+�ungstrans(s$) D,�p%!-4=1381257040:�#c%,"pt: "+�p(!p%,H%) I1:È™131085,,c%:�254,�msg_1(A%!12,"OKC",$z%!8) N� S� X� ]��#c%,"fg: 16_"+�~(z%!24�195+65536+131072):f%=z%!36:�#c%,"pn: "+$f%!4:�#c%,"sn: "+�printer_read_string(z%!40):�#c%,"ic: "+�printer_read_string(z%!44):z%=z%!0:�:S%=Ka%:È•S%:�S%!20>0� b��#c%,"cl:":�#c%,"nm: "+$S%!8:�#c%,"ct: 16_9":�#c%,"bd: 16_8":�#c%,"ft: 16_5":�#c%,"et:":�#c%,"fl:":�#c%,"ns:":�#c%,"np:":�#c%,"nu:":�#c%,"no:":�#c%,"cf: 16_0":�#c%,"cs: 2":�#c%,"in: 25600":�#c%,"in: 6":�#c%,"fg: 16_20000":�#c%,"pn:" g �#c%,"sn: "+$S%!4:�#c%,"ic:" l� qkS%=S%!0:�:�#c%:È™131080,18,f$,4038:È™131080,6,�f$):È™131113,25,f$,�f$):È™131080,4,�f$),,,,19:È™263873:� vR��Gb:�H%,yb%,R%,c%,eb%,U%,wc%,i%,j%,k%,l%,s$,f%,f$:È™263872:H%=ua%:È•H%:�H%!8� { �H%!24�2� � �ia%� �If$="<Printers$Dir>"+".Remote.ID"+h$+"."+$H%!4:È™8,8,f$:f$+=".PrData1" �.�:f$="<Printers$Dir>"+"."+$H%!4+".PrData1" �� �aÈ™131080,4,�f$),,,,3:È™131085,143,f$�c%;f%:�f%�1f%=c%+4:�Z%,f%,s$:�254,�msg_1(A%!12,"OKB",s$) �D�:��:È™131085,0,c%:È™131080,6,f$:�254,�msg_1(A%!12,"OKB",�$) �Veb%=H%!8:yb%=H%!12:È•eb%:�#c%,$(eb%+12)+":":�#c%,"#":R%=yb%!4:È•R%:�R%!(R%!4*4+8)� �T�#c%,"# Usage: "+�R%!(R%!4*4+8):U%=eb%!4:i%=R%+8:È•U%:�#c%,$(U%+16)+" ";:�!i%=0� ��U%!4=6� ��#c%,48 ��:�U%!4=1� ��#c%,48 �� �� ��#c%,10 ��:j%=!i%:ÈŽU%!4� ��1:�$(U%+16)="palette:"� ��#c%,�((!j%)�8388607) ��:�#c%,�!j% �� �$�2:�#c%,�printer_read_string(j%) �$�3:�#c%,�printer_read_string(j%) �0�4:�#c%,�ungstrans(�printer_read_string(j%)) ��5:�#c%,10:ÈŽU%!8� �"�1:�#c%," "+�!j%!0+", "+�!j%!4 �N�2:�#c%," "+�printer_read_string(j%!0):�#c%," "+�printer_read_string(j%!4) N�3:�#c%," "+�printer_read_string(j%!0):�#c%," "+�printer_read_string(j%!4) f�4:�#c%," "+�ungstrans(�printer_read_string(j%!0)):�#c%," "+�ungstrans(�printer_read_string(j%!4)) .�7:�#c%," "+�p(!j%!0,H%)+", "+�p(!j%!4,H%) � ?�6:k%=j%:l%=0:È•k%:l%+=1:k%=!k%:�:�#c%,�l%:È•j%:�0<=j%!4-1� (�k%=0�j%!4-1:l%=j%!(k%*4+8):ÈŽl%!-4� #�1196707401:�#c%," "+�!l%+", "; %"�1196577875:�#c%," "+$l%+", "; **�810701907:�Z%,l%,s$:�#c%," "+s$+", "; /7�1381258055:�Y%,l%,s$:�#c%," "+�ungstrans(s$)+", "; 4)�1381257040:�#c%," "+�p(!l%,H%)+", "; 9� >� C� H �#c%=�#c%-2:�#c%,10:j%=!j%:� M�7:�#c%,�p(!j%,H%) RF�8:k%=j%:l%=0:È•k%:l%+=1:k%=!k%:�:�#c%,�l%:È•j%:s$=�j%?4:�1<=j%?5� W�k%=1�j%?5:s$+=�j%?(k%+5):� \� a$�#c%," "+�ungstrans(s$):j%=!j%:� f� k� pU%=U%!0:i%+=4:�:�#c%,"#" u� z�R%=R%!0:�:eb%=eb%!0:yb%=yb%!0:�:�#c%:È™131080,18,f$,4038:È™131080,6,�f$):È™131113,25,f$,�f$):È™131080,4,�f$),,,,19:H%!24=H%!24��2 � �� �� �H%=H%!0:�:È™263873:� �Vݤp(p%,H%):�yb%,R%,eb%,xc%,yc%:yb%=H%!12:È•yb%:R%=yb%!4:yc%=0:È•R%:�R%!(R%!4*4+8)� �yc%+=1:�p%=R%� �9eb%=H%!8:È•xc%:eb%=eb%!0:xc%-=1:�:=$(eb%+12)+":"+�yc% �� �� �<R%=R%!0:�:xc%+=1:yb%=yb%!0:�:�b(�msg_0(A%!12,"FAF")):="" �1ݤi(h%):!V%=h%:È™262347,,V%:=(V%!32�1<<16)<>0 ���vb(z%):笤i(Fb%)� ��A%!48�Ka%� ��k �� �� ��s(Fb%):�p(Fb%):�ub(z%):� ���ub(z%):�p%:�z%� �OÈ™262358,Fb%,O%,1<<21,1<<21:p%=O%:ȕ�!p%:�!p%<>z%!28�icon_deselect(Fb%,!p%) �0p%+=4:�:�(z%!24�44)=0�icon_select(Fb%,z%!28) �� �� ���B(p%):�K%,i%,sb%:�p%=0� �Ȏp%!-4� �7�1381257040:K%=!p%:sb%=K%+K%!4*4+8:!sb%-=1:�!sb%=0� �sb%=K%+8:�1<=K%!4� �i%=1�K%!4:�B(!sb%):sb%+=4:� � � !�1280266050:�B(p%!0):�B(p%!4) �1146377036:È•p%:�0<=p%!4-1� "�K%=0�p%!4-1:�B(p%!(K%*4+8)):� � $ p%=p%!0:� )� .� 3b��Nb(la$):�H%,yb%,zc%,R%,i%,j%,k%,l%,sb%:H%=ua%:È•H%:zc%=0:yb%=H%!12:R%=yb%!4:È•R%:�$R%!8=la$� 8�(R%!(R%!4*4+8))=0� =H%!24=H%!24�2:�0<=R%!4-1� B?�i%=0�R%!4-1:sb%=R%!(i%*4+8):�B(sb%):�free_structure(sb%):� G� L �zc%� Qzc%!0=R%!0 V�:yb%!4=R%!0 [� `B%=1413763664:C%=R%:�P%+16 e� j R%=0:H%=0 o�:zc%=R%:R%=R%!0 t� y�:�H%H%=H%!0 ~�:� �*��q(ma$):�S(�msg_1(A%!12,"OKZ",ma$)):� �E��Ob(�H%):�K%,J%,c%,d%:J%=�b("cl:"):�J%=0�q(�msg_0(A%!12,"OKZa")) �H%=ua%:È•H%:�$H%!4=$J%� ��H%!24�32� �]È™131080,7,"PrinterChoices:"+$J%+".WriteTest"�;c%:�(c%�1)�m:�254,�msg_1(A%!12,"OKAN",$J%) �7È™131080,6,"PrinterChoices:"+$J%+".WriteTest"�d%;c% �� �"K%=!wb%:�Pb(H%,H%!8):!wb%=K%:� � �:H%=H%!0 �� ��:�H%=0� �/�Ra:�Ga($J%):�Ha($J%,H%):�Sa:�Na:�H%!24�32� �]È™131080,7,"PrinterChoices:"+$J%+".WriteTest"�;c%:�(c%�1)�m:�254,�msg_1(A%!12,"OKAN",$J%) �1È™131080,6,"PrinterChoices:"+$J%+".WriteTest" �� ��c(H%,A%!48,-5,0) �� �%�H%=0�q(�msg_1(A%!12,"OKZb",$J%)) �� �7��Pb(H%,eb%):�U%,J%:U%=eb%!4:�:J%=�b($(U%+16)):�J%� �ȎU%!4� ��5:�Qb(H%,eb%,$J%) �/�6:�?J%=13�q(�msg_1(A%!12,"OK7a",$(U%+16))) ��Rb(H%,eb%,$J%) ��7:�V(H%,eb%,$J%) /�8:�?J%=13�q(�msg_1(A%!12,"OK7a",$(U%+16))) �Sb(H%,eb%,$J%) � � U%=U%!0:�U%=0:� )��Qb(H%,eb%,t$):�J%,na$,i$:J%=�d:�J%� ÈŽU%!8� #!�1:J%=�K(J%,Ac%):�?J%=13J%=�d ($�2,3,4:J%=�r(J%,i$):�?J%=13J%=�d -.�7:J%=�r(J%,i$):�V(H%,eb%,i$):�?J%=13J%=�d 2�V(H%,eb%,$J%) 7� <� A� F2��Rb(H%,eb%,t$):�i%,p%,Bc%,J%:Bc%=�t$:�1<=Bc%� K�i%=1�Bc%:J%=�d:�J%� P&p%=U%!8:È•p%:�p%!4=7�V(H%,eb%,$J%) Up%=!p%:� Z� _� d� i� nI��V(H%,eb%,c$):�i%,s$,t$:i%=�c$,":"):�i%=0�q(�msg_1(A%!12,"OKAA",c$)) s;s$=�c$,i%-1):t$=�c$,i%+1):eb%=H%!8:È•eb%:�$(eb%+12)=s$� x�t$>0� }� ��:�Pb(H%,eb%):� �� ��:eb%=eb%!0 �� �#�:�q(�msg_1(A%!12,"OKAB",s$)):� �,��Sb(H%,eb%,t$):�i%,Bc%:Bc%=�t$:�1<=Bc%� ��i%=1�Bc%:�d �� �� �� �b��O:�J%,H%,K%,s$,U%,Cc%,Dc%,Fc%,Gc%,Hc%:J%=q%+44:�Z%,J%,s$:笤l(s$)�254,�msg_1(A%!12,"OKX",s$) �$È™263872:�Ob(H%):Fc%=H%!12:�Fc%� �Cc%=Fc%!4:�Cc%� �0K%=!wb%:U%=H%!8:U%=U%!4:J%=�b($(U%+16)):�J%� �ȕCc%:�$Cc%!8=$J%� ��m:È™263873:�Tb(H%,Cc%):� �� �Dc%=Cc%:Cc%=Cc%!0:� �'�:�q(�msg_1(A%!12,"OKZc",$(U%+16))) �� �!wb%=K% ��:Dc%=0 �� ��:Dc%=0 �� �I�W(H%!8,Dc%,Fc%,0,Gc%,Hc%,H%):�m:H%!24=H%!24�2:�Tb(H%,Dc%):È™263873:� 0��S(s$):�m:�254,�G(A%!12,"OK0",�xb%,V$,s$):� 3��h(H%,s$,oa$):�S(�msg_2(A%!12,oa$,$H%!4,s$)):� `��La(Ic%):�J%,T%,Jc%,i%,Kc%,Lc%,Mc%,Nc%:J%=�b("tp:"):�J%=0�h(Ic%,�msg_0(A%!12,"OK3"),"OK2a") �:J%=�d:�J%� T%=�a(J%,"tp:"):�T%� bJc%+=1:B%=1414548820:C%=12+1+�$T%:Kc%=�(P%+12):�Kc%=0�h(Ic%,�msg_1(A%!12,"FA5","TMPT"),"OK2a") " �Lc%� ' Lc%!0=Kc% ,�:Ic%!8=Kc% 1� 6/Kc%!0=0:Kc%!4=0:Kc%!8=0:$(Kc%+12)=$T%:Nc%=0 ;�:T%=�a(J%,"end:"):�T%� @/�?T%<>13�h(Ic%,�msg_0(A%!12,"OK3a"),"OK2a") EJc%-=1:Lc%=Kc% J>�:i%=�$J%,":"):�i%=0�h(Ic%,�msg_1(A%!12,"OK4",$J%),"OK2a") O2�Jc%<>1�h(Ic%,�msg_1(A%!12,"OK4a",$J%),"OK2a") TbKc%!8+=1:B%=1498567758:C%=16+1+i%:Mc%=�(P%+12):�Mc%=0�h(Ic%,�msg_1(A%!12,"FA5","NTRY"),"OK2a") Y�Nc%Nc%!0=Mc%�Kc%!4=Mc% ^FMc%!0=0:Mc%!4=0:Mc%!8=0:Mc%!12=0:$(Mc%+16)=�$J%,i%):J%+=i%+1:ÈŽ-1� cɤa(J%,"in")<>0:Mc%!4=1 hɤa(J%,"st")<>0:Mc%!4=2 mɤa(J%,"s0")<>0:Mc%!4=3 rɤa(J%,"gs")<>0:Mc%!4=4 wJɤa(J%,"bl")<>0:Mc%!4=5:T%=�a(J%,"bl"):È•?T%=32:T%+=1:�:�?T%=�","T%+=1 | ÈŽ-1� �ɤa(T%,"in")<>0:Mc%!8=1 �ɤa(T%,"st")<>0:Mc%!8=2 �ɤa(T%,"s0")<>0:Mc%!8=3 �ɤa(T%,"gs")<>0:Mc%!8=4 �ɤa(T%,"ptr")<>0:Mc%!8=7 �,:�h(Ic%,�msg_1(A%!12,"OK5",$T%),"OK2a") �� �:ɤa(J%,"ls")<>0:Mc%!4=6:T%=�a(J%,"ls"):�Ub(T%,Mc%,Ic%) �ɤa(J%,"ptr")<>0:Mc%!4=7 �ɤa(J%,"ch")<>0:Mc%!4=8 �,:�h(Ic%,�msg_1(A%!12,"OK6",$J%),"OK2a") �� �Nc%=Mc% �� �� �� � �Jc%=-1:� �K��Ub(Oc%,U%,Ic%):�wc%,K%,t%:K%=U%+8:�:È•?Oc%=32:Oc%+=1:�:�?Oc%=44Oc%+=1 �!È•?Oc%=32:Oc%+=1:�:�?Oc%<>13� �RU%!12+=1:B%=1414744396:C%=8:wc%=�(P%+12):�wc%=0�253,�msg_1(A%!12,"FA5","LIST") �/!K%=wc%:K%=wc%:wc%!0=0:t%=�a(Oc%,"in"):�t%� �Oc%=t%:wc%!4=1 ��:t%=�a(Oc%,"st"):�t%� �Oc%=t%:wc%!4=2 ��:t%=�a(Oc%,"s0"):�t%� �Oc%=t%:wc%!4=3 �:t%=�a(Oc%,"gs"):�t%� Oc%=t%:wc%!4=4 �:t%=�a(Oc%,"ptr"):�t%� Oc%=t%:wc%!4=7 -�:�h(Ic%,�msg_1(A%!12,"OK7",$Oc%),"OK2a") � !� &� +� 0� 5� :�?Oc%=13:� ?Mݤb(m$):�Pc%,i%:i%=Qc%+!wb%:È•i%<Qc%+Rc%:È•?i%=32:i%+=1:�:�?i%=35�?i%=13� Di%+=�$i%+1:xb%+=1 I�:�m$=�$i%,�m$)� NDPc%=i%+�m$:È•?Pc%=32:Pc%+=1:�:i%+=�$i%+1:!wb%=i%-Qc%:xb%+=1:=Pc% S�:i%+=�$i%+1:xb%+=1 X� ]� b�:=0 gIݤd:�Pc%,i%:i%=Qc%+!wb%:È•i%<Qc%+Rc%:È•?i%=32:i%+=1:�:�?i%=35�?i%=13� l!i%+=�$i%+1:!wb%=i%-Qc%:xb%+=1 q/�:Pc%=i%:i%+=�$i%+1:!wb%=i%-Qc%:xb%+=1:=Pc% v� {�:=0 �.ݤa(J%,m$):È•?J%=32:J%+=1:�:�m$=�$J%,�m$)� � J%+=�m$:È•?J%=32:J%+=1:�:=J% �� �=0 �o��W(eb%,�Dc%,Fc%,Sc%,�Gc%,�Hc%,H%):�_a%,Tc%,Uc%,J%,T%,U%,i%,Ra%:U%=eb%!4:_a%=-1:�:Uc%=!wb%:Gc%=0:J%=�d:�J%� ��_a%=-1� �[Ra%=4*eb%!8+8:B%=1413763664:C%=Ra%+8:Tc%=�(P%+12):�Tc%=0�253,�msg_1(A%!12,"FA5","PRDT") ��0<=Ra%+7� ��i%=0�Ra%+7�4:Tc%!i%=0:� �� ��Dc%Dc%!0=Tc%�Fc%!4=Tc% �Tc%!4=eb%!8:_a%=8 �� ��:T%=�a(J%,$(U%+16)):�T%� �Gc%=1:ÈŽU%!4� �&�1:Tc%!_a%=�store_integer(�c($T%)) �)�2,3,4:B%=T%:C%=U%!4:Tc%!_a%=�(P%+28) ��5:Tc%!_a%=�ea(U%,Hc%) �3�6:�?T%=13�h(H%,�msg_1(A%!12,"OK7a",$J%),"OK2") �Tc%!_a%=�fa(U%,�c($T%),Hc%) �%�7:�?T%<>13�X(H%,$T%,Tc%+_a%,Hc%) �3�8:�?T%=13�h(H%,�msg_1(A%!12,"OK7a",$J%),"OK2") �Tc%!_a%=�ga(U%,�c($T%)) �� �� �_a%+=4:U%=U%!0:�U%=0�Gc% � �Gc%=0� �!wb%>=Rc%Gc%=3 -!wb%=Uc%:U%=eb%!4:T%=�a(J%,$(U%+16)):�T%� Gc%=1 0�:eb%=eb%!0:T%=�a(J%,$(eb%+12)+":"):�T%Gc%=2 � %U%=0 *� /�U%=0:Dc%=Tc%:� 4���Ma(H%):�eb%,s$,J%,Uc%,U%,Gc%,Tc%,Dc%,Fc%,Sc%,Hc%,i%:eb%=H%!8:�:J%=�b($(eb%+12)+":"):�J%=0�h(H%,�msg_1(A%!12,"OK8",$(eb%+12)),"OK2") 9RB%=1145128264:C%=12:Fc%=�(P%+12):�Fc%=0�h(H%,�msg_1(A%!12,"FA5","HEAD"),"OK2") >+Fc%!0=0:Fc%!4=0:�Sc%Sc%!0=Fc%�H%!12=Fc% C;Dc%=0:�:U%=eb%!4:�W(eb%,Dc%,Fc%,Sc%,Gc%,Hc%,H%):�Gc%=0� H.J%=�d:�h(H%,�msg_1(A%!12,"OK9",$J%),"OK2") M� R��Gc%<>1:eb%=eb%!0:Sc%=Fc%:�eb%=0:È•Hc%:i%=Hc%!4:s$=$!i%:B%=1381257040:C%=!i%:�P%+16:B%=1381257040:C%=4:!i%=�(P%+12):�!i%=0�h(H%,�msg_1(A%!12,"FA5","POTR"),"OK2") WA!!i%=�H(s$,-1):i%=Hc%:Hc%=!Hc%:B%=1482184792:C%=i%:�P%+16:�:� \_ݤH(s$,Vc%):�j%,k%,t$:j%=�s$,":"):t$=�s$,j%+1):s$=�s$,j%-1):j%=H%!8:k%=0:È•j%:�$(j%+12)=s$� a\j%=H%!12:È•k%:j%=j%!0:k%-=1:�:k%=�t$-1:j%=j%!4:È•k%:j%=j%!0:k%-=1:�:�Vc%j%!(j%!4*4+8)+=1 f=j% k�:j%=j%!0:k%+=1 p� u&�:�b(�msg_2(A%!12,"FAG",s$,t$)):=0 z_ݤstore_integer(v%):�b%:B%=1196707401:C%=4:b%=�(P%+12):�b%=0�253,�msg_1(A%!12,"FA5","INTG") !b%=v%:=b% �6ݤS(s$):�t$,i%,Wc%:È™39,s$,O%,256�,,Wc%:�Wc%=0�="" � �i%=0�Wc%-1:t$+=�O%?i%:�:=t$ �(ݤungstrans(s$):�t$,i%,c%:�s$=""�="" �4�i%=1��s$:c%=��s$,i%,1):�c%>=128c%-=128:t$+="|!" ��c%<32c%+=64:t$+="|" ��c%=127c%=63:t$+="|" ��"|<""",�c%)�t$+="|" �t$+=�c%:�:=t$ �cݤea(U%,�Hc%):�J%,Ac%,b%,i$:B%=1280266050:C%=8:b%=�(P%+12):�b%=0�253,�msg_1(A%!12,"FA5","BOOL") �J%=�d:�J%� �ȎU%!8� �:�1:J%=�K(J%,Ac%):b%!0=�store_integer(Ac%):�?J%=13J%=�d � b%!4=�store_integer(�c($J%)) �G�2,3,4:J%=�r(J%,i$):$q%=i$:B%=q%:C%=U%!8:b%!0=�(P%+28):�?J%=13J%=�d �B%=J%:C%=U%!8:b%!4=�(P%+28) �3�7:J%=�r(J%,i$):�X(H%,s$,b%+0,Hc%):�?J%=13J%=�d ��X(H%,$J%,b%+4,Hc%) �� �� �=b% �?ݤfa(U%,Xc%,�Hc%):�i%,K%,Zc%,_c%,J%,`c%,ad%,Ac%,i$:�1<=Xc%� �[�i%=1�Xc%:B%=1146377036:C%=4*U%!12+8:Zc%=�(P%+12):�Zc%=0�253,�msg_1(A%!12,"FA5","LSTD") ��_c%_c%!0=Zc%�K%=Zc% �(Zc%!0=0:Zc%!4=U%!12:ad%=8:J%=�d:�J%� �`c%=U%!8:È•`c%:ÈŽ`c%!4� 0�1:J%=�K(J%,Ac%):Zc%!ad%=�store_integer(Ac%) >�2,3,4:J%=�r(J%,i$):$q%=i$:B%=q%:C%=`c%!4:Zc%!ad%=�(P%+28) )�7:J%=�r(J%,i$):�X(H%,i$,Zc%+ad%,Hc%) � `c%=!`c%:ad%+=4:� � _c%=Zc%:� $� )=K% .1ݤga(U%,Xc%):�i%,Zc%,J%,_c%,K%,j%,t$:�1<=Xc%� 3�i%=1�Xc%:J%=�d:�J%� 8Xt$=�S($J%):B%=1380010051:C%=5+�t$:Zc%=�(P%+12):�Zc%=0�253,�msg_1(A%!12,"FA5","CHAR") =4Zc%!0=0:Zc%?4=�t$:Zc%?5=�t$-1:t$=�t$,2):�1<=�t$� B%�j%=1��t$:Zc%?(j%+5)=��t$,j%,1):� G� L�_c%_c%!0=Zc%�K%=Zc% Q� V _c%=Zc%:� [� `=K% ez��X(H%,c$,bd%,�Hc%):�i%,s$,t$,cd%,dd%,Sc%,eb%,Dc%,ed%,Gc%,Tc%,t$:i%=�c$,":"):�i%=0�h(H%,�msg_1(A%!12,"OKAA",c$),"OK2") jKs$=�c$,i%-1):t$=�c$,i%+1):eb%=H%!8:ed%=H%!12:Sc%=0:È•eb%:�$(eb%+12)=s$� o�t$>0� tKB%=1381257040:C%=�c$+1:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","POTR") yX$i%=c$:!bd%=i%:B%=1482184792:C%=8:cd%=�(P%+12):�cd%=0�253,�msg_1(A%!12,"FA5","XXXX") ~ !cd%=Hc%:cd%!4=bd%:Hc%=cd%:� ��:�ed%� �Dc%=ed%!4:�Dc%� �ȕDc%!0:Dc%=Dc%!0:� �� ��:Dc%=0 �� �8dd%=Dc%:�W(eb%,Dc%,ed%,Sc%,Gc%,Hc%,H%):�Gc%=0�Dc%=0� �J%=�d:�J%t$=$J%�t$="" �'�h(H%,�msg_1(A%!12,"OK9",t$),"OK2") �� �*Tc%=ed%!4:È•Tc%<>Dc%:�Tc%!(Tc%!4*4+8)� �Gc%=-1:�0<=Tc%!4-1� �'�i%=0�Tc%!4-1:笤D(Tc%,Dc%,i%*4+8)� �Gc%=0:i%=Tc%!4 �� �� �� � �Gc%� ��0<=Dc%!4-1� �A�i%=0�Dc%!4-1:cd%=Dc%!(i%*4+8):�B(cd%):�free_structure(cd%):� �� �/dd%!0=0:B%=1413763664:C%=Dc%:�P%+16:Dc%=Tc% ��:Tc%=!Tc% �� ��:Tc%=!Tc% � I�:B%=1381257040:C%=4:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","POTR") (!i%=Dc%:!bd%=i%:Dc%!(Dc%!4*4+8)+=1:� � �:eb%=eb%!0:�t$=0� Sc%=ed%:ed%=ed%!0 � #� (,�:�h(H%,�msg_1(A%!12,"OKAB",s$),"OK2"):� -6ݤD(s%,d%,o%):�s$,d$:s%=s%!o%:d%=d%!o%:�s%=0�d%=0� 2=(s%=d%) 7�:ÈŽs%!-4� <�1196707401:=!s%=!d% A�1196577875:=$s%=$d% F)�810701907:�Z%,s%,s$:�Z%,d%,d$:=s$=d$ K*�1381258055:�Y%,s%,s$:�Y%,d%,d$:=s$=d$ P�1280266050:=�ha(s%,d%) U�1146377036:=�ia(s%,d%) Z�1381257040:=!s%=!d% _�1380010051:=�ja(s%,d%) d&:�b(�msg_1(A%!12,"WA10",�~s%!-4)) i� n� s=0 x,ݤha(s%,d%):�D(s%,d%,0)�=�D(s%,d%,4)�=0 }$ݤia(s%,d%):�i%:È•s%:�0<=s%!4-1� �&�i%=0�s%!4-1:笤D(s%,d%,i%*4+8)�=0 �� �� �s%=s%!0:d%=d%!0:�:=-1 �'ݤja(s%,d%):�i%:È•s%:�s%?4<>d%?4�=0 ��s%?5<>d%?5�=0 �)i%=s%?5:È•i%:�s%?(i%+5)<>d%?(i%+5)�=0 �i%-=1:�:s%=!s%:d%=!d%:�:=-1 �.ݤK(fd%,�Ac%):�i%,gd%:i%=�$fd%,","):�i%=0� �Ac%=�c($fd%):gd%=fd%+�$fd% �7�:Ac%=�c(�$fd%,i%-1)):gd%=fd%+i%:È•?gd%=32:gd%+=1:� �� �=gd% Õݤr(fd%,�i$):�i%,pa$,hd%,id%:i$="":i%=0:È•fd%?i%=32:i%+=1:�:hd%=-1:id%=(fd%?i%=34):ȕ�(fd%?i%=13�(hd%�fd%?i%=44)):�id%�fd%?i%<>34�hd%i$+=�fd%?i% ��id%�fd%?i%=34hd%=�hd% �i%+=1:�:�fd%?i%=13� �gd%=fd%+i% �%�:gd%=fd%+i%+1:È•?gd%=32:gd%+=1:� �� �=gd% �dݤl(c$):�c%,i%,jd%,kd%,ld%,md%,nd%,gd%,od%,kb%:È™8,17,c$�c%,,jd%,,Rc%:�(c%=0�c%=1)�ș8,19,c$,c% ��c%=0�=0 �*�(jd%>>>20)=4095kd%=jd%>>8�4095�kd%=-1 �*�kd%<>4038�254,�msg_1(A%!12,"OKAL",c$) �QB%=1096040772:C%=4+Rc%+1:Qc%=�(P%+12)+4:�Qc%=4�253,�msg_1(A%!12,"FA5","DATA") �,È™8,16,c$,Qc%:�Rc%>=20�Qc%!0=1213419859� mÈ™272129,8,-1�ld%:nd%=Qc%!4:B%=1096040772:C%=4+nd%+1:gd%=�(P%+12)+4:�gd%=4�253,�msg_1(A%!12,"FA5","DATA") JÈ™131102,6,,,ld%�C%,,md%;kb%:�(kb%�1)�253,�msg_1(A%!12,"FA5","squash") fÈ™272129,4,md%,Qc%+20,Rc%-20,gd%,nd%�od%:È™30,7,,md%:B%=1096040772:C%=Qc%-4:�P%+16:Qc%=gd%:Rc%=nd% � Uwb%=Qc%-4:!wb%=0:xb%=1:B%=Qc%:C%=Rc%:�P%+52:�Qc%?(Rc%-1)<>13Rc%+=1:Qc%?(Rc%-1)=13 V$=c$:=-1 "3��m:B%=1096040772:C%=Qc%-4:�P%+16:Qc%=0:Rc%=0:� '1��Ra:pd%=Qc%:qd%=wb%:rd%=Rc%:sd%=xb%:qa$=V$:� ,1��Sa:Qc%=pd%:wb%=qd%:Rc%=rd%:xb%=sd%:V$=qa$:� 1u��Tb(H%,R%):�s%,t%,s$,z%,N%:R%!(R%!4*4+8)+=1:B%=1414419024:C%=68:z%=�(P%+12):�z%=0�253,�msg_1(A%!12,"FA5","PRNT") 6�A%!48� ;%s%=A%!48:È•s%!0:s%=s%!0:�:s%!0=z% @�:A%!48=z% E� Jrz%!0=0:z%!4=H%:B%=R%!8:C%=2:z%!8=�(P%+28):B%=1413697091:C%=36:N%=�(P%+12):�N%=0�253,�msg_1(A%!12,"FA5","CNCT") OfÈ™6,161,15�,,s%:N%!0=(s%�224)>>5:N%?4=1+((s%�28)>>2):N%?5=0:È™6,161,16�,,s%:N%!8=(s%�224)>>5:笤t� TN%!12=0 Y(�:È™6,161,3�,,s%:È™6,161,4�,,t%:�s%� ^-$q%=�t%+"."+�s%:B%=q%:C%=2:N%!12=�(P%+28) c8�:s$=�t%:�s%=1�5:È™6,161,152+s%�,,t%:�t%s$+=�t%�s%=5 h&�:$q%=s$:B%=q%:C%=2:N%!12=�(P%+28) m� r� w�ș131107,"PrinterType$5",O%,256,,3�,,t%:O%?t%=13:B%=O%:C%=2:N%!16=�(P%+28):N%!20=0:N%!24=0:N%!28=0:N%!32=0:N%?6=0:z%!12=N%:B%=1195789891:C%=4*H%!36:s%=�(P%+12):�s%=0�253,�msg_1(A%!12,"FA5","CNFG") |�0<=H%!36-1� ��t%=0�H%!36-1:s%!(t%*4)=0:� �� �Pz%!16=s%:z%!20=-1:z%!24=0:z%!28=-1:z%!32=0:z%!36=0:z%!40=0:z%!44=0:�H%!32�4� �z%!48=�I � �:z%!48=0 �� �2z%!52=0:�c(H%,z%,-4,0):�H%!24�4�c(H%,z%,-12,0) ��k:�H%!24�8� �z%!56=10*H%?(24+1) ��:z%!56=-1 �� ��Z(z%):� �X��t(�z%,�S%,�qb%):È™262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=0:z%=A%!48:È•z%:�z%!28=qb%� �� � �:z%=z%!0 �� ��:S%=Ka%:È•S%:�S%!16=qb%� �� � �:S%=S%!0 �� ��:� �V��Vb (�z%,�qb%):È™262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=0:z%=A%!48:È•z%:�z%!28=qb%� �� � �:z%=z%!0 �� ��:� O��Wb (�S%,�qb%):È™262358,Fb%,O%,1<<21,1<<21:qb%=!O%:S%=Ka%:È•S%:�S%!16=qb%� � �:S%=S%!0 � �:� @��T(z%):�N%,i%,td%,ud%,vd%:�z%!24�8�254,�msg_0(A%!12,"OKAJ") !,Ba%=z%:Ca%=z%!4:N%=z%!12:�z%!24�(1<<17)� &� +� 0�Ca%!24�4� 5m�c(Ca%,Ba%,-11,0):�s(�printer_find_window(Ba%,"connections")):�p(�printer_find_window(Ba%,"connections")) :>�:�z%!40�icon_write(Q%,31,$z%!40)��icon_write(Q%,31,$z%!8) ?4�N%?6�1�icon_select(Q%,37)��icon_deselect(Q%,37) D��icon_deselect(Q%,0):�icon_deselect(Q%,1):�icon_deselect(Q%,2):�icon_deselect(Q%,3):�icon_deselect(Q%,4):�icon_deselect(Q%,33):i%=-1:ÈŽN%!0� I�1:i%=0 N�2:i%=1 S�4:�t i%=2 X�5:i%=4 ]�6:�z i%=3 b�8:�Ca%!24�16i%=33 g� l�i%�icon_select(Q%,i%) qs�icon_write(Q%,15,�msg_0(A%!12,"BR"+�N%?4)):i%=N%!8:td%=i%�3:vd%=(i%�4)>>2:ud%=(i%�48)>>4:�(i%�8)=0ud%=0�ud%+=1 va�icon_write(Q%,17,�msg_0(A%!12,"DA"+�td%)):�icon_write(Q%,18,�msg_0(A%!12,"PA"+�ud%)):�vd%=0� {*�icon_write(Q%,19,�msg_0(A%!12,"SB0")) ��:�td%=0�ud%<>0� �+�icon_write(Q%,19,�msg_0(A%!12,"SB1b")) ��:�td%=3�ud%=0� �+�icon_write(Q%,19,�msg_0(A%!12,"SB1c")) �-�:�icon_write(Q%,19,�msg_0(A%!12,"SB1a")) �� �� �� �2�N%?5�icon_select(Q%,13)��icon_deselect(Q%,13) �4�N%?6�2�icon_select(Q%,35)��icon_deselect(Q%,35) �^�u(Q%,25,N%,12):�u(Q%,26,N%,20):�u(Q%,27,N%,24):�u(Q%,28,N%,28):�u(Q%,29,N%,32):�N%!16<>0� �G�?(N%!16)>32�?(N%!16)<127�u(Q%,30,N%,16)��icon_write(Q%,30,"null:") � �:�icon_write(Q%,30,"null:") �� �,�t�icon_unshade(Q%,2)��icon_shade(Q%,2) �,�z�icon_unshade(Q%,3)��icon_shade(Q%,3) �T!V%=Q%:È™262348,,V%�1:V%!28=-1:�Ca%!24�16�icon_unshade(Q%,33)��icon_shade(Q%,33) ��s(Q%):È™262341,,V%:�qb �� �� �M��u(Nb%,qb%,wd%,_a%):�icon_write(Nb%,qb%,�printer_read_string(wd%!_a%)):� ���C(wd%,_a%,qb%):�wd%!_a%� �-B%=1196577875:C%=wd%!_a%:�P%+16:wd%!_a%=0 �� �A!X%=Q%:X%!4=qb%:È™262350,,X%:B%=X%!28:C%=2:wd%!_a%=�(P%+28):� �ݤv:=�V(Q%,17,3,"DA",A%!12) !ݤq:=�V(Q%,18,4,"PA",A%!12) !4ݤW:�icon_read(Q%,19)=�msg_0(A%!12,"SB0")�=0�=1 !��Hb(xd%):�xd%=-1xd%=�W !�xd%=0� !*�icon_write(Q%,19,�msg_0(A%!12,"SB0")) !�:�v=0��q<>0� ! +�icon_write(Q%,19,�msg_0(A%!12,"SB1b")) !%�:�v=3��q=0� !*+�icon_write(Q%,19,�msg_0(A%!12,"SB1c")) !/-�:�icon_write(Q%,19,�msg_0(A%!12,"SB1a")) !4� !9� !>� !C� !HCݤV(Nb%,qb%,yd%,ra$,zd%):�i%,s$:s$=�icon_read(Nb%,qb%):�0<=yd%� !M)�i%=0�yd%:�s$=�msg_0(zd%,ra$+�i%)�=i% !R� !W� !\=0 !a9��lb:�N%,i%,p$,s$:N%=Ba%!12:N%!0=0:�icon_set(Q%,37)� !fN%?6=N%?6�1 !k�:N%?6=N%?6��1 !p� !u�icon_set(Q%,0)� !z9p$=�C(1,Ba%):�p$=""N%!0=1��254,�msg_1(A%!12,"OKI",p$) !� !��icon_set(Q%,1)� !�9p$=�C(2,Ba%):�p$=""N%!0=2��254,�msg_1(A%!12,"OKJ",p$) !�� !��icon_set(Q%,2)N%!0=4 !��icon_set(Q%,3)N%!0=6 !��icon_set(Q%,4)N%!0=5 !��icon_set(Q%,33)N%!0=8 !�=s$=�icon_read(Q%,15):�i%=0�18:�msg_0(A%!12,"BR"+�i%)=s$� !�N%?4=i%:i%=18 !�� !�%�:i%=�v��W<<2:�q i%=i%��q-1<<4�8 !�N%!8=i%:�icon_set(Q%,13)� !� N%?5=1 !��:N%?5=0 !�� !��icon_set(Q%,35)� !�N%?6=N%?6�2 !��:N%?6=N%?6��2 !�� !�q�C(N%,12,25):�C(N%,20,26):�C(N%,24,27):�C(N%,28,28):�C(N%,32,29):�C(N%,16,30):�kb(Ba%):�f(-1,Ba%,0):�Ba%!20� !��Ba%!24�2� !��select_printer(Ba%,-1,0) !�� !��i(Ba%) !�� "� ",��i(z%):�sa$,i%,x$,ta$,Ad%,H%:�z%!20=-1� "/H%=z%!4:sa$=�X(z%):�z%!44x$=$z%!44�x$=$H%!4 "`ta$="ss_"+x$+","+x$:!O%=-1:O%!4=z%!20:È™262350,,O%:Ad%=O%!24�1<<21:�sa$<>$O%!28�ta$<>$O%!32� "Hi%=�s(sa$,x$,-4,z%!20):�D(-1,z%!20):z%!20=i%:�Ad%�icon_select(-1,i%) "� "� "$0ݤX(z%):�N%,M%:�z%!24�4�=�msg_0(A%!12,"QU1") ") �z%!24�8� ".?M%=z%!32:�M%?11�1�=�msg_0(A%!12,"QU1")�=�msg_0(A%!12,"QU2") "3� "8"�z%!24�32�=�msg_0(A%!12,"QU3") "=�z%!40�=$z%!40 "BN%=z%!12:ÈŽN%!0� "G&�0,1,2,5:=�msg_0(A%!12,"IC"+�N%!0) "L�4:=$N%!12 "Q�6:=$N%!24 "V� "[="" "`h��Cb:�_a%,od%,wc%,i%,s$,pc%:B%=1414744396:C%=2048:wc%=�(P%+12):�wc%=0�253,�msg_1(A%!12,"FA5","LIST") "eBÈ™393735,1,wc%,2048,500�_a%;i%:�i%�1i%=_a%+4:�Z%,i%,s$:�254,s$ "j��menu_create(_%,�msg_0(A%!12,"ME6")):pc%=(_%!28�256)<>0:od%=wc%:i%=0:È•i%<_a%:�Z%,od%,s$:od%+=�s$+1:�menu_item(_%,i%,s$,pc%):i%+=1:�:B%=1414744396:C%=wc%:�P%+16:� "o>��Kb:�z%,N%,qb%,kb%:�S%,Bd%,Cd%,lb%,Dd%:�:�Vb(z%,qb%):�z%� "t.�icon_deselect(Fb%,qb%):�(z%!24�1)=0�Z(z%) "y�(z%!24�(1<<16))� "~�ib (z%) "�� "�� "�,�z%=0:Cd%=0:È™263872:�:�Wb (S%,qb%):�S%� "��S%!20<=0� "�A�icon_deselect(Fb%,qb%):lb%=�F (S%!4,S%!8,S%!12):�L (Cd%,lb%) "�� "�� "�q�S%=0:lb%=Cd%:È•lb%:Bd%=�y(lb%,0,0,0,kb%):�Wa (Ka%,$lb%!4):Dd%=lb%:lb%=lb%!0:�d (1380799568,Dd%):�:È™263873:� "�;��Z(z%):z%!24=z%!24�1:N%=z%!12:�Xa(z%):�A(z%):�A%!44=1� "��select_printer(z%,-1,0) "�� "�� "�*��Xa(z%):�s$,i%,pb%,H%:H%=z%!4:�z%!44� "� s$=$z%!44 "��:s$=$H%!4 "�� "�i%=�ka(z%):pb%=-4:�i%=-1� "�i%=�Z(z%):pb%=-3 "�� "��i%=-1� "�i%=251658240:pb%=-5 "�� "�$z%!20=�s(�X(z%),s$,pb%,i%):�vb%� "��D(-1,ub%):vb%=0 "�� # A%!44+=1:� #ݤka(z%):�qb%,Fd%:�vb%� # qb%=ub% #/�:qb%=-1:Fd%=A%!48:È•Fd%:�Fd%!20qb%=Fd%!20 #�Fd%=z%Fd%=0�Fd%=Fd%!0 #� #� ##=qb% #((ݤZ(z%):È•z%!20=-1:z%=z%!0:�z%=0�=-1 #-�:=z%!20 #2^��Xb:ub%=�s(�msg_0(A%!12,"NNE"),"s"+�msg_0(A%!12,"IC"),-5,251658240):vb%=-1:!q%=A%!40:�e:� #7a��Lb:�z%,qb%,Gd%,c$,Dd%:�S%,Gd%,Cd%,lb%,z%:Cd%=0:�:�t(z%,S%,qb%):�icon_deselect(Fb%,qb%):�z%� #<�z%!24�(1<<17)� #A lb%=�F (0,0,z%):�L (Cd%,lb%) #F �:�Zb(z%) #K� #P� #U�S%�S%!20>0� #Z�_b ($S%!4):�L=0�A%!44=0� #_�Xb #d� #i� #nt�z%=0�S%=0:lb%=Cd%:È•lb%:z%=lb%!12:c$=$z%!40:�`b (z%):�ac (c$):Dd%=lb%:lb%=lb%!0:�d (1380799568,Dd%):�:�k:�W%=0� #s�A%!44� #xGd%=A%!48:È•Gd%:�Gd%!20� #}#�select_printer(Gd%,-1,0):Gd%=0 #��:Gd%=Gd%!0 #�� #�� #�� #�� #�� #�!��Zb(z%):�Hd%:�z%!24�(1<<16)� #��ib (z%) #�� #��z%!24�(1<<17)� #� Hd%=-1 #�� #� �z%!24�1� #��z%!24�(1<<17)� #� Gd%=-1 #� �:�z%!32� #�Gd%=�_("WA2",$z%!8) #��:Gd%=-1 #�� #�� #� �Gd%� #��c(z%!4,z%,-10,0):�z%!20� #��A%!44=1��L=0� #��Xb #�� #��A%!44=1��L>0� $!q%=A%!40:�e $ � $"�D(-1,z%!20):z%!20=-1:A%!44-=1 $� $0z%!24=z%!24��63+65536:�W%=z%È™524632,-1:W%=0 $ �A(z%) $"� $'� $,� $1i��Mb:�i%,z%,K%,Id%,Jd%,Gd%,y$:B%=1482184792:C%=256:Jd%=�(P%+12):�Jd%=0�253,�msg_1(A%!12,"FA5","XXXX") $6qÈ™262358,Fb%,Jd%,1<<21,1<<21:K%=Jd%:È™263872:ȕ�!K%:i%=!K%:z%=A%!48:Id%=0:È•z%:�((z%!24�(1<<17))=0)�z%!28=i%� $;�z%!32� $@4È™263873:Gd%=�_("WA3",$z%!8):È™263872:�Gd%�A(z%) $E�:Gd%=-1 $J� $O �Gd%� $T y$=$z%!8:�bc(z%,Id%):�Nb(y$) $Y� $^z%=0 $c�:Id%=z%:z%=z%!0 $h� $m�:K%+=4:�:�W%=0� $r�A%!44� $wGd%=A%!48:È•Gd%:�Gd%!20� $|#�select_printer(Gd%,-1,0):Gd%=0 $��:Gd%=Gd%!0 $�� $�� $�� $�� $��W%=0�z $�5B%=1482184792:C%=Jd%:�P%+16:�k:�p(Fb%):È™263873:� $�d��bc(z%,Id%):�j%,i%,Ra%,H%,R%:H%=z%!4:R%=H%!12:R%=R%!4:�c(H%,z%,-9,0):�Zb(z%):È•R%:�$R%!8=$z%!8� $�R%!(R%!4*4+8)-=1:R%=0 $� �:R%=R%!0 $�� $��:�Ba%=z%� $� !q%=Q%:�e $�� $�i%=H%!20:È•i%:�i%!12=z%� $�!q%=i%!4:�e $�� $�i%=i%!0:�:�z%!48�Za(z%!48) $��W%=z%W%=0 $�.�free_structure(z%!8):j%=z%!12:�(H%!24�4)� $�Ra%=H%!48:�1<=Ra%� $�*�i%=1�Ra%:�free_structure(!j%):j%+=4:� $�� $��:�free_structure(j%!12):�free_structure(j%!16):�free_structure(j%!20):�free_structure(j%!24):�free_structure(j%!28):�free_structure(j%!32) $�� $�,B%=1413697091:C%=j%:�P%+16:j%=z%!16:�j%� %Ra%=H%!36:�0<=Ra%-1� %,�i%=0�Ra%-1:�free_structure(j%!(i%*4)):� % � %� %�B%=1195789891:C%=j%:�P%+16:!q%=Fb%:q%!4=z%!28:È™262350,,q%:q%!8=1<<7�1<<23:q%!12=1<<7�1<<23�1<<21:È™262349,,q%:j%=z%!52:È•j%:�free_structure(j%!4):�free_structure(j%!8):i%=j%!0:B%=1414418246:C%=j%:�P%+16:j%=i%:�:j%=z%!0:B%=1414419024:C%=z% %�P%+16:�Id%� %!Id%!0=j% %&�:A%!48=j% %+� %0� %5�ݤ_(oa$,ua$):�x%,y%,w%,h%:�icon_write(Db%,0,�msg_1(A%!12,oa$,ua$)):�icon_write(Db%,3,�msg_0(A%!12,oa$+"a")):È™262351,,q%:x%=!q%:y%=q%!4:!q%=Db%:È™262347,,q%:w%=q%!12-q%!4:h%=q%!16-q%!8:q%!4=x%-340:q%!8=y%-120:q%!12=q%!4+w% %:]q%!16=q%!8+h%:q%!28=-1:È™262341,,q%:�cc(Db%):sa%=0:�:�v(ma%):�sa%:!q%=Db%:�e:�dc:=(sa%=3) %?\��cc(h%):!q%=h%:È™262368,,q%:?q%=1:q%!1=q%!4:q%!3=q%!8:q%!5=q%!12:q%!7=q%!16:È™7,21,q%:� %D���dc:�Kd%,Ld%,Md%,Nd%,Od%,Pd%:È™53,-1,4�,,Ld%:Ld%=1<<Ld%:È™53,-1,5�,,Nd%:Nd%=1<<Nd%:È™53,-1,11�,,Kd%:Kd%+=1:È™53,-1,12�,,Md%:Md%+=1:Od%=Kd%*Ld%:Pd%=Md%*Nd%:?q%=1:q%!1=0:q%!3=0:q%!5=Od%:q%!7=Pd%:È™7,21,q%:� %I#��k:�z%,K%,i%:�S%:!O%=Fb%:�va%� %N(�i%=0�va%-1:O%!4=i%+4:È™262340,,O%:� %S� %X �Ma%� %],�i%=va%�va%+Ma%:O%!4=i%+4:È™262340,,O%:� %b� %g�va%=0:Ma%=0:!O%=Fb%:O%!4=0:O%!8=a%(4)!4:O%!12=1030:O%!16=a%(4)!12:O%!20=a%(4)!16:O%!24=a%(4)!20:O%!28=a%(4)!24:O%!32=a%(4)!28:z%=A%!48:È•z%:È™262338,,O%�i%:va%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):z%!28=i%:z%=z%!0:�:S%=Ka%:È•S% %l�ș262338,,O%�i%:Ma%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):S%!16=i%:S%=S%!0:�:È™262348,,O%�1:O%!0=0:O%!4=-(va%+Ma%+1)*(a%(4)!12-a%(4)!4):O%!8=O%!52-O%!44:O%!12=0:È™262359,Fb%,O% %qUO%!4=-(va%+Ma%+2)*(a%(4)!12-a%(4)!4):È™262353,Fb%,O%!0,O%!4,O%!8,O%!12:�i (Fb%)� %v�p(Fb%) %{� %�� %�1ݤz:�i%:È™131129,,"NFS_Mount"�;i%:=((i%�1)=0) %�;ݤt:�i%:È™131129,,"NetPrint_ReadPSName"�;i%:=((i%�1)=0) %�Yݤc(s$):�t%,n%,f%:È™131117,s$,aa%,256�,t%,n%;f%:�t%�(f%�1)�253,�msg_1(A%!12,"FAD",s$) %�=n% %�OݤT(s$):�Qd%,f%:È™131113,37,s$,aa%,0,0,256�,,,,,Qd%;f%:�(Qd%<=0)�(f%�1):=s$ %�aa%?(256-Qd%)=13:=$aa% %�A��w(z%,Rd%,Sd%):�p%:p%=ua%:È•p%:�c(p%,z%,Rd%,Sd%):p%=p%!0:�:� %�5��c(H%,z%,Rd%,Td%):�i%:�:��:��:�ec(H%,z%,Rd%):� %�LO%!0=Rd%:O%!4=H%:O%!8=z%:O%!12=Td%:O%!16=ja%:O%!20=P%:O%!24=A%:�H%!24�1� %�(i%=�("FN"+$H%!4+"_support("+�O%+")") %��:�0<=Za%-1� %��i%=0�Za%-1:�$H%!4=b$(i%)� %�B%=O%:�b%(i%) %�� %�� %�� %�� %�� %�%��ec(H%,z%,Rd%):�(z%!24�8)�254,�$ %��=253�253,�$ %�*�b(�w(A%!12,"WA6",$H%!4,�Rd%,�$,Þ)):� %�/��fc(z%):z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� %�,��pb(z%,c$):�Lb%,Ud%,i%:�c$="configure"� %�%�z%!24�8�254,�msg_0(A%!12,"OKAI") %�� &�Lb%=�printer_find_window(z%,c$):�s(Lb%):�p(Lb%):!O%=Lb%:È™262348,,O%�1:Ud%=O%!88:�i%=0�Ud%:!O%=Lb%:O%!4=i%:È™262350,,O%:�(O%!24�(1<<23))=0� &�(O%!24�(15<<12))=(15<<12)� &%�(z%!24�(1<<16))�(z%!24�(1<<17))� &+�icon_shade (Lb%,i%):�caret_set (-1,-1) &/�:�icon_unshade (Lb%,i%):�caret_set(Lb%,i%) &� & � &%� &*� &/�:� &4Hݤprinter_find_window(z%,c$):�H%:H%=z%!4:i%=H%!20:È•i%:�$(i%+16)=c$� &9i%!8=H%:i%!12=z%:=i%!4 &>� &C,i%=i%!0:�:�253,�msg_1(A%!12,"FAE",c$):=0 &HA��H(Lb%,�Nb%,�H%,�z%):H%=ua%:È•H%:Nb%=H%!20:È•Nb%:�Nb%!4=Lb%� &Mz%=Nb%!12:� &R� &W+Nb%=Nb%!0:�:H%=H%!0:�:Nb%=0:H%=0:z%=0:� &\3ݤprinter_find_prdata_entry(H%,c$):�R%:�H%=0�=0 &aR%=H%!12:�R%=0�=0 &fR%=R%!4:�R%=0�=0 &k È•$R%!8<>c$:R%=R%!0:�R%=0�=0 &p �:=R% &uݤ`(K%):�K%=0�=0 &z)�K%!-4<>1196707401�K%!-4<>1381257040� &�253,�msg_0(A%!12,"FA6") &�� &�=!K% &�.ݤprinter_read_string(K%):�i%,s$:�K%=0�="" &�ȎK%!-4� &��1196577875:=$K% &��810701907:�Z%,K%,s$:=s$ &��1381258055:�Y%,K%,s$:=s$ &�� &� �253,�msg_0(A%!12,"FA7"):="" &�1ݤprinter_read_integer_entry(R%,Vd%):�R%=0�=0 &�=�`(R%!(4+Vd%*4)) &�9��printer_write_integer_entry(R%,Vd%,Wd%):�K%:�R%<>0� &�9K%=R%!(4+Vd%*4):�K%!-4<>1196707401�K%!-4<>1381257040� &��253,�msg_0(A%!12,"FA6") &�� &�!K%=Wd% &�� &�� &�1ݤprinter_read_string_entry(R%,Vd%):�R%=0�="" &�'=�printer_read_string(R%!(4+Vd%*4)) &�@ݤprinter_read_boolean_string_entry(R%,Vd%,Xd%):�K%:�R%=0="" &�>K%=R%!(4+Vd%*4):�K%!-4<>1280266050�253,�msg_0(A%!12,"FA8") &� �Xd%� &�=�printer_read_string(K%!4) &�!�:=�printer_read_string(K%!0) '� 'Bݤprinter_read_list_integer_entry(R%,Vd%,wc%,Zd%):�K%:�R%=0�=0 'K%=R%!(4+Vd%*4):�K%=0=0 '.�K%!-4<>1146377036�253,�msg_0(A%!12,"FA9") '(È•wc%<>1�K%:K%=K%!0:wc%-=1:�:�K%=0=0 '*K%+=8:È•Zd%<>1:K%+=4:Zd%-=1:�:=�`(!K%) 'Bݤprinter_read_list_string_entry(R%,Vd%,wc%,Zd%):�K%:�R%=0�="" '$K%=R%!(4+Vd%*4):�K%=0="" ').�K%!-4<>1146377036�253,�msg_0(A%!12,"FA9") '.)È•wc%<>1�K%:K%=K%!0:wc%-=1:�:�K%=0="" '3<K%+=8:È•Zd%<>1:K%+=4:Zd%-=1:�:=�printer_read_string(!K%) '8 ��aa(N$,�_d%):�:��:�0,�$ '=<È™30,6,,,17+�N$�,,_d%:$(_d%+16)=N$:È™267521,_d%,_d%+16:� 'B*ݤmsg_0(_d%,T$)=�w(_d%,T$,"","","","") 'G-ݤmsg_1(_d%,T$,S$)=�w(_d%,T$,S$,"","","") 'L4ݤmsg_2(_d%,T$,va$,wa$)=�w(_d%,T$,va$,wa$,"","") 'Q5ݤG(_d%,T$,va$,wa$,xa$)=�w(_d%,T$,va$,wa$,xa$,"") 'Vaݤw(_d%,T$,va$,wa$,xa$,ya$):�F%,L%:È™398594,_d%,T$,ba%,256,va$,wa$,xa$,ya$�,,,L%;F%:�F%�1�=T$ '[ba%?L%=13:=$ba% '`��_(_d%):�_d%� 'e È™267524,_d%:È™131102,7,,_d% 'j� 'o� 't���ca(n$):za$=n$:q%!0=524626:q%!4=524614:q%!8=524613:q%!12=524611:q%!16=524610:q%!20=524609:q%!24=524608:q%!28=262345:q%!32=1282:q%!36=12:q%!40=11:q%!44=10:q%!48=8:q%!52=3:q%!56=2:q%!60=1:q%!64=5:q%!68=0 'y+È™262336,300,1263747412,n$,q%�`d%,Rb%:� '~��jb:È™262365:� '�-ݤaa(da%):�ae%,be%,z%,t%:�K$<>""da%=da%�1 '�!�(da%�1)=0�fa%=-1�da%<>A%!20� '�ș262343,da%,q%,,La%�ae% '��:�fa%=0�K$<>""� '�ș262343,da%��1,q%,,La%�ae% '�(�:È™262369,da%��1,q%,ka%+fa%,La%�ae% '�� '�� '�>È™66�be%:ce%=be%-ka%:ka%=be%:z%=A%!48:È•z%:t%=z%+56:�!t%� '��ce%<!t% !t%-=ce%�!t%=0 '�� '�z%=z%!0:�:=ae% '���oa:�z%,H%,t%:�K$<>""� '�ș131080,6,K$:K$="" '�� '�"z%=A%!48:È•z%:t%=z%+56:�!t%=0� '�*H%=z%!4:�c(H%,z%,0,0):!t%=10*H%?(24+1) '�� '�z%=z%!0:�:� '�Qݤtask_read_env(n$,de%):�Wc%,ab%:È™131107,n$,de%,256,,3�,,Wc%;ab%:�ab%�1Wc%=0 '�de%?Wc%=13:=$de% '�1ݤla(a$,b$):�ee%:È™274525,-1,a$,b$,3�ee%:=ee% '�>ݤtask_lower(s$):�l$,fe%,i%:È™274519,-1�fe%:l$="":�1<=�s$� '�$�i%=1��s$:l$+=�fe%?��s$,i%,i%):� '�� ( =l$ (>ݤtask_upper(s$):�u$,fe%,i%:È™274520,-1�fe%:u$="":�1<=�s$� ( $�i%=1��s$:u$+=�fe%?��s$,i%,i%):� (� (=u$ (��da:�ge%256:� (;��ma:�r$,r%:r$=�$:r%=�r$,"in "+�34+"!"):�r%r$=�r$,r%-1) (#Ȏ�� ((�254:�j(r$,1) (-�253:�j(r$,2) (2!:�j(r$+" (&"+�~�+") @"+Þ,3) (7� (<� (AV��j(r$,he%):�r%:È™262356,,-1:!ge%=�:$(ge%+4)=r$+�0:È™262367,ge%,he%,za$�,r%:�r%=2� (Fî…‡ (KQb%=2:�I:�x (P� (U� (ZO��b(r$):!ge%=1:$(ge%+4)=r$+�0:È™262367,ge%,1�1<<4,�msg_1(A%!12,"ER2",za$):� (_��ea:ie%=0:� (dCݤs(Aa$,x$,pb%,je%):�t%,s%,i%,v$,w%:�x$="s"+�msg_0(A%!12,"IC")� (i#v$="s"+x$:È™262377,40,,x$�,,,w% (n%�:È™393449,40,,x$�,,,w%;i%:�i%�1� (s<È™262377,40,,"s"+�msg_0(A%!12,"IC")�,,,w%:�x$,3)="su_"� (xv$="ssu"+�msg_0(A%!12,"IC") (}7�:v$="ss"+�msg_0(A%!12,"IC")+","+�msg_0(A%!12,"IC") (�� (��:�x$,3)="su_"� (� v$="s"+x$ (��:v$="ss_"+x$+","+x$ (�� (�� (�� (�LB%=1179009609:C%=�Aa$+1:t%=�(P%+12):�t%=0�253,�msg_1(A%!12,"FA5","IBFF") (�S$t%=Aa$:B%=1179009609:C%=�v$+1:s%=�(P%+12):�s%=0�253,�msg_1(A%!12,"FA5","IBFF") (�?$s%=v$:È™53,-1,4�,,i%:�(w%<<i%)<�Aa$*16w%=�Aa$*16�w%=w%<<i% (�tX%!0=pb%:X%!4=0:X%!8=-16:X%!12=w%:X%!16=88:X%!20=385888523:X%!24=t%:X%!28=s%:X%!32=�Aa$+1:È™262338,je%,X%�i%:=i% (�D��D(a%,b%):!X%=a%:X%!4=b%:È™262350,,X%:È™262340,,X%:�X%!24�1<<8� (� �X%!24�3� (�+B%=1179009609:C%=X%!28:�P%+16:�X%!24�1� (��X%!32� (�!B%=1179009609:C%=X%!32:�P%+16 (�� (�� (�� (�� (�� (�d��icon_write(a%,b%,s$):�h%,i%,n%:�caret_info(h%,i%,n%):!X%=a%:X%!4=b%:È™262350,,X%:�s$+1>X%!36� (�#�253,�msg_2(A%!12,"FAH",s$,�b%) (�� (�G$X%!28=s$:X%!8=0:X%!12=0:È™262349,,X%:�h%=a%�i%=b%�caret_set(a%,b%) (�� )c��icon_validation(a%,b%,s$):!X%=a%:X%!4=b%:È™262350,,X%:$X%!32=s$:X%!8=0:X%!12=0:È™262349,,X%:� ) :ݤicon_read(a%,b%):!X%=a%:X%!4=b%:È™262350,,X%:=$X%!28 )J��icon_unshade(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<22:È™262349,,X%:� )L��icon_shade(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<22:X%!12=1<<22:È™262349,,X%:� )V��icon_deselect(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<21:È™262349,,X%:�a%=Fb%wa%=0 )� )"X��icon_select(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<21:X%!12=1<<21:È™262349,,X%:�a%=Fb%wa%=0 )'� ),Cݤicon_set(a%,b%):!X%=a%:X%!4=b%:È™262350,,X%:=(X%!24�1<<21)<>0 )1o��icon_info(a%,b%,�ke%,�le%,�me%,�ne%):!X%=a%:X%!4=b%:È™262350,,X%:ke%=X%!8:le%=X%!12:me%=X%!16:ne%=X%!20:� )6f��caret_set(h%,i%):�j%:j%=��icon_read(h%,i%):È™262354,h%,i%,-1,-1,,j%:È™262354,h%,i%,-1,-1,-1,j%:� );D��caret_info(�h%,�i%,�n%):È™262355,,X%:h%=!X%:i%=X%!4:n%=X%!20:� )@��fa:Z$="":� )E4��Ia(Ba$,Ca$):�a$,a%:È™6,161,140�,,a%:�(a%�1)=1� )J$È™8,17,Ca$�a%:�a%=1Z$=Ca$�Z$=Ba$ )O�:Z$=Ba$ )T� )YÈ™262361,,Z$:� )^��Ka:È™262362:� )ca��l(f$,n$,oe%,�Lb%):�de%:�gc(f$,n$,de%):de%!64=oe%:�hc(de%,Lb%):B%=1145981271:C%=de%:�P%+16:� )h���gc(f$,n$,�ic%):�pe%,Ra%,qe%,mb%,s%,f%,s$:�ic(f$,n$,Ra%,qe%):B%=1145981271:C%=Ra%+qe%:ic%=�(P%+12):�ic%=0�253,�msg_1(A%!12,"FA5","WIND") )m�f$<>""È™262361,,f$ )r �qe%� )wKB%=1179014466:C%=qe%:pe%=�(P%+12):�pe%=0�253,�msg_1(A%!12,"FA5","BUFF") )|2È™393435,,ic%,pe%,pe%+qe%,-1,n$�s%,,,,,,mb%;f% )�*�:È™393435,,ic%,,,-1,n$�s%,,,,,,mb%;f% )�� )��f$<>""È™262362 )�*�f%�1f%=s%+4:�Z%,f%,s$:�254,n$+": "+s$ )�&�mb%=0�254,�msg_1(A%!12,"OKAK",n$) )�� )�&��hc(ic%,�Lb%):È™262337,,ic%�Lb%:� )�7��p(a%):!V%=a%:È™262347,,V%:V%!28=-1:È™262341,,V%:� )�N��`a(a%,s$):�re%,se%,te%,ue%:!V%=a%:È™262348,,V%�1:$V%!76=s$:�V%!32�1<<16� )�Sse%=V%!16:È™262368,,V%:re%=V%!4:te%=V%!12:ue%=V%!16:È™262353,-1,re%,se%,te%,ue% )�� )�� )�1��Ja(P$,�K%,�c$):�f%,_a%,Ub%:�f$=""�`d%>=300� )�-È™262363,,,,,-1,"*"+�12,�0),K%�,,,,,c$,K% )��:�P$=""P$=Z$ )�f%=�P$:�K%=0K%=16 )��:�#f%=K%:_a%=�j(f%):�_a%� )�5�#f%=K%+8:Ub%=�j(f%):c$=�M(f%):K%+=24:�Ub%=1_a%=0 )� �:K%=0 )�� )��_a%=0:È™131085,,f% )�� )�� )�E��ic(f$,n$,�Ra%,�qe%):�i%,ve%,K%,_a%,Ub%,Da$,Ud%:�f$=""�`d%>=300� )�ș262363,,,,,-1,n$�,Ra%,qe% )��:�f$=""f$=Z$ *:ve%=�f$:Ra%=0:qe%=0:K%=16:�:�#ve%=K%:_a%=�j(ve%):�_a%� *5�#ve%=K%+8:Ub%=�j(ve%):Da$=�M(ve%):K%+=24:�Ub%=1� * �Da$=n$� *G�#ve%=_a%+84:Ud%=�j(ve%):qe%=�ma(ve%,_a%):�Ud%qe%+=�na(ve%,Ud%,_a%) *Ra%=88+(Ud%*32):_a%=0 *� *!� *&� *+�_a%=0:È™131085,,ve% *0� *5� *:+ݤj(h%):=�#h%��#h%<<8��#h%<<16��#h%<<24 *?*ݤM(h%):�s$,c%:�:c%=�#h%:�c%>31s$+=�c% *D�c%<32:=s$ *I8ݤma(ve%,_a%):�v%:�#ve%=_a%+28:v%=�j(ve%):�v%�1<<31� *N(�v%�1<<26�=�N(ve%,_a%+56,_a%+72,_a%) *S&�:�v%�1�=�N(ve%,_a%+56,_a%+72,_a%) *X� *]=0 *b,ݤna(ve%,Xc%,_a%):�i%,j%:j%=0:�0<=Xc%-1� *gA�i%=0�Xc%-1:j%+=�N(ve%,_a%+88+i%*32+16,_a%+88+i%*32+20,_a%):� *l� *q=j% *v`ݤN(ve%,we%,xe%,_a%):�v%,ye%,Ra%,i%:�#ve%=we%:v%=�j(ve%):i%=v%�256:ye%=(v%�3)+(i%>>6):ÈŽye%� *{�0,1,2,3,4:Ra%=0 *�'�5,7:�#ve%=xe%+4:v%=�j(ve%):�v%=-1� *� Ra%=0 *�!�:�#ve%=_a%+v%:Ra%=��M(ve%)+1 *�� *��#ve%=xe%+8:Ra%+=�j(ve%) *��6:�#ve%=xe%+8:Ra%=�j(ve%) *�� *�=Ra% *�=��ja:�f%:È™131129,,"DragASprite_Start"�ze%;f%:�f%�1ze%=-1 *�3È™131129,,"DragASprite_Stop"�Ae%;f%:�f%�1Ae%=-1 *�ș6,161,28�,,f%:�(f%�2)=0� *�ze%=-1:Ae%=-1 *�� *�KB%=1163280723:C%=256:Be%=�(P%+12):�Be%=0�253,�msg_1(A%!12,"FA5","SAVE") *�ea%=0:� *�s��Ab(Ce%,Fa$):�b$:b$=�~Ce%:b$=�"000"+b$,3):De%=Ce%:�icon_validation(zb%,0,"sfile_"+b$):�icon_write(zb%,1,Fa$):� *����nb(Fe%,Ge%):�He%,Ie%,Je%,Ke%,Le%,Me%,Od%,Pd%,f$,Kd%,Ld%,Md%,Nd%:!Be%=zb%:È™262347,,Be%:He%=Be%!4-Be%!20:Ie%=Be%!16-Be%!24:�icon_info(zb%,0,Je%,Le%,Ke%,Me%):È™53,-1,4�,,Ld%:Ld%=1<<Ld%:È™53,-1,5�,,Nd%:Nd%=1<<Nd% *��ș53,-1,11�,,Kd%:Kd%+=1:È™53,-1,12�,,Md%:Md%+=1:Od%=Kd%*Ld%:Pd%=Md%*Nd%:!Be%=zb%:Be%!4=5:Be%!8=He%+Je%:Be%!12=Ie%+Le%:Be%!16=He%+Ke%:Be%!20=Ie%+Me%:Be%!24=Be%!8-Fe%:Be%!28=Be%!12-Ge%:Be%!32=Od%+Be%!16-Fe% *� Be%!36=Pd%+Be%!20-Ge%:�ze%� *�:f$="file_"+�"000"+�~De%,3):È™ze%,197,1,f$,Be%+8,Be%+24 *��:È™262352,,Be% *�� *�ea%=-1:� *�,��ra:�h%,i%,Ne%,Oe%,Pe%:ea%=0:�Ae%È™Ae% *�AÈ™262351,,Be%:Ne%=!Be%:Oe%=Be%!4:h%=Be%!12:i%=Be%!16:�h%=zb%� *��jc(h%,i%,Ne%,Oe%):� +���jc(h%,i%,Ne%,Oe%):�Ga$:Ga$=�oa:!Be%=48+�Ga$��3:Be%!12=0:Be%!16=1:Be%!20=h%:Be%!24=i%:Be%!28=Ne%:Be%!32=Oe%:Be%!36=0:Be%!40=De%:$(Be%+44)=Ga$+�0:È™262375,17,Be%,h%,i%:� +Bݤoa:�f$,i%:f$=�icon_read(zb%,1):�:i%=�f$,":"):�i%f$=�f$,i%+1) +'�i%=0:�:i%=�f$,"."):�i%f$=�f$,i%+1) + �i%=0:=f$ +��ga:Sb%=0:Qe%=0:� +6��menu_create(�_%,I$):�Q$,i%,Ha$,j$,j%,x%,t%:�Sb%� + �kc:Sb%=0:Qe%=0 +%� +*�I$,1)="#"� +/i%=1:Q$=�O(I$,",",i%) +4�:Q$="" +9� +>1Ha$=I$:j%=i%:�:j$=�O(I$,",",i%):�j$<>""Qe%+=1 +Ce�j$="":I$=Ha$:i%=j%:B%=1431192909:C%=28+Qe%*24:Sb%=�(P%+12):�Sb%=0�253,�msg_1(A%!12,"FA5","MENU") +H �Q$<=12� +M$Sb%=Q$ +RM�:B%=1431192909:C%=�Q$+2:t%=�(P%+12):�t%=0�253,�msg_1(A%!12,"FA5","MENU") +W$t%=Q$+�0:Sb%!0=t% +\� +a�Sb%?12=7:Sb%?13=2:Sb%?14=7:Sb%?15=0:Sb%!16=196:Sb%!20=44:Sb%!24=0:x%=�Q$-3:Sb%!16=(x%*8+6)*2:�j%=0�Qe%-1:j$=�O(I$,",",i%):�menu_item(Sb%,j%,j$,�Q$>12):�:_%=Sb%:� +f5��kc:�i%,p%,pc%:p%=Sb%+28:pc%=p%!0�256:�0<=Qe%-1� +k�i%=0�Qe%-1:�p%!8�256� +p�(!p%�4)=0� +u!B%=1431192909:C%=p%!12:�P%+16 +z� +� +�p%+=24:� +�� +� �pc%� +�!B%=1431192909:C%=Sb%!0:�P%+16 +�� +�!B%=1431192909:C%=Sb%:�P%+16:� +�M��menu_item(�_%,Re%,j$,pc%):�F%,p%,i%,x%,m%:x%=(_%!16/2-6)/8:��j$,1)="#"� +�j$=�j$):F%=F%�2 +�� +���j$,1)="@"� +�j$=�j$):F%=F%�8 +�� +��Re%>=Qe%� +�[B%=1431192909:C%=Sb%:D%=(Re%-Qe%+1)*24:m%=�(P%+20):�m%=0�253,�msg_1(A%!12,"FA5","MENU") +�6Sb%=m%:p%=Sb%+28+(Qe%-1)*24:!p%=!p%��128:Qe%=Re%+1 +�� +��Re%=Qe%-1F%=F%�128 +��Re%=0�pc%F%=F%�256 +�@p%=Sb%+28+Re%*24:p%!0=F%:p%!4=-1:p%!8=117440545:�j$,1)="$"� +�!p%+=4:j$=�12," ") +��:�j$<12� +�$(p%+12)=j$ +�M�:B%=1431192909:C%=�j$+1:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","MENU") +�6$i%=j$:p%!8=p%!8�256:p%!12=i%:p%!16=-1:p%!20=�j$+1 +�� ,� ,_%=Sb%:�j$>x%� ,x%=�j$:_%!16=(x%*8+6)*2 ,� ,� ,7��Bb(_%,Re%,K%,Se%):_%+=28+Re%*24:�Se%�!_%=!_%�1<<4 , _%!4=K%:� ,$AݤO(I$,Ia$,�I%):�L%:L%=I%+1:I%=�I$+Ia$,Ia$,L%):=�I$,L%,I%-L%) ,)A��a(Te%,Re%,Wd%):�((Te%!(28+8+24*Re%)�4194304)=4194304)<>Wd%� ,./Te%!(28+8+24*Re%)=Te%!(28+8+24*Re%)�4194304 ,3� ,8� ,=7ݤJ(Te%,Re%):=((Te%!(28+8+24*Re%)�4194304)=4194304) ,BX��menu_tick_match(Te%,Ja$):�Re%,Ka$:Re%=Te%+28:�:�Re%!8�256Ka$=$Re%!12�Ka$=$(Re%+12) ,G�la(Ka$,Ja$)=0� ,L!Re%=!Re%�1:� ,Q� ,V�!Re%�128� ,[Re%+=24:�0:� ,`^��lc(Te%,Re%,Ue%):�Ue%Te%!(28+24*Re%)=Te%!(28+24*Re%)�1�Te%!(28+24*Re%)=Te%!(28+24*Re%)��1 ,e� ,j���cb(h%):�x%,y%,Kd%,Ld%,Md%,Nd%:È™53,-1,4�,,Ld%:Ld%=1<<Ld%:È™53,-1,5�,,Nd%:Nd%=1<<Nd%:È™53,-1,11�,,Kd%:Kd%+=1:È™53,-1,12�,,Md%:Md%+=1:!q%=h%:È™262347,,q%:x%=Kd%*Ld%:y%=Md%*Nd%:x%=(x%-q%!12+q%!4)�2:y%=(y%+q%!16-q%!8)�2 ,oÈ™262356,,h%,x%,y%:� ,t*��ha:�p%:È™274526,-1,0�p%:�Z%,p%,La$:� ,yݤf(n$):�La$=".":=�n$ ,~6�i%:i%=�n$,La$):�i%<>0:=�(�n$,i%-1)+"."+�n$,i%+1)) ,�=�n$ ,�W��Db(a%):�i%:B%=1163547472:C%=56:Ga%=�(P%+12):�Ga%=0�253,�msg_1(A%!12,"FA5","PSZE") ,��a%� ,�a%=a%!36:�0<52� ,��i%=0�52�4:Ga%!i%=a%!i%:� ,�� ,� �:�0<=52� ,��i%=0�52�4:Ga%!i%=0:� ,�� ,�� ,�+�Ib:�s(Cb%):�p(Cb%):�caret_set(Cb%,5):� ,�y��Ib:�h%,i%,n%:�caret_info(h%,i%,n%):�u(Cb%,5,Ga%,4):�M(12,36):�M(13,32):�M(14,40):�M(15,44):�M(16,48):�sb:�Ga%!52=1� ,��icon_unshade(Cb%,33) ,��:�icon_shade(Cb%,33) ,�� ,�� ,�4��sb:�s$:笤icon_set(Cb%,23)���icon_set(Cb%,22)� ,��icon_select(Cb%,23) ,�� ,��icon_set(Cb%,23)� ,�s$=�msg_0(A%!12,"mm") ,��:s$=�msg_0(A%!12,"in") ,�� ,���icon_write(Cb%,26,s$):�icon_write(Cb%,29,s$):�icon_write(Cb%,27,s$):�icon_write(Cb%,30,s$):�icon_write(Cb%,28,s$):�icon_write(Cb%,31,s$):�F(6,8):�F(7,12):�F(8,20):�F(9,16):�F(10,24):�F(11,28):� ,�0��M(qb%,_a%):�icon_write(Cb%,qb%,�Ga%!_a%):� - &��F(qb%,_a%):�v%:v%=Ga%!_a%:ÈŽqb%� -�8:v%=Ga%!12-v% - �11:v%=Ga%!8-v% -� -"�icon_write(Cb%,qb%,�pa(v%)):� -$ݤpa(v%):�@%:�icon_set(Cb%,23)� -@%="+F10"+La$+"1":=�(v%/c) -# �:@%="+F10"+La$+"3":=�(v%/d) -(� --+��Ba(f$,Ve%):�J%,`%,yb%,We%,t$:�l(f$)� -2�:J%=�b("pn:"):�J%� -7$t$=�qa(`%,$J%):�t$<>""�mc(f$,t$) -<2`%!52=Ve%:yb%=ja%:We%=0:È•yb%>0:�$`%!4=$yb%!4� -A�yb%!52=0� -FH`%!0=yb%!0:�free_structure(yb%!4):B%=1163547472:C%=yb%:�P%+16:yb%=-1 -K,�:B%=1163547472:C%=`%:�P%+16:`%=0:yb%=-1 -P� -U�:�$`%!4<$yb%!4� -Z`%!0=yb%:yb%=-1 -_�:We%=yb%:yb%=yb%!0 -d� -i� -n �:�`%� -s�We%We%!0=`%�ja%=`% -x� -}� -��J%=0:�m -�� -�� -�/��mc(f$,t$):�S(�msg_2(A%!12,"OKO",f$,t$)):� -�Yݤqa(�`%,c$):�t$:B%=1163547472:C%=56:`%=�(P%+12):�`%=0�253,�msg_1(A%!12,"FA5","PSZE") -�K`%!0=0:$q%=c$:B%=q%:C%=2:`%!4=�(P%+28):J%=�b("pw:"):�J%`%!8=�$J%�="pw:" -�%J%=�b("ph:"):�J%`%!12=�$J%�="ph:" -�%J%=�b("pb:"):�J%`%!16=�$J%�="pb:" -�%J%=�b("pt:"):�J%`%!20=�$J%�="pt:" -�%J%=�b("pl:"):�J%`%!24=�$J%�="pl:" -�%J%=�b("pr:"):�J%`%!28=�$J%�="pr:" -�%J%=�b("tb:"):�J%`%!32=�$J%�="tb:" -�%J%=�b("tt:"):�J%`%!36=�$J%�="tt:" -�%J%=�b("tl:"):�J%`%!40=�$J%�="tl:" -�%J%=�b("tr:"):�J%`%!44=�$J%�="tr:" -�%J%=�b("th:"):�J%`%!48=�$J%�="th:" -�="" -����nc(c%,K%):�#c%,"pn: "+$K%!4:�#c%,"pw: "+�K%!8:�#c%,"ph: "+�K%!12:�#c%,"pb: "+�K%!16:�#c%,"pt: "+�K%!20:�#c%,"pl: "+�K%!24:�#c%,"pr: "+�K%!28:�#c%,"tb: "+�K%!32:�#c%,"tt: "+�K%!36:�#c%,"tl: "+�K%!40:�#c%,"tr: "+�K%!44:�#c%,"th: "+�K%!48:� -���mb:�`%,s$,Xe%,yb%,We%,c%,z%:�e,f,g,h,i,j:e=�f(�icon_read(Cb%,6)):f=�f(�icon_read(Cb%,7)):g=�f(�icon_read(Cb%,10)):h=�f(�icon_read(Cb%,11)):i=�f(�icon_read(Cb%,8)):j=�f(�icon_read(Cb%,9)):s$=�icon_read(Cb%,5):�s$=""�254,�msg_0(A%!12,"OKAD") -�5�f(�icon_read(Cb%,6))=0�254,�msg_0(A%!12,"OKAE") -�5�f(�icon_read(Cb%,7))=0�254,�msg_0(A%!12,"OKAE") -�:�(i+j>f)�254,�msg_1(A%!12,"OKAY",�msg_0(A%!12,"OKAZ")) -�:�(g+h>e)�254,�msg_1(A%!12,"OKAY",�msg_0(A%!12,"OKBA")) -�#È™263872:`%=ja%:È•`%:�$`%!4=s$� -�Xe%=`%:`%=0 -� �:`%=`%!0 .� . ,�:�Xe%�Xe%!52=2�254,�msg_0(A%!12,"OKAX") .�Xe%=0� .JB%=1163547472:C%=56:Xe%=�(P%+12):�Xe%=0�253,�msg_1(A%!12,"FA5","PSZE") .RXe%!0=0:$q%=s$:B%=q%:C%=2:Xe%!4=�(P%+28):yb%=ja%:We%=0:È•yb%>0:�$Xe%!4<$yb%!4� .Xe%!0=yb%:yb%=-1 ."�:We%=yb%:yb%=yb%!0 .'� .,�:�We%We%!0=Xe%�ja%=Xe% .1� .6��o(6,Xe%,8,-1,Ze%):�o(7,Xe%,12,-1,Ze%):�o(9,Xe%,16,-1,Ze%):�o(8,Xe%,20,-1,Ze%):�o(10,Xe%,24,-1,Ze%):�o(11,Xe%,28,-1,Ze%):�o(13,Xe%,32,0,Ze%):�o(12,Xe%,36,0,Ze%):�o(14,Xe%,40,0,Ze%):�o(15,Xe%,44,0,Ze%):�o(16,Xe%,48,0,Ze%):Xe%!52=1 .;!�oc:z%=A%!48:È•z%:�z%!36=Xe%� .@ �z%!24�2� .E'�select_printer(z%,-1,0):�wb(z%):�z .J� .O� .Tz%=z%!0:�:È™263873:� .Y ��oc:�c%,`%,_e%,s$,fb%:�ia%� .^2s$="<Printers$Dir>"+".Remote.ID"+h$+".PaperRW" .c$�:s$="<Printers$Dir>"+".PaperRW" .h� .m2È™131080,17,s$�fb%;f%:�(f%�1)!fb%=254:È™43,fb% .r �(fb%=0)� .wEÈ™131080,11,s$,4038,,0,0�fb%;f%:�(f%�1)�b(�msg_0(A%!12,"WA14")):� .|B�:È™131080,4,s$,,,,0�fb%;f%:�(f%�1)=0È™131080,4,s$,,,,3�fb%;f% .�%�(f%�1)�b(�msg_0(A%!12,"WA14")):� .�� .�;È™131085,143,s$�c%;f%:�(f%�1)�b(�msg_0(A%!12,"WA14")):� .��c%� .�`%=ja%:È•`%:�`%!52=1� .��nc(c%,`%):_e%+=1 .�� .� `%=`%!0:�:È™131085,,c%:�_e%� .�+È™131080,18,s$,4038:È™131080,4,s$,,,,19 .��:È™131080,6,s$ .�� .�� .�� .�D��o(qb%,wd%,_a%,`e%,�Ve%):�v,v%:v=�f(�icon_read(Cb%,qb%)):ÈŽqb%� .� �8:v=�f(�icon_read(Cb%,7))-v .�!�11:v=�f(�icon_read(Cb%,6))-v .�� .� �`e%� .�#�icon_set(Cb%,23)v%=v*c�v%=v*d .� �:v%=v .�� .��wd%!_a%<>v%� .�$Ve%=-1:wd%!_a%=v%:�Ga%Ga%!_a%=v% .�� .�� .�P��rb:�s$,`%,We%,i%,z%:È™263872:s$=�icon_read(Cb%,5):`%=ja%:È•`%>0:�$`%!4=s$� / �`%!52=1� /4z%=A%!48:È•z%:�z%!36=`%�254,�msg_0(A%!12,"OKQa") / z%=z%!0:�:�We%� /We%!0=`%!0 /�:ja%=`%!0 /� /!8�free_structure(`%!4):B%=1163547472:C%=`%:�P%+16:�oc /&�:�254,�msg_0(A%!12,"OKR") /+� /0#�i%=0�52�4:Ga%!i%=0:�:�Ib:`%=-1 /5�:We%=`%:`%=`%!0 /:� /?#�:�`%=0�254,�msg_0(A%!12,"OKQ") /DÈ™263873:� /I~��tb:�s(A%!40):!q%=A%!40:È™262348,,q%�1:q%!48=q%!56-(A%!44*pa%*2)-(A%!32*pa%):È™262359,A%!40,q%+44:q%!28=-1:È™262341,,q%:� /N��kb(z%):笤i(Fb%)� /SI!V%=Fb%:V%!4=z%!28:È™262350,,V%:È™262353,Fb%,V%!8,V%!12,V%!16,V%!20:� /X#��f(y%,z%,M%):�Mb%:笤i(A%!40)� /]�y%=-1� /bB%=z%:C%=M%:y%=�(P%+48) /g� /ll!V%=A%!40:È™262347,,V%:V%!12=V%!12-V%!4:V%!4=0:V%!8=y%-pa%:V%!16=y%:È™262353,!V%,V%!4,V%!8,V%!12,V%!16:� /q)��pc(y%,z%,af%,bf%):�_e%:笤i(A%!40)� /v�y%=-1� /{B%=z%:C%=M%:y%=�(P%+48) /�� /��!V%=A%!40:È™262347,,V%:V%!12=V%!12-V%!4:V%!4=0:_e%=2:È•af%<>bf%:_e%+=1:af%=af%!0:�:V%!8=y%-pa%*_e%:V%!16=y%:È™262353,!V%,V%!4,V%!8,V%!12,V%!16:� /�g��gb(cf%,O$,Ma$,B$,z%,Ub%):B%=cf%:C%=q%:$C%=O$:D%=O%:$D%=Ma$:E%=O%+256:$E%=B$:F%=z%:G%=Ub%:�P%+24:� /�=��n(z%,M%,uc%):�yb%,p%,N%:�za%=z%�Aa%=M%Aa%=0:È™262356,-1 /�p%=M%!44:�p%� /��p%!40� /�z%!24=z%!24��36:�z%!48� /�!q%=z%!48:�e /�� /�� /�� /��z%!32=M%� /�z%!32=M%!0:yb%=0 /�2�:yb%=z%!32:È•yb%!0<>M%:yb%=yb%!0:�:yb%!0=M%!0 /�� /��M%!12� /�:È™131085,,M%!12:M%!12=0:z%!24=z%!24��8:�i(z%):�z%!28� /�7O%!0=Fb%:O%!4=z%!28:O%!8=0:O%!12=1<<22:È™262349,,O% /�� /�� /�:p%=0:�:È™524624,p%�p%:�p%�p%=M%!40�p%=M%!72È™524617,p% /��p%=0:�M%!40� /�*N%=z%!12:�N%!0=1�N%!0=2È™6,21,�o(N%!0) /�?È™131085,0,M%!40:M%!40=0:�qc(N%!0):!q%=M%:�c(z%!4,z%,-7,q%) /�� /��M%!72� 0È™131085,,M%!72:M%!72=0 0� 0FÈ™131080,6,$M%!68:�free_structure(M%!68):�M%?11�2È™131080,6,$M%!20 0V�free_structure(M%!16):�free_structure(M%!20):�free_structure(M%!24):p%=M%!44:�p%� 0~�free_structure(p%!104):�free_structure(p%!108):�free_structure(p%!112):�free_structure(p%!120):B%=1112887380:C%=p%:�P%+16 0� 0 �M%!52� 0%!B%=1179009620:C%=M%!52:�P%+16 0*� 0/>B%=1430607185:C%=M%:�P%+16:A%!32-=1:�A%!32<=0A%!20=A%!20�1 04 �uc%� 09*!q%=A%!40:È™262348,,q%�1:�q%!32�1<<16� 0>[q%!48=q%!56-A%!44*pa%*2-A%!32*pa%:È™262359,A%!40,q%+44:È™262341,,q%:B%=z%:C%=yb%:�P%+32 0C� 0H� 0M� 0R6��A(z%):�M%,df%:È™263872:�:M%=z%!32:�M%�n(z%,M%,0) 0W0�M%=0:!q%=A%!40:È™262348,,q%�1:�q%!32�1<<16� 0\Yq%!48=q%!56-A%!44*pa%*2-A%!32*pa%:È™262359,A%!40,q%+44:È™262341,,q%:B%=z%:C%=0:�P%+32 0a� 0fÈ™263873:� 0k4��I:�z%:z%=A%!48:È•z%:�A(z%):z%=z%!0:�:A%!32=0:� 0p/��na:�ef%,j%,z%,M%:�:�A%!24A%!24=!(A%!24+0) 0u�A%!24=0A%!24=A%!48 0z!�A%!24:z%=A%!24:�(z%!24�4)=0� 0-A%!28=z%!32:ef%=0:È•A%!28:�?(A%!28+11)�1� 0�A%!28=0 0��:�?(A%!28+11)�4� 0�ef%=A%!28:A%!28=!(A%!28+0) 0��:�!(A%!28+12)� 0��rc(z%,A%!28) 0��:�(z%!24�32)=0� 0��A%!28<>z%!32� 0��ef%ef%!0=!(A%!28+0) 0�5!(A%!28+0)=z%!32:z%!32=A%!28:�pc(-1,z%,A%!28,ef%) 0�� 0��Ba%=z%� 0� !q%=Q%:�e 0�� 0�0j%=z%!4:j%=j%!20:È•j%:�$(j%+16)="configure"� 0��j%!12=z%� 0�!q%=j%!4:�e 0�� 0�� 0�j%=j%!0:�:�rc(z%,A%!28) 0�� 0�� 0�A%!28=0 0�� 0�� 0�� 1� 1ZA%!32=0:z%=A%!48:È•z%:M%=z%!32:È•M%:A%!32+=1:M%=M%!0:�:z%=z%!0:�:�A%!32=0A%!20=A%!20�1 1� 1�ݤra(M%,ff%,�_$):�y$,i%,c$,H%:_$="":y$=�"00"+�~M%!36,3):È™131107,"Alias$@PrintType_"+y$,,-1�,,i%:�i%<0_$="@PrintType_"+y$:=-1 1ÈŽM%!36� 1�-1:c$=�msg_0(A%!12,"UNT") 1&�8192:�j(�msg_0(A%!12,"OKT"),1):=0 1$&�4096:�j(�msg_0(A%!12,"OKS"),1):=0 1)�4095,2808:M%!36=4095:=-1 1.,�4054,4055,4074,4075,4094:M%!36=4094:=-1 13�ff%:M%!36=ff%:=-1 18K:c$=�task_read_env("File$Type_"+y$,q%):�c$=""c$=�msg_1(A%!12,"TYP",y$) 1=� 1BȎ�sa(c$,M%)� 1G�4:M%!36=4094:=-1 1L�2:M%!36=4095:=-1 1Q� 1V=0 1[�ݤsa(c$,M%):�x%,y%,w%,h%:�icon_write(Bb%,0,�msg_2(A%!12,"WA5",c$,$M%!24)):È™262351,,q%:x%=!q%:y%=q%!4:!q%=Bb%:È™262347,,q%:w%=q%!12-q%!4:h%=q%!16-q%!8:q%!4=x%-340:q%!8=y%-120:q%!12=q%!4+w%:q%!16=q%!8+h%:q%!28=-1 1`BÈ™262341,,q%:�cc(Bb%):sa%=0:�:�v(ma%):�sa%:!q%=Bb%:�e:�dc:=sa% 1e,��sc(gf%,hf%,if%,Na$):�gf%È™131085,0,gf% 1j�hf%�#hf%=if% 1o�hf%È™131085,0,hf% 1tÈ™131080,6,Na$:� 1yN��hb(Oa$,Na$):�jf%,kf%,lf%,if%,i%:�:��:�sc(jf%,kf%,if%,Na$):�j(�$,1):� 1~jf%=�Na$:lf%=�#jf%:�lf%� 1��ș263872:kf%=�Oa$:if%=�#kf%:�#kf%=if%:�i%=1�lf%�512:È™12,4,jf%,O%,512:È™12,2,kf%,O%,512:�:�lf%�512È™12,4,jf%,O%,lf%�512:È™12,2,kf%,O%,lf%�512 1��#kf%:È™263873 1�� 1��#jf%:È™8,6,Na$:� 1�|��rc(z%,M%):�H%,N%,mf%,b%,t%,P$,t$,_$,Qa%,Ra%,nf%,s%,Vb%,z$,of%,G$:�A$,B$,Xb%,l%,f%:H%=z%!4:N%=z%!12:mf%=H%!28:�M%!12=0� 1�*�select_printer(z%,0,0):�(z%!24�4)<>0� 1�*P$=$M%!20:L$=$M%!16:M$=$M%!24:�N%!0=5� 1�Vb%=(N%?6�2)<>0 1��:Vb%=(N%?6�1)<>0 1�� 1� �Vb%� 1�g$=�m(0):�g$=""� 1�&z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� 1�� 1��N%!0=5� 1�%È™36,"PrinterType$5",g$,�g$:�J(5) 1�)�:È™36,"PrinterType$10",g$,�g$:�J(10) 1�� 1� G$=g$ 1�� 1�z$=�m(0):�z$=""� 1�&z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� 1�� 1��ș36,"Printer$Temp",z$,�z$:q%!0=48+�P$��3:q%!12=0:q%!16=524613:q%!40=M%!36:$(q%+44)=P$+�0:È™262375,18,q%:ta%=0:�:�v(la%):�ta%:b%=-1:�ta%<>2� 1�b%=�ra(M%,mf%,_$):�b%� 2 �_$<>""� 2È™262366,_$+" "+P$ 2 � 2� 2� 2 �b%� 2�n(z%,M%,-1):� 2#� 2( �Vb%� 2-s$=�n(z%,-1):�s$<>""� 22�b(s$):�z%!32� 27$z%!24=z%!24�4:�i(z%):�f(-1,z%,0) 2<� 2A� 2F� 2K(�(M%!36=4095�M%!36=4094�M%!36=mf%)� 2PÈ™8,17,z$�t%,,Qa%,,Ra%:�t%� 2U �M%?11�2� 2Z�K$<>""È™131080,6,K$ 2_ K$=$M%!20 2d� 2ij�free_structure(M%!20):$q%=z$:B%=q%:C%=2:M%!20=�(P%+28):M%!28=Ra%:M%!36=(Qa%�1048320)>>8:M%?11=M%?11�2 2n�:�Vb%� 2s�N%!0=5� 2x�hb($N%!16,G$):�n(z%,M%,-1) 2}&�:È™8,17,G$�b%,,,,Ra%:�b%=0�Ra%=0� 2�ș131080,6,G$:�n(z%,M%,-1) 2�!�:�(M%?11�2)È™131080,6,$M%!20 2�]�free_structure(M%!20):$q%=G$:B%=q%:C%=2:M%!20=�(P%+28):M%!28=Ra%:M%!36=mf%:M%?11=M%?11�2 2�� 2�� 2�6�:A$=$M%!16:B$=$M%!24:�n(z%,M%,-1):�N%!0=9�q$<>""� 2��c$=$(z%!40):K%=�c$," "):È•K%:�c$,K%,1)=�160:K%=�c$," ",K%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Na%):È™131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� 2��B (z%,A$,B$)� 2�Xb%=W%!4:È™131113,25,w$,C$ 2��:È™131080,6,w$ 2�� 2�%L$="":M$="":s$=�n(z%,-1):�s$<>""� 2� �b(s$) 2�� 2�� 2�� 2��select_printer(0,-1,-1) 2�� 2�� 2� �:ÈŽN%!0� 2��1:�z%!24�128� 2�'g$="devices#buffer"+äP(1)+":$."+�U 2�.�:g$="devices#buffer"+äP(1)+":$.Parallel" 2�� 2�ș36,"PrinterType$1",g$,�g$ 2�I�2:g$="devices#buffer"+äP(2)+":$.Serial":È™36,"PrinterType$2",g$,�g$ 3� 3 !È™263872:�N%!0=5�(N%?6�2)<>0� 3,È™131085,207,g$�b%;t%:�(t%�1)=0�#b%=�#b% 3�:È™131085,143,g$�b%;t% 3� 3�t%�1i%=b%+4:�Z%,i%,t$ 3",È™263873:�select_printer(0,-1,-1):�t%�1� 3'1�fc(z%):�qc(N%!0):�254,�msg_1(A%!12,"OKP",t$) 3,� 317M%!40=b%:È™131085,64,$M%!20�M%!12;t%:�(t%�1)M%!12=0 36 �M%!12=0� 3;1�n(z%,M%,-1):�254,�msg_1(A%!12,"OKAF",$M%!20) 3@� 3Et$=�m(0):�t$=""� 3J&z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� 3O� 3T<È™131080,11,t$,4093�b%;t%:�(t%�1)=0È™131085,207,t$�b%;t% 3Y �t%�1� 3^7�fc(z%):b%+=4:�Z%,b%,s$:�254,�msg_1(A%!12,"OKP",s$) 3c� 3htM%!72=b%:$q%=t$:B%=q%:C%=2:M%!68=�(P%+28):B%=1179009620:C%=1024:s%=�(P%+12):�s%=0�253,�msg_1(A%!12,"FA5","TBFF") 3m:M%!52=s%:z%!24=z%!24�8:�i(z%):�f(-1,z%,0):�M%!36<>mf%� 3r�z%!24�64� 3w+�n(z%,M%,-1):�z%!40=0s$=$z%!8�s$=$z%!40 3| �254,�msg_1(A%!12,"OKAC",s$) 3�� 3��tc(M%,mf%) 3�� 3�� 3��:��#M%!12�M%!56=0� 3�t%=�#M%!72-�#M%!72:�t%� 3��N%!0=1�N%!0=2� 3�?È™6,128,��o(N%!0)�,Ra%,Qa%:Ra%=Ra%�Qa%<<8:�Ra%>1024Ra%=1024 3��:Ra%=1024/2 3�� 3��uc(M%,t%,Ra%):� 3�� 3�nf%=-1:�N%!0=1�N%!0=2� 3�'È™6,152,�o(N%!0)�;b%:�(b%�2)=0nf%=0 3�� 3� �nf%� 3�;�i(z%):A$=$M%!16:B$=$M%!24:�n(z%,M%,-1):�N%!0=9�q$<>""� 3ÖŽc$=$(z%!40):K%=�c$," "):È•K%:�c$,K%,1)=�160:K%=�c$," ",K%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Na%):�B (z%,A$,B$)� 3�Xb%=W%!4:È™131113,25,w$,C$ 3��:È™131080,6,w$ 3�� 3�s$=�n(z%,-1):�s$<>""� 3� �b(s$) 3�� 3�� 3�� 4�:�vc(z%,M%,mf%) 4� 4 � 4� 44��tc(M%,ff%):�i%,p%,c$:�:��:�wc(A%!24,A%!28) 4IB%=1112887380:C%=124:p%=�(P%+12):�p%=0�253,�msg_1(A%!12,"FA5","TPUB") 4!M%!44=p%:�0<=124-4 4&�i%=0�124-4�4:p%!i%=0:� 4+� 40L?O%=3:È™7,14,O%:È™192,O%,O%+5,250:B%=O%+5:C%=2:p%!120=�(P%+28):�M%?11�2� 45c$=$M%!16+" - "+$M%!24 4:�:c$=$M%!20:�c$>40� 4?!c$=�c$,40):c$=�c$,1+�c$,".")) 4D� 4I� 4Nz$q%=c$:B%=q%:C%=2:p%!112=�(P%+28):p%!16=1:$q%=�32," "):B%=q%:C%=5:D%=32:p%!104=�(P%+28):p%!96=128:�G(A%!24,A%!28,-1):� 4S'��wc(z%,M%):�n(z%,M%,-1):�z%!32<>0� 4Xz%!24=z%!24�32:�i(z%) 4]� 4b"�254,�msg_1(A%!12,"OKPa",�$):� 4gJ��vc(z%,M%,ff%):�l%,t%,pf%,Wc%,b$,p%,ac%,N%,qf%,H%:�:��:�wc(z%,M%) 4l.N%=z%!12:H%=z%!4:ac%=M%!44:�N%!0=1�N%!0=2� 4q=È™6,128,��o(N%!0)�,Wc%,l%:Wc%=Wc%�l%<<8:�Wc%>1024Wc%=1024 4v�:Wc%=1024/2 4{� 4�!l%=�#M%!72-�#M%!72:�M%!56l%=0 4��l%�uc(M%,l%,Wc%):� 4�)È™263872:l%=M%!28-�#M%!12:�M%!36=ff%� 4��#(M%!12)=0� 4�(q%!8=M%!40:q%!12=M%!12:�G(z%,M%,-20) 4�� 4��l%>Wc%l%=Wc% 4�)È™12,4,M%!12,q%,l%:È™12,2,M%!40,q%,l% 4��:�M%!36=4095�(H%!32�1)<>0� 4� ÈŽac%!92� 4�0�0:q%!8=M%!72:�G(z%,M%,-2):M%!32=-1:ac%!92=1 4�/�1:q%!8=M%!72:�G(z%,M%,-3):M%!32=0:ac%!92=2 4��2:�H%!32�2� 4� �M%!56=0� 4�E�xc(0):q%!8=M%!56:�yc(M%,�ta(z%,M%,-4)):�zc(z%,M%,Wc%):�ac%!92=3� 4�%q%!8=M%!72:�G(z%,M%,-14):ac%!92=1 4�� 4��:�zc(z%,M%,Wc%) 4�� 4��:�M%!56=0� 4�t%=1024/4:�t%>Wc%t%=Wc% 4�M%!60=0:�xc(t%):�ac%!40� 4��fc(z%):�_a(z%):p%=ac%!40 4�� 4�� 4��Wc%>M%!56Wc%=M%!56 5�ac%!40<>0�Wc%>p%Wc%=p% 5$�Wc%È™12,2,M%!40,M%!52+M%!60,Wc% 5M%!56-=Wc%:M%!60+=Wc% 5� 5� 5`�:t%=��printer_read_string(ac%!108):È•l%�Wc%>t%:b$=�ua(�#M%!12,ac%):l%-=1:�b$<>""�#M%!40,b$; 5 Wc%-=�b$:� 5%� 5*� 5/��#M%!12�M%!56=0� 54"q%!8=M%!72:�G(A%!24,A%!28,-15) 59� 5>'�M%!28=0pf%=0�pf%=�#M%!12*100/M%!28 5C�pf%<>M%!32� 5HM%!32=pf%:�f(-1,z%,M%) 5M� 5R�#M%!72=0:È™263873:� 5W$��uc(M%,rf%,Wc%):�rf%>Wc%rf%=Wc% 5\?È™12,4,M%!72,q%,rf%:È™12,2,M%!40,q%,rf%:�#M%!72-�#M%!72=0� 5a�#M%!72=0:�#M%!72=0 5f� 5k� 5p"ݤua(C%,ac%):�r$:�C%=10�C%=13� 5u7�ac%!16=1�ac%!16=C%r$=�printer_read_string(ac%!108) 5z ac%!16=C% 5-�:�ac%!16r$=�printer_read_string(ac%!108) 5�r$+=�C%:ac%!16=0 5�� 5�=r$ 5�5��yc(M%,s$):�sf%,tf%:tf%=M%!52:sf%=M%!56:�s$<>""� 5�$(tf%+sf%)=s$:M%!56+=�s$ 5�� 5�� 5�6��zc(z%,M%,Wc%):�sf%,tf%:tf%=M%!52:sf%=M%!56:�sf%� 5��N%!0=1�N%!0=2� 5��sf%>=Wc%� 5�� 5�=tf%?sf%=10:sf%+=1:tf%?sf%=13:È™12,2,M%!40,tf%,sf%:M%!56=0 5�� 5�� 5�7��G(z%,M%,uf%):q%!0=uf%:q%!4=M%:�c(z%!4,z%,-8,q%):� 5�Sݤta(z%,M%,uf%):�s$,i%:q%!0=uf%:q%!4=M%:�c(z%!4,z%,-8,q%):i%=q%+8:�Y%,i%,s$:=s$ 5����xc(F%):�H%:H%=z%!4:B%=H%:C%=M%:D%=ac%:E%=O%+128:E%!0=H%:E%!4=z%:E%!8=M%:E%!12=ac%:E%!16=q%:E%!20=O%+356:$(O%+356)=�164+$H%!4+"_support("+�O%+")":O%!0=-8:O%!4=H%:O%!8=z%:O%!12=q%:O%!16=ja%:O%!20=P%:O%!24=F%:�F%=0�P%+4��P%+0 5�� 5�ݤP(t%):ÈŽt%� 5��1:�A%!80=0� 5��A%!76<>3� 5�A%!80=3 5��:A%!80=10 5�� 5�� 6 =A%!80 6�2:�A%!76=0� 6�A%!80<>3� 6A%!76=3 6 �:A%!76=2 6� 6� 6$ =A%!76 6)� 6.=0 63��qc(t%):ÈŽt%� 68�1:A%!80=0 6=�2:A%!76=0 6B� 6G� 6Lݤo(t%):ÈŽt%� 6Q �1:=A%!80 6V �2:=A%!76 6[� 6`=0 6eFݤR:�fb%,vf%:È™88,3�fb%,vf%:�(fb%�61440)=4096�(vf%�61440)=4096:=-1 6j=0 6o6ݤU:�fb%:È™8,5,"Devices:FastParallel"�fb%:�fb%<>0� 6t:="FastParallel" 6y�::="Parallel" 6~� 6�{ݤrmload_latest_module(c$,k$):�wf%,xf%,yf%:�K%,f%,vf%,zf%,Af%,s$,Bf%:wf%=-1:È™131102,18,c$�,,,K%;f%:�(f%�1)=0�K%!20<>0� 6�0K%+=(K%!20):È•?K%<>9�?K%<>0:K%+=1:�:�?K%<>0� 6�/wf%=0:K%+=1:È•?K%<>32:�?K%>=�"0"�?K%<=�"9"� 6�wf%=wf%*10+?K%-�"0" 6�� 6�K%+=1:� 6�� 6�� 6�Pxf%=-1:vf%=0:zf%=-1:�:È™131102,20,vf%,zf%�,vf%,zf%,K%,Bf%,,Af%;f%:�(f%�1)=0� 6�&�Z%,K%,s$:�s$=c$xf%=�(�~(Af%))/100 6�� 6�@�(xf%<>-1)�(f%�1)<>0:yf%=-1:È™131085,67,k$�f%;K%:�(K%�1)f%=0 6��f%<>0� 6�A�#f%=20:K%=�#f%+((�#f%)<<8)+((�#f%)<<16)+((�#f%)<<24):�K%<>0� 6�,�#f%=K%:�:vf%=�#f%:�vf%=0�vf%=9:�vf%<>0� 6�*yf%=0:�:vf%=�#f%:�vf%>=�"0"�vf%<=�"9"� 6�yf%=yf%*10+vf%-�"0" 6�� 6��vf%=32 6�� 6�� 6��#f% 6�� 6��wf%>xf%vf%=wf%�vf%=xf% 6��vf%>yf%f%=vf%�f%=yf% 7 vf%=0:�xf%=f%� 7�Bf%<1� 7 &È™131102,4,c$:È™131102,3,c$�K%;vf% 7� 7� 7�yf%=f%�yf%>xf%�yf%>wf%� 7È™131102,1,k$�K%;vf% 7#� 7(#�(vf%�1)=0È™131102,18,c$�K%;vf% 7-�(vf%�1)!K%=253:È™43,K% 72=f% 77b��` (Cf%):�f%,g%,Df%,Ff%,s$:ia%=0:�rmload_latest_module("PDriver","Printers:Modules.PDriver") 7<O�rmload_latest_module("RemotePrinterSupport","Printers:Modules.RemPrnSpt") 7A.Df%=0:È™131102,18,"Freeway"�;f%:�(f%�1)=0� 7FBÈ™131129,,"Freeway_Status"�;g%:�(g%�1)=0�ș424580,0�,Df%�Df%=1 7K� 7PeÈ™131102,18,"RemotePrinterSupport"�;Ff%:È™131102,18,"ShareFS"�;g%:�(f%�1)�(Df%=0)�(g%�1)�(Ff%�1)� 7U Ja%=0 7Z=�:È™131077,"RMEnsure ShareFS 2.00 ERROR Foo"�;f%:�(f%�1)� 7_ Ja%=0 7d��:h$=�task_read_env("Inet$LocalAddr",q%):Ja%=-1:�Ac:�Bc:È™424323,2:Pa$="<Wimp$ScrapDir>.Printers":s$=�task_read_env ("Printers$Dir",q%):�s$,"Share:")� 7i ia%=-1 7n�:ia%=0 7s� 7x� 7}� 7��(Ff%�1)=0� 7�ș424320�La% 7�� 7� �ia%� 7�]È™131080,8,"<Printers$Path>Remote"�;f%:s$="<Printers$Path>Remote.ID"+h$:È™131080,8,s$�;f% 7�� 7�� 7���Ac:È™293504,0,2:� 7�ݤk(Gf%):�W$:�Z%,Gf%,W$:=W$ 7� ��la:� 7����Bc:�Hf%,If%,Jf%,Kf%,jc%,Zb%,c$,kb%:�Lf%,Mf%,c$,Qa$,S%,Gd%:If%=0:Jf%=0:Ma%=0:�:If%=Jf%:È™293507,0,2,0,0,0,0,0,If%�,,Kf%,,jc%,,,Jf%:�(Jf%>0)� 7��Lf%=�g (1196577875,Kf%):Mf%=�g (1196577875,jc%+1):Nf%=�g (810701907,Kf%):Of%=�g (810701907,jc%+1):È™293507,0,2,Kf%,Nf%,jc%+1,Of%,0,If%�,,,,,,Zb%:Of%?jc%=0:$Lf%=�k (Nf%):$Mf%=�k (Of%):�d (810701907,Nf%):�d (810701907,Of%) 7�6S%=�F (Lf%,Mf%,Zb%):�L (Ka%,S%):c$=$Lf%:�va (c$)� 7�!Bd%=�y (S%,0,0,-1,kb%):�kb%� 7��_b (c$):�N (c$):�W%=0� 7��A%!44� 7�Gd%=A%!48:È•Gd%:�Gd%!20� 7�#�select_printer(Gd%,-1,0):Gd%=0 7��:Gd%=Gd%!0 7�� 7�� 7�� 7�� 7�� 7�� 7� Ma%+=1 8� 8 �(Jf%<0):� 8g��ac (c$):�Lf%,Mf%,jc%,Zb%,Qa$,ab%,S%,Ra$,Gd%,kb%,mb%:È™424578,0,2,c$,0,0�,,,jc%,,Zb%;ab%:�(ab%�1)� 8� 8� 8/mb%=0:S%=Ka%:È•S%:�($S%!4=c$)�((S%!20)<=0)� 8"� 8'� 8,�S%=S%!0:�:Lf%=�g (1196577875,�c$+1):Mf%=�g (1196577875,jc%+1):Of%=�g (810701907,jc%+1):$Lf%=c$:È™424578,0,2,c$,jc%+1,Of%�;ab%:�(ab%�1)� 81� 86� 8;`Of%?jc%=0:$Mf%=�k (Of%):�d (810701907,Of%):S%=�F (Lf%,Mf%,Zb%):�L (Ka%,S%):Ma%+=1:�va (c$)� 8@!Bd%=�y (S%,0,0,-1,kb%):�kb%� 8E�_b (c$):�N (c$):�W%=0� 8J�A%!44� 8OGd%=A%!48:È•Gd%:�Gd%!20� 8T�Cc(Gd%,-1,0,-1,kb%):Gd%=0 8Y�:Gd%=Gd%!0 8^� 8c� 8h� 8m� 8r� 8w� 8|�k:� 8�8��_b (c$):�We%,Hf%,mb%,Pf%:Hf%=Ka%:We%=0:mb%=0:�Hf%� 8��:�($Hf%!4)=c$�Hf%!20>0� 8� mb%=-1 8��:We%=Hf%:Hf%=Hf%!0 8�� 8�#�mb%�(Hf%=0):�(We%=0)�(Hf%<>0)� 8�\Ka%=Hf%!0:�D (-2,Hf%!20):�d (1196577875,Hf%!4):�d (1196577875,Hf%!8):�d (1380799568,Hf%) 8��:�Hf%� 8�^We%!0=Hf%!0:�D (-2,Hf%!20):�d (1196577875,Hf%!4):�d (1196577875,Hf%!8):�d (1380799568,Hf%) 8�� 8�� 8�� 8�� 8�Dݤva (c$):�Hf%,Qf%:Hf%=Ka%:Qf%=0:È•Hf%��Qf%:�$Hf%!4=c$�Hf%!20>0� 8� Qf%=-1 8��:Hf%=Hf%!0 8�� 8� �:=Qf% 8�6��N (c$):�z%,Id%,K%,N%,Gd%,y$,H%,`$:�wa (Ka%,c$)� 8��Wa (Ka%,c$) 8�;�:Id%=0:z%=A%!48:K%=z%:N%=z%!12:È•K%:�$K%!40=c$�N%!0=9� 8�K%=0 8�#�:Id%=z%:z%=z%!0:K%=z%:N%=z%!12 8�� 8� �:�z%� 8�BH%=z%!4:`$=$H%!4:y$=$z%!8:�Ua (c$,`$,y$):�bc (z%,Id%):�Nb (y$) 9� 9� 9 �i (Fb%)� 9�k:�p (Fb%) 9� 9� 9!ݤu(Zb%):=�~Zb% 9&;ݤg (Rf%,Ra%):�Sf%:B%=Rf%:C%=Ra%:Sf%=�(P%+12):�(Sf%=0)� 9+c�253,�msg_1 (A%!12,"FA5",�((B%�-16777216)>>24)+�((B%�16711680)>>16)+�((B%�65280)>>8)+�(B%�255)) 90� 95=Sf% 9:(��d (Rf%,wd%):B%=Rf%:C%=wd%:�P%+16:� 9?2��K (�Tf%,i$):$q%=i$:B%=q%:C%=2:Tf%=�(P%+28):� 9DqݤF (Lf%,Mf%,Uf%):�Sf%:Sf%=�g (1380799568,24):Sf%!0=0:Sf%!4=Lf%:Sf%!8=Mf%:Sf%!12=Uf%:Sf%!16=-1:Sf%!20=-1:=Sf% 9I�ݤxa (c$,qb%,R$):�Sf%,Vf%,zd%:Sf%=�g (1380799568,24):�K (Vf%,c$):�K (zd%,R$):Sf%!0=0:Sf%!4=Vf%:Sf%!8=zd%:Sf%!12=-1:Sf%!16=-1:Sf%!20=qb%:=Sf% 9N��L (�wc%,Re%):�Hf%:�wc%=0� 9Swc%=Re% 9X0�:Hf%=wc%:È•(Hf%!0<>0):Hf%=Hf%!0:�:Hf%!0=Re% 9]� 9b� 9gݤwa (�wc%,c$):�Hf%:�wc%=0� 9l=0 9q�:Hf%=wc%:È•Hf%:�$Hf%!4=c$� 9v=-1 9{�:Hf%=Hf%!0 9�� 9�� 9�� 9�=0 9�)��Wa (�wc%,c$):�We%,Hf%,mb%,Pf%:�wc%� 9�'Hf%=wc%:We%=0:mb%=0:�:�($Hf%!4)=c$� 9� mb%=-1 9��:We%=Hf%:Hf%=Hf%!0 9�� 9�#�mb%�(Hf%=0):�(We%=0)�(Hf%<>0)� 9�Mwc%=Hf%!0:�d (1196577875,Hf%!4):�d (1196577875,Hf%!8):�d (1380799568,Hf%) 9��:�Hf%� 9�OWe%!0=Hf%!0:�d (1196577875,Hf%!4):�d (1196577875,Hf%!8):�d (1380799568,Hf%) 9�� 9�� 9�� 9�� 9�V��ua:�Rd%,z%,N%,Gd%:�hb%,Wf%,s$,H%,s%,t%,l%,t$,K%:�:È™424321,,,-1�Rd%,,Wf%:�Rd%>0� 9��Wf%>0� 9�-hb%=�g (1196577875,Wf%):È™424321,,hb%,Wf% 9��:È™424321,,0,0 9�� 9� ÈŽRd%� 9��1:�W%� 9�N%=W%!12:�N%!0=9�q$<>""� 9��t$=$(W%!40):K%=�t$," "):È•K%:�t$,K%,1)=�160:K%=�t$," ",K%+1):�:w$=q$+"RemSpool."+h$+"."+t$:C$=q$+"RemQueue."+h$+"."+�(Na%):È™131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� :�L$=""� :L$=�msg_0(A%!12,"UNKN") :� :�M$=""� :M$=�msg_0(A%!12,"UNKN") :� : �B (W%,L$,M$)� :%H%=W%!4:È™131113,25,w$,C$ :*�:È™131080,6,w$ :/� :4%L$="":M$="":s$=�n(W%,-1):�s$<>""� :9 �b(s$) :>� :C� :H� :M� :R�2:�Dc (�k (hb%)) :W�3:�Ja%� :\�ac (�k (hb%)) :a� :f�4:�N (�k (hb%)) :k�5 :p�6:�Fc (�k (hb%)) :u�7:�Gc:�` (0) :z �8:�Hc :� :� �(Wf%>0)� :��d (1196577875,hb%) :�� :�� :��Rd%<0:�W%=0� :��A%!44� :�Gd%=A%!48:È•Gd%:�Gd%!20� :�#�select_printer(Gd%,-1,0):Gd%=0 :��:Gd%=Gd%!0 :�� :�� :�� :�� :�� :���xa:�Gc:�` (0):ga%=0:� :���Fc (c$):� :�mݤda:�C$,f%,v%,w%,e$,Xc%,Xf%:�:C$=q$+"RemQueue."+h$+"."+�Na%:È™424326:È™131080,5,C$�v%;f%:È™424325:�f%�1� :�*Na%=-1:=�msg_0 (A%!12,"OKAS",�k(v%+4)) :�� :� �(v%<>0)� :� Na%+=1 :�� :� �v%=0:="" :����Dc (Sa$):�Ta$,Ua$,Lb%,Va$,B$,c%,z%:�K%,c$,H%,Ub%,Wa$,A$:B$=�Sa$,�Sa$,".")+1):Ta$=Pa$+"."+Sa$:Ua$=Pa$+".RemQueue."+B$+"I":Va$="":O$="":h%=�Ua$:�h%=0� :�� ;� ;�c%=�#h%:È•(��#h%)�(c%<>0):Va$+=�c%:c%=�#h%:�:c%=�#h%:È•(��#h%)�(c%<>0):Wa$+=�c%:c%=�#h%:�:c%=�#h%:È•(��#h%)�(c%<>0):A$+=�c%:c%=�#h%:�:B$="":c%=�#h%:È•(��#h%)�(c%>31):B$+=�c%:c%=�#h%:�:�#h%:È™131080,6,Ua$:K%=A%!48:z%=0:È•(K%):�(K%!40=0)� ;H%=K%!4:c$=$(H%!4) ;�:c$=$(K%!40) ;� ;�c$=Va$� ;z%=K%:K%=0 ;$ �:K%=K%!0 ;)� ;.�:�(z%<>0)� ;3]H%=z%!4:È™131080,23,Ta$�,,,,,,Ub%:�gb (-1,"("+�msg_0 (A%!12,"IC9")+") "+A$,Ta$,B$,z%,Ub%) ;8� ;=� ;B4��fb (Zf%,o$):�e%,f%:È™403072,Zf%�e%;f%:�(f%�1)� ;G3L$=�msg_0(A%!12,"UNKN"):M$=�msg_0(A%!12,"UNKN") ;L�:L$=�k (e%):M$=o$ ;Q� ;V� ;[uݤB (z%,A$,o$):�Sa$,h%,f%,c$,K%:Sa$=q$+"RemQueue."+h$+"."+�(Na%)+"I":c$=$z%!40:È™131085,131,Sa$�h%;f%:�(f%�1)h%=0 ;`�h%<>0� ;e/�#h%,c$+�0+h$+�0+A$+�0+o$:È™131085,0,h%�;f% ;j� ;o�(f%�1)�h%=0:=0 ;t=-1 ;y��Jb:�z%,qb%,S%:笤x� ;~ �j(�msg_0(A%!12,"OKAV"),1):� ;�� ;�秤ya,"Share:")>0� ;� �b (�msg_0 (A%!12,"OKAT")):� ;�� ;�F�:�t (z%,S%,qb%):�icon_deselect (Fb%,qb%):�z%�((z%!24�(1<<17))=0)� ;��Oa (z%) ;�� ;��(z%=0)�(S%=0):� ;�I��Oa (z%):�c$,_f%,ic%,`f%,W$,f%,fb%,f$,ag%,Xa$,H%:�(z%!24�(1<<17))>0� ;�� ;�� ;��(z%!40=0)� ;�H%=z%!4:c$=$(H%!4) ;��:c$=$(z%!40) ;�� ;� 笤x� ;�:�j(�msg_1(A%!12,"OKAW",c$),1):z%!24=z%!24�(�(1<<16)):� ;�� ;�秤ya,"Share:")>0� ;�:�b (�msg_1 (A%!12,"OKAU",c$)):z%!24=z%!24�(�(1<<16)):� ;�� ;�R$=$(z%!8):�(z%!24�1)=0� ;��Z (z%) ;�� ;�B_f%=0:�:È™131107,"Inet$LocalAddr*",0,1<<31,_f%,0�,,`f%:�`f%<0� <