Home » Personal collection » Acorn hard disk » apps » Printers » 152/!Printers/!RunImage
152/!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: | 152/!Printers/!RunImage |
Read OK: | ✔ |
File size: | 18EC5 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
5REM>Datafiles.!RunImage 10ONERRORERROREXTERR,REPORT$ 15SYS263872:DIMA%84,A%!16 256,W%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:CALLP%+8:PROCia:PROCja:PROCka:SYS263873:ONERRORPROCla 25REPEAT:PROCv(A%!20):UNTIL0:END 30DEFPROCv(ca%):LOCALr%,t%,z%:r%=FNaa(ca%):CASEr%OF 35WHEN0:PROCma:PROCna 40WHEN1:PROCoa 45WHEN2:SYS262341,,q% 50WHEN3:PROCe 55WHEN6:PROCpa 60WHEN7:IFda%THEN 65PROCqa 70ELSE:PROCw(V%,7,q%) 75ENDIF 80WHEN8:PROCra 85WHEN9:PROCsa 90WHEN13:!(q%!0)=0:PROCta 95WHEN17,18:PROCua(r%) 100WHEN19:PROCva 105OTHERWISE:PROCw(V%,r%,q%) 110ENDCASE 115ea%=-1:z%=A%!48:WHILEz%:t%=z%!56:IFNOTt%THEN 120IFea%=-1ea%=t%ELSEIFt%<ea%ea%=t% 125ENDIF 130z%=z%!0:ENDWHILE:CASEfa%OF 135WHEN1:ea%+=500:fa%=2 140WHEN2:PROCwa:fa%=0 145ENDCASE 150ENDPROC 155DEFPROCja:LOCALj$:q%!0=24:q%!12=0:q%!16=524611:q%!20=34:SYS262375,18,q%:ga%=q%!8:PROCxa:PROCya:PROC` (-1):IFha%THEN 160j$="<Printers$Path>Remote.ID"+h$:SYS131080,8,j$:j$+="." 165ELSE:j$="<Printers$Path>" 170ENDIF 175SYS36,"PrinterChoices$Path",j$,LENj$,0,0:PROCO("Printers:PaperRO",2):IFha%THEN 180PROCO ("<Printers$Dir>.Remote.ID"+h$+".PaperRW",1) 185ELSE:PROCO("<Printers$Dir>.PaperRW",1) 190ENDIF 195IFia%=0ERROR253,FNmsg_0(A%!12,"FAK") 200PROCza:ea%=-1:SYS66TOja%:PROCAa:ENDPROC 205DEFPROCxa:A%!20=12589105:ka%=12589427:la%=12589361:ENDPROC 210DEFPROCba:LOCALh%,l%,a%,w%:h%=OPENIN"Printers:Code":l%=EXT#h%:SYS41,21,h%TO,a%,w%:CLOSE#h%:IF(w%AND255)=46THEN 215P%=a% 220ELSE:DIMP%l%+1:SYS8,16,"Printers:Code",P% 225ENDIF 230Z%=P%+64:Y%=P%+68:ENDPROC 235DEFPROCya:c=1814.4*72000/(180<<8):d=72000:ma%=44:na%=0:oa%=0:pa%=0:qa%=0:ra%=0:sa%=0:A%!48=0:A%!44=0:V%=0:ta%=0:J$="":ua%=0:va%=0:wa%=0:xa%=0:A%!24=0:A%!28=0:g$="null:":ya%=0:za%=0:A%!32=0:aa$="":A%!36=0:Aa%=0:Ba%=0:ia%=0:Ca%=0:Da%=0 240SYS6,204,,255TO,Fa%:K$="":ba$="":A%!76=0:A%!80=0:Ga%=0:Ha%=0:Ia%=0:Ja%=0:h$="":Ka%=0:q$="":L$="":M$="":La%=0:Ma%=0:fa%=0:ha%=0:ENDPROC 245DEFPROCha:LOCALc%,d%,Na%,Oa%,Pa%,Qa%,Ra%:LOCALa$():DIMa$(255):Pa%=0:Qa%=0:Sa%=0:Ta%=0:Ua%=0:Va%=0:c%=-1:REPEAT:PROCBa(j$,U$,c$,c%):IFc$<>""THEN 250SYS8,17,"Printers:"+c$+".Resources.Support"TOd%,,Na%,,Oa%:IFd%=1AND(Na%AND-1048576)=-1048576THEN 255Oa%=Oa%+3ANDNOT3:CASE(Na%AND1048320)>>8OF 260WHEN4091:IFOa%>Pa%Pa%=Oa% 265IFSa%<255a$(Sa%)=c$ 270Sa%+=1 275WHEN4092:Qa%+=Oa%:Ta%+=1 280ENDCASE 285ENDIF 290ENDIF 295UNTILc$="":IFTa%>0DIMb%(Ta%-1),b$(Ta%-1) 300Ra%=HIMEM+Qa%+Pa%+16*1024:END=Ra% 305IF(HIMEM+Qa%+Pa%+16*1024)<Ra%THEN 310Ra%=Ra%/1024:Ra%=Ra%-Ra%MOD8+8:ERROR253,FNmsg_1(A%!12,"FA4",STR$Ra%) 315ENDIF 320IFSa%>0THEN 325DIMc$(Sa%-1):FORd%=0TOSa%-1:c$(d%)="Printers:"+a$(d%)+".Resources.Support":NEXT:OVERLAYc$() 330ENDIF 335ENDPROC 340DEFPROCBa(RETURNj$,RETURNU$,RETURNc$,RETURNWa%):LOCALi%,Xa%:IFWa%=-1j$=FNtask_read_env("Printers$Path",ba%) 345REPEAT:IFWa%=-1THEN 350IFj$=""THEN 355c$="":ENDPROC 360ENDIF 365i%=INSTR(j$,","):IFi%=0i%=LENj$+1 370U$=LEFT$(j$,i%-1):IFRIGHT$(U$)="."U$=LEFT$(U$) 375U$+=CHR$0:j$=MID$(j$,i%+1):Wa%=0 380ENDIF 385SYS12,10,U$,ba%,1,Wa%,256,"*"TO,,,Xa%,Wa%:IFXa%=1THEN 390IFba%!16=2THEN 395i%=ba%+20:CALLZ%,i%,c$:ENDPROC 400ENDIF 405ELSE:Wa%=-1 410ENDIF 415UNTIL0:ENDPROC 420DEFPROCCa(c$):LOCALNa%,Oa%,f$:f$="Printers:"+c$+".Resources.Support":SYS8,17,f$TOd%,,Na%,,Oa%:Oa%=Oa%+3ANDNOT3:IFd%<>1SYS8,19,f$,d% 425IF(Na%AND-1048576)<>-1048576ERROR254,FNmsg_1("FA3",c$) 430CASE(Na%AND1048320)>>8OF 435WHEN4091 440WHEN4092:IFVa%<Ta%THEN 445DIMu%Oa%:b%(Va%)=u%:b$(Va%)=c$:SYS8,16,f$,u%:Va%+=1 450ENDIF 455OTHERWISE:ERROR254,FNmsg_1("FA3",c$) 460ENDCASE 465ENDPROC 470DEFPROCDa(c$,RETURNZa%):LOCALd%,Na%,f$,h%,_a%,`a%,H%:LOCALab%:f$="Printers:"+c$+".Resources.Support":SYS8,17,f$TOd%,,Na%:IFd%<>1SYS8,19,f$,d% 475IF(Na%AND-1048576)<>-1048576ERROR254,FNmsg_1("FA3",c$) 480B%=1347769168:C%=60:Za%=USR(P%+12):IFZa%=0ERROR253,FNmsg_1(A%!12,"FA5","PSUP") 485CASE(Na%AND1048320)>>8OF 490WHEN4091:Za%!24=1 495WHEN4092:Za%!24=0 500OTHERWISE:B%=1347769168:C%=Za%:CALLP%+16:ERROR254,FNmsg_1(A%!12,"FA3",c$) 505ENDCASE 510Za%!0=0:$q%=c$:B%=q%:C%=2:Za%!4=USR(P%+28):Za%!8=0:Za%!12=0:SYS8,17,FNg(Za%,"Resources.!Sprites")TOd%:IFd%=1THEN 515SYS131077,"IconSprites "+FNg(Za%,"Resources.!Sprites")TOC%;d%:IF(d%AND1)!C%=253:SYS43,C% 520ENDIF 525SYS8,17,FNg(Za%,"Resources.Messages")TOd%:IFd%=1THEN 530PROCaa(FNg(Za%,"Resources.Messages"),d%):Za%!16=d% 535ELSE:Za%!16=0 540ENDIF 545SYS8,17,FNg(Za%,"Resources.Templates")TOd%:IFd%<>1ERROR254,FNmsg_1(A%!12,"FA2",c$) 550PROCFa(FNg(Za%,"Resources.Templates"),FNg(Za%,"Resources.Template3D")):d%=0:`a%=Za%+20:REPEAT:PROCGa("",d%,c$):IFd%THEN 555PROCl("",c$,1,h%):B%=1145981271:C%=16+1+LENc$:_a%=USR(P%+12):IF_a%=0ERROR253,FNmsg_1(A%!12,"FA5","WIND") 560_a%!0=0:_a%!4=h%:_a%!8=0:_a%!12=0:$(_a%+16)=c$:!`a%=_a%:`a%=_a%+0 565ENDIF 570UNTILd%=0:PROCHa:PROCc(Za%,0,-1,0):IFNOTFNk(FNg(Za%,"Template"))ERROR254,FNmsg_1(A%!12,"OK1a",$Za%!4) 575PROCIa(Za%):PROCm:IFha%THEN 580IFNOTFNk(FNO(Za%,h$,"PrData"))THEN 585f$="<Printers$Dir>.Remote.ID"+h$+"."+$Za%!4:SYS131080,8,f$:f$="<Printers$Dir>.Remote.ID"+h$+"."+$Za%!4+".PrData":d%=OPENOUT(f$):IFd%=0THEN 590ERROR254,FNmsg_1(A%!12,"OK1",$Za%!4) 595ELSE:ab%=Za%!8:WHILEab%:BPUT#d%,$(ab%+12)+":":BPUT#d%,"#":ab%=ab%!0:ENDWHILE:CLOSE#d%:SYS8,18,f$,4038:IFNOTFNk(FNO(Za%,h$,"PrData"))ERROR254,FNmsg_1(A%!12,"OK1",$Za%!4) 600ENDIF 605ENDIF 610ELSE:IFNOTFNk(FNg(Za%,"PrData"))ERROR254,FNmsg_1(A%!12,"OK1",$Za%!4) 615ENDIF 620PROCJa(Za%):PROCm:PROCO(FNg(Za%,"Resources.PaperRO"),0):IFra%THEN 625H%=ra%:WHILEH%!0:H%=H%!0:ENDWHILE:H%!0=Za% 630ELSE:ra%=Za% 635ENDIF 640ENDPROC 645DEFPROCKa:LOCALz%,H%,t%:ea%=-1:z%=A%!48:WHILEz%:H%=z%!4:IFH%!24AND8THEN 650t%=10*H%?(24+1):IFea%=-1ea%=t%ELSEIFt%<ea%ea%=t% 655z%!56=t% 660ELSE:z%!56=-1 665ENDIF 670z%=z%!0:ENDWHILE:SYS66TOja%:ENDPROC 675DEFFNw:LOCALca$,f%,bb%,s$:LOCALz%,H%,c$:ca$=FNtask_read_env("Wimp$ScrapDir",ba%):IFca$="":=0 680IFca$<>ba$THEN 685SYS131080,8,"<Wimp$ScrapDir>.Printers"TObb%;f%:IF(f%AND1)THEN 690bb%+=4:CALLZ%,bb%,s$:PROCb(FNmsg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) 695ELSE:ba$=ca$:IFGa%THEN 700SYS131080,8,"<Wimp$ScrapDir>.Printers.RemQueue"TObb%;f%:IF(f%AND1)=0SYS131080,8,"<Wimp$ScrapDir>.Printers.RemSpool"TObb%;f% 705IF(f%AND1)THEN 710bb%+=4:CALLZ%,bb%,s$:PROCb(FNmsg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) 715ENDIF 720ENDIF 725z%=A%!48:WHILEz%:IFz%!24AND(1<<16)THEN 730IF(z%!40=0)THEN 735H%=z%!4:c$=$(H%!4) 740ELSE:c$=$(z%!40) 745ENDIF 750PROCLa (z%) 755ENDIF 760z%=z%!0:ENDWHILE 765ENDIF 770ENDIF 775=-1 780DEFPROCAa:LOCALc%,d%,s$,J%,c$,H%,cb%,t%,db%,eb%,fb%,gb%:LOCALhb%,ib%,R%,jb%,kb%,lb%,k$,z%,mb%,nb%,da$,p%,ob%,s$,pb%:LOCALkb%,qb%:rb%=FNr(FNmsg_0(A%!12,"NNE"),"s"+FNmsg_0(A%!12,"IC"),-5,251658240):sb%=-1:IFha%THEN 785s$="<Printers$Dir>.Remote.ID"+h$+".Settings":SYS8,17,s$TOc% 790ELSE:SYS8,17,"<Printers$Dir>.Settings"TOc% 795ENDIF 800IFc%=1THEN 805IFha%THEN 810IFNOTFNk (s$)ERROR254,FNmsg_0(A%!12,"OKD") 815ELSE:IFNOTFNk("<Printers$Dir>.Settings")ERROR254,FNmsg_0(A%!12,"OKD") 820ENDIF 825J%=FNb("fv:"):IFJ%=0THEN 830PROCj(FNmsg_0(A%!12,"OKV"),1) 835ELSE:IFFNc($J%)<>1THEN 840PROCj(FNmsg_0(A%!12,"OKV"),1) 845ELSE:PROCP:REPEAT:J%=FNb("cl:"):PROCMa:hb%=0:ib%=FNb("fg:"):IFib%THEN 850hb%=FNc ($ib%) 855ENDIF 860db%=FNb("sn:"):IFdb%c$=$db%ELSEc$="" 865PROCNa:IF(J%>0)AND((hb%AND(1<<17))=0)AND(ib%>0)THEN 870d%=INSTR($J%,":"):IFd%=0d%=LEN$J%+1 875s$=MID$($J%,d%+1):$J%=LEFT$($J%,d%-1):H%=ra%:eb%=0:WHILEH%ANDNOTeb%:IF$H%!4=$J%eb%=-1 880IFNOTeb%H%=H%!0 885ENDWHILE:IFNOTeb%THEN 890PROCOa:PROCCa($J%):PROCDa($J%,H%):PROCPa:eb%=-1 895ENDIF 900IFNOTeb%THEN 905db%=FNb("nm:"):IFdb%c$=$db%ELSEc$="" 910PROCb(FNmsg_2(A%!12,"WA1",$J%,c$)) 915ELSE:PROCQa(H%) 920ENDIF 925ENDIF 930UNTILJ%=0:PROCQ:REPEAT:J%=FNb("cl:"):kb%=!tb%:qb%=ub%:PROCP:hb%=0:ib%=FNb("fg:"):IFib%THEN 935hb%=FNc ($ib%) 940ENDIF 945db%=FNb("sn:"):IFdb%c$=$db%ELSEc$="" 950PROCQ:IF(J%>0)AND((hb%AND(1<<17))>0)AND(ib%>0)THEN 955jb%=0:R%=Ha%:WHILER%ANDNOTjb%:IFc$=$R%!4THEN 960jb%=-1 965ELSE:R%=R%!0 970ENDIF 975ENDWHILE:IFNOTjb%ORNOTGa%THEN 980p%=INSTR($J%,":"):IFp%=0THEN 985p%=LEN$J% 990ENDIF 995PROCRa (c$,MID$($t%,1,p%-1)," ") 1000ELSE:IFhb%AND1THEN 1005PROCP:z%=FNx (R%,hb%,-1,0,gb%):PROCQ:PROCP:!tb%=kb%:ub%=qb%:PROCSa (z%):PROCQ:PROCTa (Ha%,$R%!4):IFhb%AND2THEN 1010z%!24=z%!24OR2 1015ELSE:z%!24=z%!24ANDNOT2 1020ENDIF 1025ENDIF 1030ENDIF 1035ENDIF 1040UNTILJ%=0 1045ENDIF 1050ENDIF 1055PROCm 1060ENDIF 1065PROCw(A%!48,-5,0):ob%=0:z%=A%!48:WHILEz%:IFz%!24AND2THEN 1070ob%=-1:fb%=z%:z%=0 1075ELSE:z%=z%!0 1080ENDIF 1085ENDWHILE:z%=A%!48:IF(NOTob%)AND(z%)THEN 1090PROCselect_printer (z%,-1,0) 1095ELSE:IFob%ANDfb%THEN 1100PROCselect_printer (fb%,-1,0) 1105ENDIF 1110ENDIF 1115ENDPROC 1120DEFPROCQa(H%):LOCALJ%,S%,z%,d%,N%,h%,X$,vb%:J%=FNe("nm:"):X$=$J%:IFH%!44>100THEN 1125PROCb(FNmsg_1(A%!12,"WA7",X$)):ENDPROC 1130ENDIF 1135vb%=H%!12:S%=vb%!4:WHILES%>0:IF$S%!8=X$THEN 1140S%!(S%!4*4+8)+=1:S%=-1 1145ELSE:S%=S%!0 1150ENDIF 1155ENDWHILE:IFS%=0THEN 1160PROCb(FNmsg_1(A%!12,"WA8",X$)):ENDPROC 1165ENDIF 1170B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR253,FNmsg_1(A%!12,"FA5","PRNT") 1175B%=J%:C%=2:z%!8=USR(P%+28):z%!0=0:z%!4=H%:IFH%!24AND8z%!56=10*H%?(24+1)ELSEz%!56=-1 1180IFH%!24AND4THEN 1185h%=FNc($FNe("cn:")):B%=1413697091:C%=h%*4:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 1190z%!12=N%:IF0<=h%-1THEN 1195FORd%=0TOh%-1:J%=FNd:IFJ%THEN 1200T%=FNa(J%,"nl:"):IFT%THEN 1205N%!(d%*4)=0 1210ELSE:T%=FNa(J%,"in:"):IFT%THEN 1215N%!(d%*4)=FNstore_integer(FNc($T%)) 1220ELSE:T%=FNa(J%,"st:"):IFT%THEN 1225B%=T%:C%=2:cb%!(d%*4)=USR(P%+28) 1230ELSE:T%=FNa(J%,"s0:"):IFT%THEN 1235B%=T%:C%=3:cb%!(d%*4)=USR(P%+28) 1240ELSE:T%=FNa(J%,"gs:"):IFT%THEN 1245B%=T%:C%=4:cb%!(d%*4)=USR(P%+28) 1250ELSE:T%=FNa(J%,"pt:"):IFT%THEN 1255B%=1381257040:C%=4:N%!(d%*4)=USR(P%+12):IFN%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 1260!N%!(d%*4)=FNF($T%,0) 1265ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 1270ENDIF 1275ENDIF 1280ENDIF 1285ENDIF 1290ENDIF 1295ENDIF 1300ENDIF 1305NEXT 1310ENDIF 1315ELSE:B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 1320z%!12=N%:N%!0=FNc($FNe("ct:")):N%!4=FNc($FNe("bd:")):IFNOTFNPAND(N%?4>15)THEN 1325PROCj(FNmsg_1(A%!12,"OKAM",FNmsg_0(A%!12,"BR"+STR$(N%?4))),1):N%?4=0 1330ENDIF 1335N%!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 1340N%?6=FNc($J%) 1345ELSE:N%?6=0 1350ENDIF 1355CASEN%!0OF 1360WHEN4:IFNOTFNsTHEN 1365N%!0=0:PROCb(FNmsg_2(A%!12,"WA9",$z%!8,FNmsg_0(A%!12,"CN4"))) 1370ENDIF 1375WHEN6:IFNOTFNyTHEN 1380N%!0=0:PROCb(FNmsg_2(A%!12,"WA9",$z%!8,FNmsg_0(A%!12,"CN6"))) 1385ENDIF 1390ENDCASE 1395ENDIF 1400h%=FNc($FNe("cs:")):B%=1195789891:C%=h%*4:cb%=USR(P%+12):IFcb%=0ERROR253,FNmsg_1(A%!12,"FA5","CNFG") 1405z%!16=cb%:IF0<=h%-1THEN 1410FORd%=0TOh%-1:J%=FNd:IFJ%THEN 1415T%=FNa(J%,"nl:"):IFT%THEN 1420cb%!(d%*4)=0 1425ELSE:T%=FNa(J%,"in:"):IFT%THEN 1430cb%!(d%*4)=FNstore_integer(FNc($T%)) 1435ELSE:T%=FNa(J%,"st:"):IFT%THEN 1440B%=T%:C%=2:cb%!(d%*4)=USR(P%+28) 1445ELSE:T%=FNa(J%,"s0:"):IFT%THEN 1450B%=T%:C%=3:cb%!(d%*4)=USR(P%+28) 1455ELSE:T%=FNa(J%,"gs:"):IFT%THEN 1460B%=T%:C%=4:cb%!(d%*4)=USR(P%+28) 1465ELSE:T%=FNa(J%,"pt:"):IFT%THEN 1470B%=1381257040:C%=4:cb%!(d%*4)=USR(P%+12):IFcb%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 1475!cb%!(d%*4)=FNF($T%,0) 1480ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 1485ENDIF 1490ENDIF 1495ENDIF 1500ENDIF 1505ENDIF 1510ENDIF 1515ENDIF 1520NEXT 1525ENDIF 1530z%!20=-1:z%!24=FNc($FNe("fg:")):z%!28=-1:z%!32=0:J%=FNe("pn:"):d%=ia%:WHILEd%:IF$d%!4=$J%THEN 1535z%!36=d%:d%=0 1540ELSE:d%=d%!0:IFd%=0THEN 1545d%=ia%:z%!36=d%:PROCb(FNQ(A%!12,"WA11",$J%,$d%!4,X$)):d%=0 1550ENDIF 1555ENDIF 1560ENDWHILE:C%=2:B%=FNe("sn:"):z%!40=USR(P%+28):B%=FNe("ic:"):z%!44=USR(P%+28):IFH%!32AND4z%!48=FNGELSEz%!48=0 1565z%!52=0:IFz%!24AND1THEN 1570PROCUa(z%):IFz%!24AND2THEN 1575PROCselect_printer(z%,-1,0) 1580ENDIF 1585ENDIF 1590IFz%!24AND(1<<16)ANDGa%THEN 1595PROCLa (z%) 1600ENDIF 1605d%=A%+48:WHILE!d%:d%=!d%+0:ENDWHILE:!d%=z%:sa%+=1:PROCKa:ENDPROC 1610DEFFNe(ea$):LOCALJ%:J%=FNb(ea$):IFJ%=0PROCR(FNmsg_1(A%!12,"OKG",ea$)) 1615=J% 1620DEFPROCR(e$):PROCS(FNmsg_1(A%!12,"OKE",e$)):ENDPROC 1625DEFFNg(H%,s$):="Printers:"+$H%!4+"."+s$ 1630DEFFNz(h%):LOCALp%:IFh%=-2THEN=-1 1635IFh%=wb%THEN=-1 1640IFh%=xb%THEN=-1 1645IFh%=yb%THEN=-1 1650IFh%=zb%THEN=-1 1655IFh%=Ab%THEN=-1 1660IFh%=A%!40THEN=-1 1665IFh%=Q%THEN=-1 1670IFh%=Bb%THEN=-1 1675IFh%=Cb%THEN=-1 1680p%=A%!48:WHILEp%:IFp%!48=h%THEN=-1 1685p%=p%!0:ENDWHILE:=0 1690DEFPROCza:LOCALi%,fa$,ga$,Db%,Fb%,Gb%,Hb%,j%:PROCFa("Printers:Templates","Printers:Template3D"):PROCl("","info",1,Cb%):PROCl("","prntctrl",1,Bb%):PROCl("","connections",1,Q%):PROCl("","queue",1,A%!40):PROCl("","query",1,Ab%) 1695PROCl("","papersize",1,zb%):PROCl("","howquery",1,yb%):PROCl("","shutdown",1,xb%):PROCl("","save",1,wb%):PROCHa:PROCicon_write(Cb%,3,FNmsg_0(A%!12,"VSN")):FORj%=0TO5:B%=1178878793:C%=40:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","ICDF") 1700!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") 1705!i%=Bb%:i%!4=j%:SYS262350,,i%:IFj%=4THEN 1710SYS262340,,i% 1715ELSE:B%=1482184792:C%=i%!36+1:i%!28=USR(P%+12):IFi%!28=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 1720ENDIF 1725a%(j%)=i%+8:NEXT:FORj%=0TO3:a%(j%)!16=a%(4)!16:NEXT:FORj%=0TO3:PROCicon_write(Bb%,j%,FNmsg_0(A%!12,FNicon_read(Bb%,j%))):NEXT:ENDPROC 1730DEFFNba(a,b):IFa>bTHEN=aELSE=b 1735DEFFNG:LOCALp%:PROCFa("Printers:Templates","Printers:Template3D"):PROCl("","pause",1,p%):PROCHa:=p% 1740DEFPROCVa(Ib%):!O%=Ib%:SYS262348,,O%OR1:B%=1179014466:C%=O%!76:CALLP%+16:SYS262339,,O%:ENDPROC 1745DEFPROCoa:LOCALJb%,i%,t$,ha$,z%,H%,Kb%:LOCALR%:CASE!q%OF 1750WHENA%!40:SYS262344,,q%TOJb%:B%=q%:C%=Jb%:CALLP%+36 1755WHENBb%:SYS262344,,q%TOJb%:WHILEJb%:FORi%=0TO3:a%(i%)!4=a%(4)!4:a%(i%)!12=a%(4)!12:NEXT:z%=A%!48:Lb%=0:WHILEz%:Lb%+=1:IFz%!40THEN 1760$a%(0)!20=$z%!40 1765ELSE:?a%(0)!20=13 1770ENDIF 1775$a%(1)!20=$z%!8:t$=STR$!(z%!12+0):ha$=FNmsg_0(A%!12,"IC"+t$):IFha$="IC"+t$ha$=FNmsg_1(A%!12,"ICx",t$) 1780$a%(2)!20=ha$:IFz%!24AND(1<<16)THEN 1785t$="SHA" 1790ELSE:IFz%!24AND1THEN 1795t$="ACT" 1800ELSE:t$="INA" 1805ENDIF 1810ENDIF 1815$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:R%=Ha%:WHILER%:$a%(0)!20=$R%!4:$a%(1)!20=$R%!8:$a%(2)!20=FNmsg_0 (A%!12,"IC9"):IFR%!20>0THEN 1820$a%(3)!20=FNmsg_0 (A%!12,"UNA") 1825ELSE:$a%(3)!20=FNmsg_0 (A%!12,"INA") 1830ENDIF 1835FORi%=0TO3:SYS262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):NEXT:R%=R%!0:ENDWHILE:SYS262346,,q%TOJb%:ENDWHILE 1840OTHERWISE:PROCG(!q%,Kb%,H%,z%):PROCc(H%,z%,1,q%) 1845ENDCASE 1850ENDPROC 1855DEFPROCWa(z%):LOCALy%,s$:IFz%!40s$=$z%!40ELSEs$=$z%!8 1860PROCXa(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 1865DEFPROCs(Ib%):!O%=24:O%!12=0:O%!16=262347:O%!20=Ib%:SYS262375,17,O%,0:ENDPROC 1870DEFPROCe:LOCALi%,j%,z%,H%,Kb%:PROCs(!q%):IFFNz(!q%)THEN 1875SYS262342,,q% 1880ELSE:PROCG(!q%,Kb%,H%,z%):PROCc(H%,z%,3,q%) 1885ENDIF 1890ENDPROC 1895DEFPROCfree_structure(p%):LOCALi%:IFp%=0ENDPROC 1900CASEp%!-4OF 1905WHEN1146377036:WHILEp%:IF0<=p%!4-1THEN 1910FORi%=0TOp%!4-1:PROCfree_structure(p%!(i%*4+8)):NEXT 1915ENDIF 1920i%=p%!0:B%=1146377036:C%=p%:CALLP%+16:p%=i%:ENDWHILE 1925WHEN1280266050:PROCfree_structure(p%!0):PROCfree_structure(p%!4):B%=1280266050:C%=p%:CALLP%+16 1930WHEN1196707401,1196577875,810701907,1381258055,1381257040:B%=p%!-4:C%=p%:CALLP%+16 1935WHEN1380010051:WHILEp%:i%=!p%:B%=1380010051:C%=p%:CALLP%+16:p%=i%:ENDWHILE 1940OTHERWISE:ERROR253,FNmsg_1(A%!12,"FAA",STR$~(p%-4)) 1945ENDCASE 1950ENDPROC 1955DEFPROCua(r%):LOCALs$,z%,H%,Kb%,Mb%,i%:Mb%=q%!4:CASEq%!16OF 1960WHEN0:PROCH:PROCx 1965WHEN1:PROCZa 1970WHEN2:IFNOTq%!36THEN 1975SYS262356,,-1:i%=q%+44:CALLZ%,i%,s$:PROCicon_write(Q%,30,s$) 1980ENDIF 1985WHEN3:PROC_a 1990WHEN5 1995WHEN8:IFA%!32THEN 2000IF!q%<>20THEN 2005IF(q%!20AND1)=0Nb%=1ELSENb%=2 2010ELSE:Nb%=1 2015ENDIF 2020q%!12=q%!8:SYS262375,19,q%,Mb%:A%!20=A%!20OR1:PROC`a(xb%) 2025ENDIF 2030WHEN10:BPUT#q%!20,"/"+FNtask_read_env("Printers$Dir",O%) 2035WHEN11:z%=A%!48:WHILEz%:IF(z%!24AND8)<>0ANDz%<>oa%THEN 2040r%=z%!12:IFr%!0=q%!20ANDq%!24<=0THEN 2045s$=FNmsg_0(A%!12,"INU"):!q%=32+LENs$ANDNOT3:q%!12=q%!8:q%!16=12:$(q%+28)=s$+CHR$0:SYS262375,17,q%,Mb%:z%=0 2050ENDIF 2055ENDIF 2060IFz%z%=z%!0 2065ENDWHILE 2070WHEN12:na%=2 2075WHEN1282:IFFNz(q%!32)THEN 2080PROCab 2085ELSE:PROCG(q%!32,Kb%,H%,z%):IFKb%THEN 2090PROCc(H%,z%,r%,q%) 2095ELSE:IFNOTq%!36THEN 2100IFua%PROCc (ua%!4,ua%,r%,q%)ELSEPROCab 2105ENDIF 2110ENDIF 2115ENDIF 2120WHEN262345:IFq%!20=xb%THEN 2125IFA%!32>0A%!20=A%!20ANDNOT1 2130ELSE:PROCbb 2135ENDIF 2140WHEN524609:A%!36=0 2145WHEN524610:IFV%THEN 2150q%!20=-2:q%!24=V%!20:PROCZa 2155ELSE:z%=A%!48:IFz%THEN 2160q%!20=1:s$=FNmsg_0(A%!12,"OKU")+CHR$0 2165ELSE:q%!20=2:s$=FNmsg_0(A%!12,"OKW")+CHR$0 2170ENDIF 2175!q%=28+LENs$ANDNOT3:q%!12=q%!8:q%!16=524612:$(q%+24)=s$+CHR$0:SYS262375,17,q%,Mb% 2180ENDIF 2185WHEN524611:IFq%!4<>Ob%THEN 2190IFq%!0=20THEN 2195PROCH:PROCx 2200ELSE:IFq%!12=ga%THEN 2205PROCb(FNmsg_0(A%!12,"FAJ")):PROCH:PROCx 2210ELSE:q%!12=q%!8:q%!20=34:SYS262375,17,q%,Mb% 2215ENDIF 2220ENDIF 2225ENDIF 2230WHEN524614:qa%=2 2235WHEN524626:IFV%THEN 2240PROCselect_printer(V%,-1,0) 2245ENDIF 2250OTHERWISE:IFFNw 2255PROCw(V%,r%,q%) 2260ENDCASE 2265ENDPROC 2270DEFPROCab:LOCALs$,z%,F$:CASEq%!32OF 2275WHEN-2:IFA%!48=0THEN 2280PROCinteractive_help(FNmsg_0(A%!12,"ICON0")):ENDPROC 2285ENDIF 2290PROCy(q%!36,z%):IFz%!40s$=$z%!40ELSEs$=$z%!8 2295PROCinteractive_help(FNmsg_1(A%!12,"ICON1",s$)) 2300WHENwb%:s$=FNmsg_0(A%!12,"SAVE"+STR$q%!36):IFs$="SAVE"+STR$q%!36s$=FNmsg_0(A%!12,"SAVE") 2305PROCinteractive_help(s$) 2310WHENxb%:s$=FNmsg_0(A%!12,"SHTDWN"+STR$q%!36):IFs$="SHTDWN"+STR$q%!36s$=FNmsg_0(A%!12,"SHTDWN") 2315PROCinteractive_help(s$) 2320WHENyb%:s$=FNmsg_0(A%!12,"HWQRY"+STR$q%!36):IFs$="HWQRY"+STR$q%!36s$=FNmsg_0(A%!12,"HWQRY") 2325PROCinteractive_help(s$) 2330WHENzb%:s$=FNmsg_0(A%!12,"PAPER"+STR$q%!36):IFs$="PAPER"+STR$q%!36s$=FNmsg_0(A%!12,"PAPER") 2335PROCinteractive_help(s$) 2340WHENAb%:s$=FNmsg_0(A%!12,"QUERY"+STR$q%!36):IFs$="QUERY"+STR$q%!36s$=FNmsg_0(A%!12,"QUERY") 2345PROCinteractive_help(s$) 2350WHENA%!40:PROCinteractive_help(FNmsg_0(A%!12,"QUEUE")) 2355WHENQ%:F$="CNCT"+STR$q%!36:IFq%!36=13THEN 2360IFFNicon_set(Q%,13)F$+="b"ELSEF$+="a" 2365ENDIF 2370IFq%!36=35THEN 2375IFFNicon_set(Q%,35)F$+="b"ELSEF$+="a" 2380ENDIF 2385IFq%!36=37THEN 2390IFFNicon_set(Q%,37)F$+="b"ELSEF$+="a" 2395ENDIF 2400s$=FNmsg_0(A%!12,F$):IFs$=F$s$=FNmsg_0(A%!12,"CNCT") 2405PROCinteractive_help(s$) 2410WHENBb%:PROCinteractive_help(FNmsg_0(A%!12,"PRCTRL")) 2415WHENCb%:PROCinteractive_help(FNmsg_0(A%!12,"INFO")) 2420OTHERWISE:SYS262388,1,W%,q%!32,q%!36:CASEJ$OF 2425WHEN"ME1":IF!W%<>2THEN 2430PROCinteractive_help(FNmsg_0(A%!12,"HME1-"+STR$!W%)) 2435ELSE:IFA%!44=0THEN 2440PROCinteractive_help(FNmsg_0(A%!12,"HME1-2a")) 2445ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HME1-2")) 2450ENDIF 2455ENDIF 2460WHEN"ME2","ME3","ME4","ME5","ME6","MP1":PROCinteractive_help(FNmsg_0(A%!12,"H"+J$)) 2465WHEN"MQ1":IFFNH(Pb%,!W%)THEN 2470IF!W%>3ANDxa%=0THEN 2475PROCinteractive_help(FNmsg_0(A%!12,"SMQ1-7")) 2480ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMQ1-"+STR$(!W%))) 2485ENDIF 2490ELSE:IF!W%<>4THEN 2495PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-"+STR$(!W%))) 2500ELSE:IFxa%!12THEN 2505PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-4a")) 2510ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMQ1-4b")) 2515ENDIF 2520ENDIF 2525ENDIF 2530WHEN"MC1":IFFNH(Pb%,!W%)THEN 2535IF!W%=6THEN 2540PROCinteractive_help(FNmsg_0(A%!12,"HMC1S-6")):ENDPROC 2545ENDIF 2550SYS262358,Bb%,O%,1<<21,1<<21:IF!O%=-1THEN 2555PROCinteractive_help(FNmsg_0(A%!12,"SMC1-2")) 2560ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMC1-0")) 2565ENDIF 2570ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMC1-"+STR$!W%)) 2575ENDIF 2580WHEN"MC1s":IFFNH(Pb%,!W%)THEN 2585IF!W%=6THEN 2590PROCinteractive_help(FNmsg_0(A%!12,"HMC1S-6")):ENDPROC 2595ENDIF 2600SYS262358,Bb%,O%,1<<21,1<<21:IF!O%=-1THEN 2605PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-2")) 2610ELSE:PROCinteractive_help(FNmsg_0(A%!12,"SMC1s-0")) 2615ENDIF 2620ELSE:PROCinteractive_help(FNmsg_0(A%!12,"HMC1s-"+STR$!W%)) 2625ENDIF 2630ENDCASE 2635ENDCASE 2640ENDPROC 2645DEFPROCinteractive_help(m$):LOCALMb%:!q%=24+LENm$ANDNOT3:q%!12=q%!8:q%!16=1283:$(q%+20)=m$+CHR$0:Mb%=q%!4:SYS262375,17,q%,Mb%:ENDPROC 2650DEFPROCZa:LOCALs$,i%,y%,z%,K%:IFq%!20=A%!40THEN 2655!W%=A%!40:SYS262347,,W%:B%=q%!32-W%!16+W%!24:y%=USR(P%+44):i%=A%!16:z%=!i%:K%=i%!4:IFz%THEN 2660q%!20=-2:q%!24=z%!20 2665ENDIF 2670ELSE:PROCy(q%!24,z%) 2675ENDIF 2680IFq%!20<>-2ERROR254,FNmsg_0(A%!12,"OKN") 2685i%=q%+44:CALLZ%,i%,s$:i%=LENs$:WHILEi%>0:IFMID$(s$,i%,1)="."ORMID$(s$,i%,1)=":"THEN 2690s$=MID$(s$,i%+1):i%=0 2695ENDIF 2700i%-=1:ENDWHILE:aa$=s$:A%!36=0:Aa%=q%!4:s$=FNl(-1):IF(z%!32)<>0OR(z%!24AND36)<>0THEN 2705SYS131108,"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%,Aa%:Ba%=q%!8 2710ELSE:q%!12=q%!8:SYS262375,19,q%,Aa%:PROCselect_printer(z%,0,0):SYS36,"Printer$Temp",s$,LENs$:q%!16=524608:SYS262375,18,q%,Aa%:PROCcb (Aa%,aa$) 2715ENDIF 2720ENDPROC 2725DEFFNl(Qb%):LOCALc%:IFNOTFNwTHEN 2730IFQb%THEN 2735ERROR254,FNmsg_0(A%!12,"OKAO") 2740ELSE:PROCj(FNmsg_0(A%!12,"OKAO"),1):="" 2745ENDIF 2750ENDIF 2755REPEAT:Da%+=1:SYS8,17,"<Wimp$ScrapDir>.Printers."+STR$Da%TOc%:UNTILc%=0:=FNR("<Wimp$ScrapDir>.Printers."+STR$Da%) 2760DEFPROC_a:LOCALs$,i%,z%,O$,o$,Rb%,Mb%:IFq%!40=4038ANDq%!20=Bb%THEN 2765PROCdb:ENDPROC 2770ENDIF 2775i%=q%+44:CALLZ%,i%,o$:SYS8,17,o$TORb%:IF(Rb%AND2)AND(q%!40<4096)q%!40=4096 2780IFq%!20=A%!40THEN 2785!W%=A%!40:SYS262347,,W%:B%=q%!32-W%!16+W%!24:y%=USR(P%+44):i%=A%!16:z%=!i%:K%=i%!4:IFz%THEN 2790q%!20=-2:q%!24=z%!20 2795ENDIF 2800ENDIF 2805IFq%!20<>-2ERROR254,FNmsg_0(A%!12,"OKN") 2810A%!36=Ba%<>0ANDBa%=q%!12:q%!12=q%!8:q%!16=4:Mb%=q%!4:SYS262375,17,q%,Mb%:Ba%=0:PROCy(q%!24,z%):Rb%=q%!40:IFz%=0THEN 2815IFRb%<>4038ERROR254,FNmsg_0(A%!12,"OKW") 2820PROCdb:ENDPROC 2825ENDIF 2830IFA%!36THEN 2835SYS272000,Aa%TOi%:CALLZ%,i%,O$:o$=aa$:s$=FNtask_read_env("Printer$Temp",O%):IFs$=""i%=q%+44:CALLZ%,i%,s$ 2840ELSE: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) 2845ENDIF 2850PROCeb(A%!36,O$,s$,o$,z%,Rb%):ENDPROC 2855DEFPROCbb:CASEJ$OF 2860WHEN"MQ1":IFwa%THEN 2865IFxa%xa%?11=xa%?11ANDNOT8ELSEwa%!24=wa%!24ANDNOT16 2870PROCf(-1,wa%,xa%):va%=0:wa%=0:xa%=0 2875ENDIF 2880WHEN"MC1","MC1s":SYS262358,Bb%,O%,1<<21,1<<21:IFNOT!O%ANDO%!4=-1ANDta%=0PROCicon_deselect(Bb%,!O%) 2885ENDCASE 2890J$="":ENDPROC 2895DEFPROCva:LOCALs$,z%,K%,N%,Sb%,G$,H%,z$,t%,Na%,Oa%,Tb%,o$:LOCALC$,z%,jb%,w$,c$,A$:CASEq%!16OF 2900WHEN11:na%=1 2905WHEN524608:PROCy(q%!24,z%):IFz%=0ERROR254,FNmsg_0(A%!12,"OKW") 2910K%=z%!32:H%=z%!4:N%=z%!12:IFK%=0AND(z%!24AND36)=0THEN 2915i%=q%+44:CALLZ%,i%,o$:CASEN%!0OF 2920WHEN5:Sb%=(N%?6AND2)<>0 2925WHEN9:Sb%=0 2930OTHERWISE:Sb%=(N%?6AND1)<>0 2935ENDCASE 2940IFSb%THEN 2945g$=FNl(-1):IFN%!0=5THEN 2950SYS36,"PrinterType$5",g$,LENg$:PROCI(5) 2955ELSE:SYS36,"PrinterType$10",g$,LENg$:PROCI(10) 2960ENDIF 2965G$=g$ 2970ENDIF 2975z$=FNl(-1):SYS36,"Printer$Temp",z$,LENz$:q%!0=20:q%!16=524613:SYS262375,18,q%,Aa%:qa%=0:REPEAT:PROCv(ka%):UNTILqa%:b%=(qa%=2):Tb%=q%!4:IFSb%THEN 2980s$=FNm(z%,-1):IFs$<>""THEN 2985PROCb(s$):IFz%!32THEN 2990z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0) 2995ENDIF 3000ENDIF 3005ENDIF 3010IFb%THEN 3015SYS8,17,z$TOt%,,Na%,,Oa%:IFt%THEN 3020s$=z$:SYS8,23,z$TO,,,,,,Rb% 3025ELSE:IFSb%THEN 3030IFN%!0=5THEN 3035PROCfb($N%!16,G$):ENDPROC 3040ELSE:s$=G$:Rb%=H%!28 3045ENDIF 3050ELSE:IFN%!0=9ANDq$<>""THEN 3055c$=$(z%!40):M%=INSTR(c$," "):WHILEM%:MID$(c$,M%,1)=CHR$160:M%=INSTR(c$," ",M%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Ka%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 3060SYS272000,Aa%TOi%:CALLZ%,i%,A$:IFFNA (z%,A$,o$)THEN 3065Ub%=V%!4:SYS131113,25,w$,C$ 3070ELSE:SYS131080,6,w$ 3075ENDIF 3080ENDIF 3085ENDIF 3090PROCselect_printer(V%,0,-1):ENDPROC 3095ENDIF 3100ENDIF 3105SYS272000,Tb%TOO$:i%=LENo$:WHILEi%>0:IFMID$(o$,i%,1)="."ORMID$(o$,i%,1)=":"THEN 3110o$=MID$(o$,i%+1):i%=0 3115ENDIF 3120i%-=1:ENDWHILE:PROCeb(-1,O$,s$,o$,z%,Rb%):ENDPROC 3125ENDIF 3130ENDIF 3135PROCselect_printer(z%,0,-1):SYS36,"Printer$Temp",,-1:s$=FNl(-1):q%!0=48+LENs$ANDNOT3:q%!16=2:q%!36=-1:$(q%+44)=s$+CHR$0:SYS262375,17,q%,Aa%:Ba%=q%!8 3140WHEN524613:qa%=1 3145OTHERWISE:PROCw(V%,19,q%) 3150ENDCASE 3155ENDPROC 3160DEFPROCx:LOCALH%:LOCALz%,c$,Rb%,c$,Vb%,f%,N%:PROCz:IFV%THEN 3165c$=$V%!40:N%=V%!12:H%=V%!4:Rb%=H%!28:IFN%!0=9THEN 3170SYS424578,0,2,c$,0,0TO,,,,,Vb%;f%:IF(Vb%>0)AND((f%AND0)=0)THEN 3175SYS424323,0,Vb%,c$,Rb% 3180ENDIF 3185ENDIF 3190ENDIF 3195IFGa%THEN 3200z%=A%!48:WHILEz%:IF(z%!24)AND(1<<16)THEN 3205IF(z%!40=0)THEN 3210H%=z%!4:c$=$H%!4 3215ELSE:c$=$z%!40 3220ENDIF 3225PROCgb (z%) 3230ENDIF 3235z%=z%!0:ENDWHILE 3240ENDIF 3245SYS131077,"%Wipe <Wimp$ScrapDir>.Printers.* RF~C~V":H%=ra%:WHILEH%:PROC_(H%!16):H%=H%!0:ENDWHILE:PROC_(A%!12):PROCw(0,-2,0):PROChb:ENDPROC 3250DEFPROCra:LOCALH%,z%,Kb%,D$,H$,Wb%:IFNOTFNz(!q%)THEN 3255PROCG(!q%,Kb%,H%,z%):IFz%!40D$=$z%!40ELSED$="" 3260Wb%=V%:PROCc(H%,z%,8,q%):IF$(Kb%+16)="configure"THEN 3265IFz%!40H$=$z%!40ELSEH$="" 3270IFH$<>D$THEN 3275IFNOT(z%!24AND(1<<16))THEN 3280PROCib(z%):PROCi(z%):PROCf(-1,z%,0):IF(H%!24AND4)=0IFFNh(Q%)PROCT(z%) 3285ELSE:PROCb (FNmsg_0(A%!12,"OKAP")):H$=D$:PROCd (1196577875,z%!40):PROCJ (z%!40,D$) 3290ENDIF 3295ENDIF 3300IFz%!20<>-1ANDWb%<>V%THEN 3305PROCselect_printer(Wb%,-1,0) 3310ENDIF 3315ENDIF 3320ELSE:IFq%!24=13THEN 3325CASE!q%OF 3330WHENQ%:PROCjb:IFJ$="ME6"SYS262356,,-1 3335!q%=Q%:PROCe 3340WHENzb%:PROCkb:!q%=zb%:PROCe 3345WHENwb%:SYS262356,,-1:PROCicon_write(Q%,30,FNicon_read(wb%,1)) 3350ENDCASE 3355ELSE:SYS262364,q%!24 3360ENDIF 3365ENDIF 3370ENDPROC 3375DEFPROCU(Xb%):LOCALi%:!W%=Xb%:SYS262348,,W%OR1:i%=W%!88:WHILEi%:PROCicon_deselect(Xb%,i%-1):i%-=1:ENDWHILE:ENDPROC 3380DEFPROCpa:LOCALz%,nb%,K%,Zb%,H%,Kb%,H$,D$,B%,C%,Wb%:LOCALR%:IFFNz(q%!12)=0THEN 3385PROCG(q%!12,Kb%,H%,z%):IFz%!40D$=$z%!40ELSED$="" 3390Wb%=V%:PROCc(Kb%!8,Kb%!12,6,q%):IF$(Kb%+16)="configure"THEN 3395IFz%!40H$=$z%!40ELSEH$="" 3400IFH$<>D$THEN 3405IFNOT(z%!24AND(1<<16))THEN 3410PROCib(z%):PROCi(z%):PROCf(-1,z%,0):IF(H%!24AND4)=0IFFNh(Q%)PROCT(z%) 3415ELSE:PROCb (FNmsg_0(A%!12,"OKAP")):H$=D$:PROCd (1196577875,z%!40):PROCJ (z%!40,D$) 3420ENDIF 3425ENDIF 3430IFz%!20<>-1ANDWb%<>V%THEN 3435PROCselect_printer(Wb%,-1,0) 3440ENDIF 3445ENDIF 3450ELSE:CASEq%!8OF 3455WHEN1024:CASEq%!12OF 3460WHENBb%:IFNOTq%!16THEN 3465IFNOTFNicon_set(q%!12,q%!16)THEN 3470PROCU(q%!12):PROCicon_select(q%!12,q%!16) 3475ENDIF 3480ELSE:PROCU(q%!12) 3485ENDIF 3490ENDCASE 3495WHEN256:CASEq%!12OF 3500WHENBb%:IFNOTq%!16THEN 3505IFFNicon_set(q%!12,q%!16)THEN 3510PROCicon_deselect(q%!12,q%!16) 3515ELSE:PROCicon_select(q%!12,q%!16) 3520ENDIF 3525ENDIF 3530ENDCASE 3535WHEN64:IFq%!12=wb%PROClb(!q%,q%!4) 3540WHEN2:CASEq%!12OF 3545WHEN-2:PROCg("ME1",-1,0) 3550WHENA%!40:PROCg("MQ1",-1,0) 3555WHENBb%:PROCg("MC1s",-1,0) 3560WHENQ%:CASEq%!16OF 3565WHEN8:PROCg("ME2",-1,-1) 3570WHEN11:PROCg("ME3",-1,-1) 3575WHEN14:PROCg("ME4",-1,-1) 3580WHEN16:PROCg("ME5",-1,-1) 3585WHEN20:PROCg("ME6",-1,-1) 3590WHEN32:PROCg("SVE",-1,-1) 3595ENDCASE 3600WHENzb%:IFq%!16=47PROCg("MP1",-1,-1) 3605ENDCASE 3610WHEN4:CASEq%!12OF 3615WHEN-2:PROCmb 3620WHENAb%:pa%=q%!16 3625WHENyb%:pa%=q%!16 3630WHENwb%:IFq%!16=2THEN 3635SYS262356,,-1:PROCicon_write(Q%,30,FNicon_read(wb%,1)) 3640ENDIF 3645WHENxb%:SYS262356,,-1:IFq%!16=3THEN 3650!q%=A%!40:PROCe:PROCH:CASENb%OF 3655WHEN1:SYS262364,508 3660WHEN2:PROCx 3665ENDCASE 3670ELSE:A%!20=A%!20ANDNOT1 3675ENDIF 3680WHENBb%:IFNOTq%!16THEN 3685IFNOTFNicon_set(q%!12,q%!16)THEN 3690PROCU(q%!12):PROCicon_select(q%!12,q%!16) 3695ENDIF 3700PROCt(z%,R%,nb%):IFz%THEN 3705PROCc(z%!4,z%,-3,0):PROCnb(z%,"configure") 3710ENDIF 3715ENDIF 3720WHENQ%:CASEq%!16OF 3725WHEN0,1,2,3,4,33:PROCob 3730WHEN5:PROCjb:!q%=Q%:PROCe 3735WHEN8:PROCg("ME2",-1,-1) 3740WHEN11:PROCg("ME3",-1,-1) 3745WHEN14:PROCg("ME4",-1,-1) 3750WHEN16:PROCg("ME5",-1,-1) 3755WHEN20:PROCg("ME6",-1,-1) 3760WHEN32:PROCg("SVE",-1,-1) 3765WHEN38:!q%=Q%:PROCe 3770ENDCASE 3775WHENzb%:CASEq%!16OF 3780WHEN42:PROCkb:!q%=zb%:PROCe 3785WHEN33:PROCpb:!q%=zb%:PROCe 3790WHEN48:B%=1163547472:C%=Ca%:CALLP%+16:Ca%=0:!q%=zb%:PROCe 3795WHEN23,22:PROCicon_select(zb%,q%!16):PROCqb 3800WHEN47:PROCg("MP1",-1,-1) 3805ENDCASE 3810OTHERWISE:z%=A%!48:WHILEz%:IFz%!48=q%!12THEN 3815K%=z%!32:Zb%=K%!44:IFZb%THEN 3820IFZb%!40THEN 3825IFq%!16=4THEN 3830PROCn(z%,K%,-1) 3835ELSE:z%!24=z%!24ANDNOT36:Zb%!40=0:PROCi(z%):PROCf(-1,z%,0):!q%=z%!48:PROCe 3840ENDIF 3845ENDIF 3850ENDIF 3855z%=0 3860ELSE:z%=z%!0 3865ENDIF 3870ENDWHILE 3875ENDCASE 3880WHEN1:CASEq%!12OF 3885WHEN-2:PROCmb 3890WHENQ%:CASEq%!16OF 3895WHEN0,1,2,3,4,33:PROCob 3900WHEN5:PROCjb 3905ENDCASE 3910WHENzb%:CASEq%!16OF 3915WHEN42:PROCkb 3920WHEN33:PROCpb 3925WHEN23,22:PROCicon_select(zb%,q%!16):PROCqb 3930ENDCASE 3935ENDCASE 3940ENDCASE 3945ENDIF 3950ENDPROC 3955DEFPROCob:LOCALc%,h%,i%,n%:c%=-1:IFFNicon_set(Q%,1)THEN 3960PROCicon_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) 3965ELSE: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) 3970ENDIF 3975IFFNicon_set(Q%,2)THEN 3980PROCicon_unshade(Q%,25):PROCicon_unshade(Q%,20):c%=25 3985ELSE:PROCicon_shade(Q%,25):PROCicon_shade(Q%,20) 3990ENDIF 3995IFFNicon_set(Q%,3)THEN 4000PROCicon_unshade(Q%,26):PROCicon_unshade(Q%,27):PROCicon_unshade(Q%,28):PROCicon_unshade(Q%,29):c%=26 4005ELSE:PROCicon_shade(Q%,26):PROCicon_shade(Q%,27):PROCicon_shade(Q%,28):PROCicon_shade(Q%,29) 4010ENDIF 4015IFFNicon_set(Q%,4)THEN 4020PROCicon_unshade(Q%,30):PROCicon_unshade(Q%,32):PROCicon_unshade(Q%,35):c%=30 4025ELSE:PROCicon_shade(Q%,30):PROCicon_shade(Q%,32):PROCicon_shade(Q%,35) 4030ENDIF 4035IFc%=-1THEN 4040PROCcaret_info(h%,i%,n%):IFh%=Q%SYS262354,-1 4045ELSE:PROCcaret_set(Q%,c%) 4050ENDIF 4055ENDPROC 4060DEFPROCy(Ib%,RETURNz%):z%=A%!48:WHILEz%:IFz%!20=Ib%ENDPROC 4065z%=z%!0:ENDWHILE:ENDPROC 4070DEFPROCmb:LOCALz%,_b%,`b%:`b%=INKEY-1:_b%=(q%!8=1):PROCy(q%!16,z%):IFz%THEN 4075IF_b%THEN 4080IF`b%PROCT(z%)ELSEPROCrb 4085ELSE:IF`b%THEN 4090PROCc(z%!4,z%,-3,0):PROCnb(z%,"configure") 4095ELSE:PROCselect_printer(z%,-1,0):IFFNh(Bb%)PROCsb(z%) 4100ENDIF 4105ENDIF 4110ENDPROC 4115ENDIF 4120PROCtb(z%):ENDPROC 4125DEFPROCselect_printer(z%,ac%,bc%):LOCALcc%,i%,s$:cc%=V%:IFNOTbc%V%=z% 4130IFV%=0ENDPROC 4135s$=FNm(V%,0):IFs$<>""THEN 4140IFac%THEN 4145V%!24=V%!24ANDNOT2 4150ENDIF 4155IFV%!32THEN 4160V%!24=V%!24OR4:PROCi(V%):PROCf(-1,V%,0) 4165ENDIF 4170IFV%=cc%THEN 4175PROCicon_deselect(-1,cc%!20):SYS524632,-1:cc%=0 4180ENDIF 4185V%=cc%:PROCb(s$):ENDPROC 4190ENDIF 4195PROCc(V%!4,V%,-6,0):PROCub(V%):PROCz:IFac%THEN 4200IFcc%THEN 4205PROCicon_deselect(-1,cc%!20):cc%!24=cc%!24ANDNOT2 4210ENDIF 4215V%!24=V%!24OR2:PROCicon_select(-1,V%!20):SYS524608TO,,,,i%:IF?i%CALLZ%,i%,s$:SYS36,"Printer$",i%,LENs$ 4220ELSE:V%=cc% 4225ENDIF 4230ENDPROC 4235DEFPROCub(z%):LOCAL`%:`%=z%!36:SYS524612,,`%!8,`%!12,`%!24,`%!16,`%!28,`%!20:ENDPROC 4240DEFPROCz:!ba%=20:ba%!12=0:ba%!16=524615:SYS262375,17,ba%:ENDPROC 4245DEFFNB(dc%,z%):LOCALp$,r%,s$,i%:p$=FNmsg_0(A%!12,"CLM"):!q%=32+LENp$ANDNOT3:q%!12=0:q%!16=11:q%!20=dc%:q%!24=0:$(q%+28)=p$+CHR$0:SYS262375,18,q%:na%=0:oa%=z%:REPEAT:PROCv(ka%):UNTILna%:oa%=0:IFna%=2i%=q%+28:CALLZ%,i%,s$:=s$ 4250="" 4255DEFFNm(z%,ec%):LOCALN%,p$,H%,bb%,f%,s$,fc%:LOCALia$,bb%,hb%,Vb%,c$,M%:FORbb%=0TO255:aa%?bb%=q%?bb%:NEXT:H%=z%!4:N%=z%!12:g$=FNtask_read_env("PrinterType$"+STR$N%!0,ba%):SYS6,204,Fa%:SYS424324:CASEN%!0OF 4260WHEN1:IFNOTec%THEN 4265p$=FNB(1,z%):IFp$<>""THEN=FNmsg_1(A%!12,"OKI",p$) 4270ENDIF 4275fc%=FNn(1):IFfc%=0fc%=3 4280IFz%!24AND128THEN 4285g$="devices#buffer"+STR$fc%+":$."+FNS 4290ELSE:g$="devices#buffer"+STR$fc%+":$.Parallel" 4295ENDIF 4300WHEN2:IFNOTec%THEN 4305p$=FNB(2,z%):IFp$<>""THEN=FNmsg_1(A%!12,"OKJ",p$) 4310ENDIF 4315SYS87,5,N%?4:SYS87,6,N%?4:SYS87,1,N%!8:SYS87,0,N%?5,NOT1:SYS6,204,1TO,Fa%:fc%=FNn(2):IFfc%=0fc%=3 4320g$="devices#buffer"+STR$fc%+":$.Serial" 4325WHEN4:IF$N%!12=""THEN=FNmsg_0(A%!12,"OKAG") 4330g$="NetPrint#"+$N%!12+":":SYS263872:SYS262659,$N%!12:SYS263873 4335WHEN5:g$=$N%!16:IFg$=""g$="null:" 4340SYS131080,17,g$TObb%;f%:IFf%AND1bb%=0 4345IFbb%THEN 4350SYS131085,67,g$TObb%;f%:IF(f%AND1)=0CLOSE#bb%:SYS131080,18,g$,H%!28 4355ELSE:SYS131080,11,g$,H%!28TObb%;f%:IF(f%AND1)THEN 4360bb%+=4:CALLZ%,bb%,s$:=s$ 4365ENDIF 4370ENDIF 4375WHEN6:s$=FNca(N%,g$):IFs$<>""THEN=s$ 4380WHEN8:SYS131107,"PrinterType$8",O%,256,,3TO,,f%:O%?f%=13:g$=$O%:IFg$=""g$="null:" 4385WHEN9:IFGa%THEN 4390c$=$z%!40:SYS424578,0,2,c$,0,0TObb%,,,gc%,,Vb%;hb%:IF(hb%AND1)THEN 4395=FNmsg_1 (A%!12,"OKAR",c$) 4400ENDIF 4405SYS424323,1,Vb%,c$TObb%;hb%:IF(hb%AND1)THEN 4410=FNmsg_1 (A%!12,"OKAR",c$) 4415ENDIF 4420q$="Share::_S"+FNt(Vb%)+".":ia$="Share::_S"+FNt(Vb%)+".RemSpool."+h$:SYS293254:SYS131080,8,ia$,,,0TObb%;hb%:SYS293253:IF(hb%AND1)THEN 4425=FNmsg_1 (A%!12,"OKAR",c$) 4430ENDIF 4435ia$="Share::_S"+FNt(Vb%)+".RemQueue."+h$:SYS293254:SYS131080,8,ia$,,,0TObb%;hb%:SYS293253:IF(hb%AND1)THEN 4440=FNmsg_1 (A%!12,"OKAR",c$) 4445ENDIF 4450s$=FNda:IFs$<>""THEN 4455=FNmsg_1 (A%!12,"OKAR",c$) 4460ENDIF 4465M%=INSTR(c$," "):WHILEM%:MID$(c$,M%,1)=CHR$160:M%=INSTR(c$," ",M%+1):ENDWHILE:g$="Share::_S"+FNt(Vb%)+".RemSpool."+h$+"."+c$:SYS293254:SYS131080,17,g$TObb%;f%:IFf%AND1bb%=0 4470IFbb%THEN 4475SYS131085,67,g$TObb%;f%:IF(f%AND1)=0CLOSE#bb%:SYS131080,18,g$,H%!28 4480SYS293253 4485ELSE:SYS131080,11,g$,H%!28TObb%;f%:SYS293253:IF(f%AND1)THEN 4490=FNmsg_1 (A%!12,"OKAR",c$) 4495ENDIF 4500ENDIF 4505ELSE:=FNmsg_1 (A%!12,"OKAR",c$) 4510ENDIF 4515ENDCASE 4520SYS36,"PrinterType$"+STR$N%!0,g$,LENg$:PROCI(N%!0):FORbb%=0TO255:q%?bb%=aa%?bb%:NEXT:="" 4525DEFPROCvb(fc%):IFfc%SYS6,21,fc% 4530ENDPROC 4535DEFPROCI(hc%):LOCALx%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCwb:PROCvb(FNn(x%)):SYS6,5,hc%:ENDPROC 4540SYS6,245,,255TO,x%:IFx%<>hc%THEN 4545PROCxb:SYS6,5,hc%:PROCwb 4550ENDIF 4555ENDPROC 4560DEFPROCxb:SYS6,229:ENDPROC 4565DEFPROCwb:SYS6,229,1:ENDPROC 4570DEFFNca(N%,RETURNa$):LOCALc%,f%,s$:IFNOTFNyTHEN=FNmsg_0(A%!12,"OKL") 4575IFN%!20=0THEN=FNmsg_0(A%!12,"OKK") 4580a$="NFS#Printer::"+$N%!20:IFN%!24=0a$+=".lp"ELSEa$+="."+$N%!24 4585IFN%!28=0a$+=".nobody"ELSEa$+="."+$N%!28 4590IFN%!32a$+="."+$N%!32 4595SYS131085,143,a$TOc%;f%:IFf%AND1THEN 4600CASE!c%OF 4605WHEN204:=FNmsg_0(A%!12,"OKM") 4610OTHERWISE:f%=c%+4:CALLZ%,f%,s$:=s$+" ("+STR$!c%+")" 4615ENDCASE 4620ENDIF 4625SYS131085,,c%:="" 4630DEFPROCg(ja$,ic%,jc%):LOCALy%,i%,kc%,lc%,mc%:LOCALz%,R%,nb%:IFic%THEN 4635nc%=q%!0-64:oc%=q%!4 4640ENDIF 4645IFjc%THEN 4650!O%=q%!12:O%!4=q%!16:SYS262350,,O%:kc%=O%!16:lc%=O%!20:SYS262347,,O%:nc%=O%!20+O%!4+kc%+2:oc%=O%!24+O%!16+lc%-2 4655ENDIF 4660IFja$="SVE"THEN 4665PROCyb(za%!28,FNmsg_0(A%!12,"OP")):SYS262356,,wb%,nc%,oc% 4670ELSE:CASEja$OF 4675WHEN"ME1":PROCmenu_create(_%,FNmsg_0(A%!12,"ME1")):PROCzb(_%,0,Cb%,0):PROCa(_%,2,A%!44=0):oc%=96+(5+1)*ma%:IFsb%wa%=0ELSEPROCy(q%!16,wa%) 4680WHEN"ME2":IFFNPTHEN 4685PROCmenu_create(_%,FNmsg_0(A%!12,"ME2")+FNmsg_0(A%!12,"ME2a")+FNmsg_0(A%!12,"ME2b")) 4690ELSE:PROCmenu_create(_%,FNmsg_0(A%!12,"ME2")+FNmsg_0(A%!12,"ME2b")) 4695ENDIF 4700PROCmenu_tick_match(_%,FNicon_read(Q%,15)) 4705WHEN"ME3":PROCmenu_create(_%,FNmsg_0(A%!12,"ME3")):PROCmenu_tick_match(_%,FNicon_read(Q%,17)) 4710WHEN"ME4":PROCmenu_create(_%,FNmsg_0(A%!12,"ME4")):PROCmenu_tick_match(_%,FNicon_read(Q%,18)) 4715WHEN"ME5":PROCmenu_create(_%,FNmsg_0(A%!12,"ME5")):mc%=(_%!28AND256)<>0:IFNOT(FNu=0ANDFNp<>0)THEN 4720IFFNu=3ANDFNp=0THEN 4725PROCmenu_item(_%,1,FNmsg_0(A%!12,"ME5c"),mc%) 4730ELSE:PROCmenu_item(_%,1,FNmsg_0(A%!12,"ME5a"),mc%) 4735ENDIF 4740ENDIF 4745PROCmenu_tick_match(_%,FNicon_read(Q%,19)) 4750WHEN"ME6":IFic%PROCAb 4755PROCmenu_tick_match(_%,FNicon_read(Q%,25)) 4760WHEN"MQ1":IFic%THEN 4765PROCbb:va%=oc%:!q%=A%!40:SYS262347,,q%:B%=va%-q%!16+q%!24:va%=USR(P%+44):i%=A%!16:wa%=!i%:xa%=i%!4:IFxa%=-1xa%=0 4770IFxa%=0THEN 4775PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1a"))):IFwa%wa%!24=wa%!24OR16 4780ELSE:IFxa%!12THEN 4785PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1a"))) 4790ELSE:PROCmenu_create(_%,FNmsg_1(A%!12,"MQ1",FNmsg_0(A%!12,"MQ1b"))) 4795ENDIF 4800xa%?11=xa%?11OR8 4805ENDIF 4810PROCf(-1,wa%,xa%) 4815ENDIF 4820PROCa(_%,0,0):PROCa(_%,1,0):PROCa(_%,2,0):PROCa(_%,3,0):PROCa(_%,4,0):PROCa(_%,5,0):PROCa(_%,6,0):IFxa%=0THEN 4825PROCa(_%,4,-1):PROCa(_%,5,-1):PROCa(_%,6,-1) 4830ELSE:IFxa%?11AND5PROCa(_%,4,-1)ELSEPROCa(_%,5,-1) 4835ENDIF 4840IFwa%!24AND36THEN 4845PROCa(_%,0,-1):PROCa(_%,1,-1) 4850ELSE:PROCa(_%,2,-1) 4855ENDIF 4860WHEN"MP1":PROCcreate_paper_menu(_%,zb%,5) 4865WHEN"MC1","MC1s":PROCmenu_create(_%,FNmsg_0(A%!12,"MC1s")):IFGa%=0THEN 4870PROCa(_%,2,-1) 4875ENDIF 4880SYS262358,Bb%,O%,1<<21,1<<21:IF(!O%=-1ORO%!4=-1)ANDta%=0THEN 4885IFNOT!O%PROCicon_deselect(Bb%,!O%) 4890IFq%!12=Bb%ANDq%!16>3THEN 4895PROCicon_select(Bb%,q%!16):i%=1 4900ELSE:i%=0 4905ENDIF 4910ELSE:i%=2 4915ENDIF 4920CASEi%OF 4925WHEN0: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) 4930WHEN1:PROCt (z%,R%,nb%):IFR%THEN 4935PROCa (_%,0,-1):PROCa (_%,1,-1):PROCa (_%,2,-1):IFR%!20>0THEN 4940PROCa (_%,3,-1) 4945ELSE:PROCa (_%,4,-1) 4950ENDIF 4955PROCa (_%,5,-1) 4960ENDIF 4965IFz%THEN 4970IFz%!24AND(1<<17)THEN 4975PROCa (_%,1,-1):PROCa (_%,2,-1):PROCa (_%,3,-1):PROCa (_%,5,-1) 4980ENDIF 4985ENDIF 4990WHEN2:PROCa(_%,0,-1):PROCa(_%,1,-1) 4995ENDCASE 5000ENDCASE 5005J$=ja$:PROCdisplay_menu(0,_%,nc%,oc%) 5010ENDIF 5015ENDPROC 5020DEFPROCcreate_paper_menu(RETURNIb%,Xb%,nb%):LOCAL`%,i%,mc%:PROCmenu_create(Ib%,FNmsg_0(A%!12,"MP1")):mc%=(Ib%!28AND256)<>0:`%=ia%:i%=0:WHILE`%:PROCmenu_item(Ib%,i%,$`%!4,mc%):i%+=1:`%=`%!0:ENDWHILE:PROCmenu_tick_match(Ib%,FNicon_read(Xb%,nb%)):ENDPROC 5025DEFPROCdisplay_menu(z%,_%,pc%,qc%):ua%=z%:SYS262356,,_%,pc%,qc%:ENDPROC 5030DEFFNwas_adjust_used:SYS262351,,O%:=(O%!8AND1)<>0 5035DEFPROCsa:LOCAL_b%,rc%,`%,i%,h%,n%,z%,nb%:LOCALR%:IFua%THEN 5040PROCc(ua%!4,ua%,9,q%):ENDPROC 5045ENDIF 5050_b%=FNwas_adjust_used:CASEJ$OF 5055WHEN"ME1":CASE!q%OF 5060WHEN1:PROCtb(wa%) 5065WHEN2:PROCrb 5070WHEN3:PROCBb(wa%) 5075WHEN4:PROCCb:PROCDb 5080WHEN5:IFA%!32THEN 5085A%!20=A%!20OR1:Nb%=2:PROC`a(xb%) 5090ELSE:PROCx 5095ENDIF 5100ENDCASE 5105WHEN"ME2":PROCicon_write(Q%,15,$(!q%*24+40+_%)) 5110WHEN"ME3":PROCicon_write(Q%,17,$(!q%*24+40+_%)):PROCFb(-1) 5115WHEN"ME4":PROCicon_write(Q%,18,$(!q%*24+40+_%)):PROCFb(-1) 5120WHEN"ME5":PROCFb(!q%) 5125WHEN"ME6":PROCmenu_tick_match(_%,FNicon_read(Q%,25)):PROCicon_write(Q%,25,$(!q%*24+40+_%)) 5130WHEN"MQ1":rc%=-1:CASE!q%OF 5135WHEN0:wa%!24=wa%!24OR4 5140WHEN1:wa%!24=wa%!24OR32 5145WHEN2:wa%!24=wa%!24ANDNOT36:i%=wa%!32:IFi%THEN 5150i%=i%!44:IFi%THEN 5155IFi%!40THEN 5160i%!40=0:IFwa%!48THEN 5165!q%=wa%!48:PROCe 5170ENDIF 5175ENDIF 5180ENDIF 5185ENDIF 5190WHEN3:PROCA(wa%):rc%=0 5195WHEN4:IFxa%!12THEN 5200xa%?11=xa%?11OR1 5205ELSE:xa%?11=xa%?11OR4 5210ENDIF 5215WHEN5:xa%?11=xa%?11ANDNOT5 5220WHEN6:PROCn(wa%,xa%,-1):rc%=0 5225ENDCASE 5230IFrc%THEN 5235PROCi(wa%):IF!q%<3THEN 5240PROCf(-1,wa%,0) 5245ELSE:PROCf(va%,wa%,xa%) 5250ENDIF 5255ENDIF 5260WHEN"MP1":`%=ia%:i%=!q%:WHILEi%:`%=`%!0:i%-=1:ENDWHILE:FORi%=0TO52STEP4:Ca%!i%=`%!i%:NEXT:PROCGb 5265WHEN"MC1","MC1s":CASE!q%OF 5270WHEN0:PROCt(z%,R%,nb%):IFz%THEN 5275PROCc(z%!4,z%,-3,0):PROCnb(z%,"configure") 5280ENDIF 5285WHEN1:PROCt(z%,R%,nb%):IFz%THEN 5290PROCT(z%) 5295ENDIF 5300WHEN2:PROCHb 5305WHEN3:PROCIb:PROCk 5310WHEN4:PROCJb:PROCk 5315WHEN5:PROCKb:PROCk 5320WHEN6:IFA%!48THEN 5325VDU4,26 5330IF0<=sa%-1THEN 5335FORi%=0TOsa%-1:PROCicon_select(Bb%,i%+4):NEXT 5340ENDIF 5345ENDIF 5350IFHa%THEN 5355IF0<=Ja%-1THEN 5360FORi%=sa%TOsa%+Ja%:PROCicon_select(Bb%,i%+4):NEXT 5365ENDIF 5370ENDIF 5375ta%=-1 5380WHEN7:PROCU(Bb%) 5385ENDCASE 5390ENDCASE 5395IF_b%THEN 5400SYS262351,,q%:PROCg(J$,0,0) 5405ELSE:PROCbb 5410ENDIF 5415ENDPROC 5420DEFPROCCb:LOCALc%,f%,H%,z%,M%,p%,Oa%,s$,f$:LOCALsc%,R%:SYS263872:IFha%THEN 5425f$="<Printers$Dir>.Remote.ID"+h$+".Settings1" 5430ELSE:f$="<Printers$Dir>.Settings1" 5435ENDIF 5440SYS131085,143,f$TOc%;f%:IFf%AND1f%=c%+4:CALLZ%,f%,s$:ERROR254,FNmsg_1(A%!12,"OKB",s$) 5445LOCALERROR:ONERRORLOCALRESTOREERROR:SYS131085,0,c%:SYS131080,6,f$:ERROR254,FNmsg_1(A%!12,"OKB",REPORT$) 5450BPUT#c%,"fv: 1":z%=A%!48:WHILEz%:H%=z%!4:BPUT#c%,"cl: "+$H%!4+":"+STR$H%!40:BPUT#c%,"nm: "+$z%!8:M%=z%!12:IFH%!24AND4THEN 5455Oa%=H%!48:BPUT#c%,"cn: "+STR$Oa%:IF1<=Oa%THEN 5460FORf%=1TOOa%:p%=!M%:M%+=4:CASE-1OF 5465WHENp%=0:BPUT#c%,"nl: " 5470WHENp%!-4=1196707401:BPUT#c%,"in: "+STR$!p% 5475WHENp%!-4=1196577875:BPUT#c%,"st: "+$p% 5480WHENp%!-4=810701907:CALLZ%,p%,s$:BPUT#c%,"s0: "+s$ 5485WHENp%!-4=1381258055:CALLY%,p%,s$:BPUT#c%,"gs: "+FNungstrans(s$) 5490WHENp%!-4=1381257040:BPUT#c%,"pt: "+FNo(!p%,H%) 5495OTHERWISE:SYS131085,,c%:ERROR254,FNmsg_1(A%!12,"OKC",$z%!8) 5500ENDCASE 5505NEXT 5510ENDIF 5515ELSE:BPUT#c%,"ct: 16_"+STR$~M%!0:BPUT#c%,"bd: 16_"+STR$~M%!4:IFM%!8AND48M%!8=M%!8OR8 5520BPUT#c%,"ft: 16_"+STR$~M%!8:BPUT#c%,"et: ";:IFM%!12=0BPUT#c%,10ELSEBPUT#c%,$M%!12 5525BPUT#c%,"fl: ";:IFM%!16=0BPUT#c%,10ELSEBPUT#c%,$M%!16 5530BPUT#c%,"ns: ";:IFM%!20=0BPUT#c%,10ELSEBPUT#c%,$M%!20 5535BPUT#c%,"np: ";:IFM%!24=0BPUT#c%,10ELSEBPUT#c%,$M%!24 5540BPUT#c%,"nu: ";:IFM%!28=0BPUT#c%,10ELSEBPUT#c%,$M%!28 5545BPUT#c%,"no: ";:IFM%!32=0BPUT#c%,10ELSEBPUT#c%,$M%!32 5550BPUT#c%,"cf: 16_"+STR$~M%?6 5555ENDIF 5560M%=z%!16:Oa%=H%!36:BPUT#c%,"cs: "+STR$Oa%:IF1<=Oa%THEN 5565FORf%=1TOOa%:p%=!M%:M%+=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: "+FNo(!p%,H%) 5600OTHERWISE:SYS131085,,c%:ERROR254,FNmsg_1(A%!12,"OKC",$z%!8) 5605ENDCASE 5610NEXT 5615ENDIF 5620BPUT#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:R%=Ha%:WHILER%:IFR%!20>0THEN 5625BPUT#c%,"cl:":BPUT#c%,"nm: "+$R%!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:" 5630BPUT#c%,"sn: "+$R%!4:BPUT#c%,"ic:" 5635ENDIF 5640R%=R%!0:ENDWHILE:CLOSE#c%:SYS131080,18,f$,4038:SYS131080,6,LEFT$(f$):SYS131113,25,f$,LEFT$(f$):SYS263873:ENDPROC 5645DEFPROCDb:LOCALH%,vb%,S%,c%,ab%,U%,tc%,i%,j%,k%,l%,s$,f%,f$:SYS263872:H%=ra%:WHILEH%:IFH%!8THEN 5650IFH%!24AND2THEN 5655IFha%THEN 5660f$="<Printers$Dir>.Remote.ID"+h$+"."+$H%!4:SYS8,8,f$:f$+=".PrData1" 5665ELSE:f$="<Printers$Dir>."+$H%!4+".PrData1" 5670ENDIF 5675SYS131080,4,LEFT$(f$),,,,3:SYS131085,143,f$TOc%;f%:IFf%AND1f%=c%+4:CALLZ%,f%,s$:ERROR254,FNmsg_1(A%!12,"OKB",s$) 5680LOCALERROR:ONERRORLOCALRESTOREERROR:SYS131085,0,c%:SYS131080,6,f$:ERROR254,FNmsg_1(A%!12,"OKB",REPORT$) 5685ab%=H%!8:vb%=H%!12:WHILEab%:BPUT#c%,$(ab%+12)+":":BPUT#c%,"#":S%=vb%!4:WHILES%:IFS%!(S%!4*4+8)THEN 5690BPUT#c%,"# Usage: "+STR$S%!(S%!4*4+8):U%=ab%!4:i%=S%+8:WHILEU%:BPUT#c%,$(U%+16)+" ";:IF!i%=0THEN 5695IFU%!4=6THEN 5700BPUT#c%,48 5705ELSE:IFU%!4=1THEN 5710BPUT#c%,48 5715ENDIF 5720ENDIF 5725BPUT#c%,10 5730ELSE:j%=!i%:CASEU%!4OF 5735WHEN1:BPUT#c%,STR$!j% 5740WHEN2:BPUT#c%,FNprinter_read_string(j%) 5745WHEN3:BPUT#c%,FNprinter_read_string(j%) 5750WHEN4:BPUT#c%,FNungstrans(FNprinter_read_string(j%)) 5755WHEN5:BPUT#c%,10:CASEU%!8OF 5760WHEN1:BPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 5765WHEN2:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 5770WHEN3:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 5775WHEN4:BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)):BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 5780WHEN7:BPUT#c%," "+FNo(!j%!0,H%)+", "+FNo(!j%!4,H%) 5785ENDCASE 5790WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:IF0<=j%!4-1THEN 5795FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 5800WHEN1196707401:BPUT#c%," "+STR$!l%+", "; 5805WHEN1196577875:BPUT#c%," "+$l%+", "; 5810WHEN810701907:CALLZ%,l%,s$:BPUT#c%," "+s$+", "; 5815WHEN1381258055:CALLY%,l%,s$:BPUT#c%," "+FNungstrans(s$)+", "; 5820WHEN1381257040:BPUT#c%," "+FNo(!l%,H%)+", "; 5825ENDCASE 5830NEXT 5835ENDIF 5840PTR#c%=PTR#c%-2:BPUT#c%,10:j%=!j%:ENDWHILE 5845WHEN7:BPUT#c%,FNo(!j%,H%) 5850WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 5855FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 5860ENDIF 5865BPUT#c%," "+FNungstrans(s$):j%=!j%:ENDWHILE 5870ENDCASE 5875ENDIF 5880U%=U%!0:i%+=4:ENDWHILE:BPUT#c%,"#" 5885ENDIF 5890S%=S%!0:ENDWHILE:ab%=ab%!0:vb%=vb%!0:ENDWHILE:CLOSE#c%:SYS131080,18,f$,4038:SYS131080,6,LEFT$(f$):SYS131113,25,f$,LEFT$(f$):H%!24=H%!24ANDNOT2 5895ELSE 5900ENDIF 5905ENDIF 5910H%=H%!0:ENDWHILE:SYS263873:ENDPROC 5915DEFFNo(p%,H%):LOCALvb%,S%,ab%,uc%,vc%:vb%=H%!12:WHILEvb%:S%=vb%!4:vc%=0:WHILES%:IFS%!(S%!4*4+8)THEN 5920vc%+=1:IFp%=S%THEN 5925ab%=H%!8:WHILEuc%:ab%=ab%!0:uc%-=1:ENDWHILE:=$(ab%+12)+":"+STR$vc% 5930ENDIF 5935ENDIF 5940S%=S%!0:ENDWHILE:uc%+=1:vb%=vb%!0:ENDWHILE:PROCb(FNmsg_0(A%!12,"FAF")):="" 5945DEFFNh(h%):!W%=h%:SYS262347,,W%:=(W%!32AND1<<16)<>0 5950DEFPROCtb(z%):IFNOTFNh(Bb%)THEN 5955IFA%!48ORHa%THEN 5960PROCk 5965ENDIF 5970ENDIF 5975PROCs(Bb%):PROCq(Bb%):PROCsb(z%):ENDPROC 5980DEFPROCsb(z%):LOCALp%:IFz%THEN 5985SYS262358,Bb%,O%,1<<21,1<<21:p%=O%:WHILENOT!p%:IF!p%<>z%!28PROCicon_deselect(Bb%,!p%) 5990p%+=4:ENDWHILE:IF(z%!24AND44)=0PROCicon_select(Bb%,z%!28) 5995ENDIF 6000ENDPROC 6005DEFPROCB(p%):LOCALM%,i%,pb%:IFp%=0ENDPROC 6010CASEp%!-4OF 6015WHEN1381257040:M%=!p%:pb%=M%+M%!4*4+8:!pb%-=1:IF!pb%=0THEN 6020pb%=M%+8:IF1<=M%!4THEN 6025FORi%=1TOM%!4:PROCB(!pb%):pb%+=4:NEXT 6030ENDIF 6035ENDIF 6040WHEN1280266050:PROCB(p%!0):PROCB(p%!4) 6045WHEN1146377036:WHILEp%:IF0<=p%!4-1THEN 6050FORM%=0TOp%!4-1:PROCB(p%!(M%*4+8)):NEXT 6055ENDIF 6060p%=p%!0:ENDWHILE 6065ENDCASE 6070ENDPROC 6075DEFPROCLb(ka$):LOCALH%,vb%,wc%,S%,i%,j%,k%,l%,pb%:H%=ra%:WHILEH%:wc%=0:vb%=H%!12:S%=vb%!4:WHILES%:IF$S%!8=ka$THEN 6080IF(S%!(S%!4*4+8))=0THEN 6085H%!24=H%!24OR2:IF0<=S%!4-1THEN 6090FORi%=0TOS%!4-1:pb%=S%!(i%*4+8):PROCB(pb%):PROCfree_structure(pb%):NEXT 6095ENDIF 6100IFwc%THEN 6105wc%!0=S%!0 6110ELSE:vb%!4=S%!0 6115ENDIF 6120B%=1413763664:C%=S%:CALLP%+16 6125ENDIF 6130S%=0:H%=0 6135ELSE:wc%=S%:S%=S%!0 6140ENDIF 6145ENDWHILE:IFH%H%=H%!0 6150ENDWHILE:ENDPROC 6155DEFPROCp(la$):PROCS(FNmsg_1(A%!12,"OKZ",la$)):ENDPROC 6160DEFPROCMb(RETURNH%):LOCALM%,J%,c%,d%:J%=FNb("cl:"):IFJ%=0PROCp(FNmsg_0(A%!12,"OKZa")) 6165H%=ra%:WHILEH%:IF$H%!4=$J%THEN 6170IFH%!24AND32THEN 6175SYS131080,7,"PrinterChoices:"+$J%+".WriteTest"TO;c%:IF(c%AND1)PROCm:ERROR254,FNmsg_1(A%!12,"OKAN",$J%) 6180ENDIF 6185M%=!tb%:PROCNb(H%,H%!8):!tb%=M%:ENDPROC 6190ELSE:H%=H%!0 6195ENDIF 6200ENDWHILE:IFH%=0THEN 6205PROCOa:PROCCa($J%):PROCDa($J%,H%):PROCPa:PROCKa:IFH%!24AND32THEN 6210SYS131080,7,"PrinterChoices:"+$J%+".WriteTest"TO;c%:IF(c%AND1)PROCm:ERROR254,FNmsg_1(A%!12,"OKAN",$J%) 6215ENDIF 6220PROCc(H%,A%!48,-5,0) 6225ENDIF 6230IFH%=0PROCp(FNmsg_1(A%!12,"OKZb",$J%)) 6235ENDPROC 6240DEFPROCNb(H%,ab%):LOCALU%,J%:U%=ab%!4:REPEAT:J%=FNb($(U%+16)):IFJ%THEN 6245CASEU%!4OF 6250WHEN5:PROCOb(H%,ab%,$J%) 6255WHEN6:IF?J%=13PROCp(FNmsg_1(A%!12,"OK7a",$(U%+16))) 6260PROCPb(H%,ab%,$J%) 6265WHEN7:PROCV(H%,ab%,$J%) 6270WHEN8:IF?J%=13PROCp(FNmsg_1(A%!12,"OK7a",$(U%+16))) 6275PROCQb(H%,ab%,$J%) 6280ENDCASE 6285ELSE:IF!tb%<xc%PROCp(FNmsg_1(A%!12,"OKZc",$(U%+16))) 6290ENDIF 6295U%=U%!0:UNTILU%=0:ENDPROC 6300DEFPROCOb(H%,ab%,t$):LOCALJ%,ma$,k$:J%=FNd:IFJ%THEN 6305CASEU%!8OF 6310WHEN1:J%=FNI(J%,yc%):IF?J%=13J%=FNd 6315WHEN2,3,4:J%=FNq(J%,k$):IF?J%=13J%=FNd 6320WHEN7:J%=FNq(J%,k$):PROCV(H%,ab%,k$):IF?J%=13J%=FNd 6325PROCV(H%,ab%,$J%) 6330ENDCASE 6335ENDIF 6340ENDPROC 6345DEFPROCPb(H%,ab%,t$):LOCALi%,p%,zc%,J%:zc%=VALt$:IF1<=zc%THEN 6350FORi%=1TOzc%:J%=FNd:IFJ%THEN 6355p%=U%!8:WHILEp%:IFp%!4=7PROCV(H%,ab%,$J%) 6360p%=!p%:ENDWHILE 6365ENDIF 6370NEXT 6375ENDIF 6380ENDPROC 6385DEFPROCV(H%,ab%,c$):LOCALi%,s$,t$:i%=INSTR(c$,":"):IFi%=0PROCp(FNmsg_1(A%!12,"OKAA",c$)) 6390s$=LEFT$(c$,i%-1):t$=MID$(c$,i%+1):ab%=H%!8:WHILEab%:IF$(ab%+12)=s$THEN 6395IFVALt$>0THEN 6400ENDPROC 6405ELSE:PROCNb(H%,ab%):ENDPROC 6410ENDIF 6415ELSE:ab%=ab%!0 6420ENDIF 6425ENDWHILE:PROCp(FNmsg_1(A%!12,"OKAB",s$)):ENDPROC 6430DEFPROCQb(H%,ab%,t$):LOCALi%,zc%:zc%=VALt$:IF1<=zc%THEN 6435FORi%=1TOzc%:IFFNd 6440NEXT 6445ENDIF 6450ENDPROC 6455DEFPROCdb:LOCALJ%,H%,M%,s$,U%,Ac%,Bc%,Cc%,Dc%,Fc%:J%=q%+44:CALLZ%,J%,s$:IFNOTFNk(s$)ERROR254,FNmsg_1(A%!12,"OKX",s$) 6460SYS263872:PROCMb(H%):Cc%=H%!12:IFCc%THEN 6465Ac%=Cc%!4:IFAc%THEN 6470M%=!tb%:U%=H%!8:U%=U%!4:J%=FNb($(U%+16)):IFJ%THEN 6475WHILEAc%:IF$Ac%!8=$J%THEN 6480PROCm:SYS263873:PROCRb(H%,Ac%):ENDPROC 6485ENDIF 6490Bc%=Ac%:Ac%=Ac%!0:ENDWHILE 6495ELSE:PROCp(FNmsg_1(A%!12,"OKZc",$(U%+16))) 6500ENDIF 6505!tb%=M% 6510ELSE:Bc%=0 6515ENDIF 6520ELSE:Bc%=0 6525ENDIF 6530PROCW(H%!8,Bc%,Cc%,0,Dc%,Fc%,H%):PROCm:H%!24=H%!24OR2:PROCRb(H%,Bc%):SYS263873:ENDPROC 6535DEFPROCS(s$):PROCm:ERROR254,FNQ(A%!12,"OK0",STR$ub%,V$,s$):ENDPROC 6540DEFPROCh(H%,s$,na$):PROCS(FNmsg_2(A%!12,na$,$H%!4,s$)):ENDPROC 6545DEFPROCIa(Gc%):LOCALJ%,T%,Hc%,i%,Ic%,Jc%,Kc%,Lc%:J%=FNb("tp:"):IFJ%=0PROCh(Gc%,FNmsg_0(A%!12,"OK3"),"OK2a") 6550REPEAT:J%=FNd:IFJ%THEN 6555T%=FNa(J%,"tp:"):IFT%THEN 6560Hc%+=1:B%=1414548820:C%=12+1+LEN$T%:Ic%=USR(P%+12):IFIc%=0PROCh(Gc%,FNmsg_1(A%!12,"FA5","TMPT"),"OK2a") 6565IFJc%THEN 6570Jc%!0=Ic% 6575ELSE:Gc%!8=Ic% 6580ENDIF 6585Ic%!0=0:Ic%!4=0:Ic%!8=0:$(Ic%+12)=$T%:Lc%=0 6590ELSE:T%=FNa(J%,"end:"):IFT%THEN 6595IF?T%<>13PROCh(Gc%,FNmsg_0(A%!12,"OK3a"),"OK2a") 6600Hc%-=1:Jc%=Ic% 6605ELSE:i%=INSTR($J%,":"):IFi%=0PROCh(Gc%,FNmsg_1(A%!12,"OK4",$J%),"OK2a") 6610IFHc%<>1PROCh(Gc%,FNmsg_1(A%!12,"OK4a",$J%),"OK2a") 6615Ic%!8+=1:B%=1498567758:C%=16+1+i%:Kc%=USR(P%+12):IFKc%=0PROCh(Gc%,FNmsg_1(A%!12,"FA5","NTRY"),"OK2a") 6620IFLc%Lc%!0=Kc%ELSEIc%!4=Kc% 6625Kc%!0=0:Kc%!4=0:Kc%!8=0:Kc%!12=0:$(Kc%+16)=LEFT$($J%,i%):J%+=i%+1:CASE-1OF 6630WHENFNa(J%,"in")<>0:Kc%!4=1 6635WHENFNa(J%,"st")<>0:Kc%!4=2 6640WHENFNa(J%,"s0")<>0:Kc%!4=3 6645WHENFNa(J%,"gs")<>0:Kc%!4=4 6650WHENFNa(J%,"bl")<>0:Kc%!4=5:T%=FNa(J%,"bl"):WHILE?T%=32:T%+=1:ENDWHILE:IF?T%=ASC","T%+=1 6655CASE-1OF 6660WHENFNa(T%,"in")<>0:Kc%!8=1 6665WHENFNa(T%,"st")<>0:Kc%!8=2 6670WHENFNa(T%,"s0")<>0:Kc%!8=3 6675WHENFNa(T%,"gs")<>0:Kc%!8=4 6680WHENFNa(T%,"ptr")<>0:Kc%!8=7 6685OTHERWISE:PROCh(Gc%,FNmsg_1(A%!12,"OK5",$T%),"OK2a") 6690ENDCASE 6695WHENFNa(J%,"ls")<>0:Kc%!4=6:T%=FNa(J%,"ls"):PROCSb(T%,Kc%,Gc%) 6700WHENFNa(J%,"ptr")<>0:Kc%!4=7 6705WHENFNa(J%,"ch")<>0:Kc%!4=8 6710OTHERWISE:PROCh(Gc%,FNmsg_1(A%!12,"OK6",$J%),"OK2a") 6715ENDCASE 6720Lc%=Kc% 6725ENDIF 6730ENDIF 6735ENDIF 6740UNTILHc%=-1:ENDPROC 6745DEFPROCSb(Mc%,U%,Gc%):LOCALtc%,M%,t%:M%=U%+8:REPEAT:WHILE?Mc%=32:Mc%+=1:ENDWHILE:IF?Mc%=44Mc%+=1 6750WHILE?Mc%=32:Mc%+=1:ENDWHILE:IF?Mc%<>13THEN 6755U%!12+=1:B%=1414744396:C%=8:tc%=USR(P%+12):IFtc%=0ERROR253,FNmsg_1(A%!12,"FA5","LIST") 6760!M%=tc%:M%=tc%:tc%!0=0:t%=FNa(Mc%,"in"):IFt%THEN 6765Mc%=t%:tc%!4=1 6770ELSE:t%=FNa(Mc%,"st"):IFt%THEN 6775Mc%=t%:tc%!4=2 6780ELSE:t%=FNa(Mc%,"s0"):IFt%THEN 6785Mc%=t%:tc%!4=3 6790ELSE:t%=FNa(Mc%,"gs"):IFt%THEN 6795Mc%=t%:tc%!4=4 6800ELSE:t%=FNa(Mc%,"ptr"):IFt%THEN 6805Mc%=t%:tc%!4=7 6810ELSE:PROCh(Gc%,FNmsg_1(A%!12,"OK7",$Mc%),"OK2a") 6815ENDIF 6820ENDIF 6825ENDIF 6830ENDIF 6835ENDIF 6840ENDIF 6845UNTIL?Mc%=13:ENDPROC 6850DEFFNb(m$):LOCALNc%,i%:i%=Oc%+!tb%:WHILEi%<Oc%+xc%:WHILE?i%=32:i%+=1:ENDWHILE:IF?i%=35OR?i%=13THEN 6855i%+=LEN$i%+1:ub%+=1 6860ELSE:IFm$=LEFT$($i%,LENm$)THEN 6865Nc%=i%+LENm$:WHILE?Nc%=32:Nc%+=1:ENDWHILE:i%+=LEN$i%+1:!tb%=i%-Oc%:ub%+=1:=Nc% 6870ELSE:i%+=LEN$i%+1:ub%+=1 6875ENDIF 6880ENDIF 6885ENDWHILE:=0 6890DEFFNd:LOCALNc%,i%:i%=Oc%+!tb%:WHILEi%<Oc%+xc%:WHILE?i%=32:i%+=1:ENDWHILE:IF?i%=35OR?i%=13THEN 6895i%+=LEN$i%+1:!tb%=i%-Oc%:ub%+=1 6900ELSE:Nc%=i%:i%+=LEN$i%+1:!tb%=i%-Oc%:ub%+=1:=Nc% 6905ENDIF 6910ENDWHILE:=0 6915DEFFNa(J%,m$):WHILE?J%=32:J%+=1:ENDWHILE:IFm$=LEFT$($J%,LENm$)THEN 6920J%+=LENm$:WHILE?J%=32:J%+=1:ENDWHILE:=J% 6925ENDIF 6930=0 6935DEFPROCW(ab%,RETURNBc%,Cc%,Pc%,RETURNDc%,RETURNFc%,H%):LOCALWa%,Qc%,Rc%,J%,T%,U%,i%,Oa%:U%=ab%!4:Wa%=-1:REPEAT:Rc%=!tb%:Dc%=0:J%=FNd:IFJ%THEN 6940IFWa%=-1THEN 6945Oa%=4*ab%!8+8:B%=1413763664:C%=Oa%+8:Qc%=USR(P%+12):IFQc%=0ERROR253,FNmsg_1(A%!12,"FA5","PRDT") 6950IF0<=Oa%+7THEN 6955FORi%=0TOOa%+7STEP4:Qc%!i%=0:NEXT 6960ENDIF 6965IFBc%Bc%!0=Qc%ELSECc%!4=Qc% 6970Qc%!4=ab%!8:Wa%=8 6975ENDIF 6980REPEAT:T%=FNa(J%,$(U%+16)):IFT%THEN 6985Dc%=1:CASEU%!4OF 6990WHEN1:Qc%!Wa%=FNstore_integer(FNc($T%)) 6995WHEN2,3,4:B%=T%:C%=U%!4:Qc%!Wa%=USR(P%+28) 7000WHEN5:Qc%!Wa%=FNea(U%,Fc%) 7005WHEN6:IF?T%=13PROCh(H%,FNmsg_1(A%!12,"OK7a",$J%),"OK2") 7010Qc%!Wa%=FNfa(U%,FNc($T%),Fc%) 7015WHEN7:IF?T%<>13PROCX(H%,$T%,Qc%+Wa%,Fc%) 7020WHEN8:IF?T%=13PROCh(H%,FNmsg_1(A%!12,"OK7a",$J%),"OK2") 7025Qc%!Wa%=FNga(U%,FNc($T%)) 7030ENDCASE 7035ENDIF 7040Wa%+=4:U%=U%!0:UNTILU%=0ORDc% 7045ENDIF 7050IFDc%=0THEN 7055IF!tb%>=xc%Dc%=3 7060!tb%=Rc%:U%=ab%!4:T%=FNa(J%,$(U%+16)):IFT%THEN 7065Dc%=1 7070ELSE:ab%=ab%!0:T%=FNa(J%,$(ab%+12)+":"):IFT%Dc%=2 7075ENDIF 7080U%=0 7085ENDIF 7090UNTILU%=0:Bc%=Qc%:ENDPROC 7095DEFPROCJa(H%):LOCALab%,s$,J%,Rc%,U%,Dc%,Qc%,Bc%,Cc%,Pc%,Fc%,i%:ab%=H%!8:REPEAT:J%=FNb($(ab%+12)+":"):IFJ%=0PROCh(H%,FNmsg_1(A%!12,"OK8",$(ab%+12)),"OK2") 7100B%=1145128264:C%=12:Cc%=USR(P%+12):IFCc%=0PROCh(H%,FNmsg_1(A%!12,"FA5","HEAD"),"OK2") 7105Cc%!0=0:Cc%!4=0:IFPc%Pc%!0=Cc%ELSEH%!12=Cc% 7110Bc%=0:REPEAT:U%=ab%!4:PROCW(ab%,Bc%,Cc%,Pc%,Dc%,Fc%,H%):IFDc%=0THEN 7115J%=FNd:PROCh(H%,FNmsg_1(A%!12,"OK9",$J%),"OK2") 7120ENDIF 7125UNTILDc%<>1:ab%=ab%!0:Pc%=Cc%:UNTILab%=0:WHILEFc%:i%=Fc%!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") 7130!!i%=FNF(s$,-1):i%=Fc%:Fc%=!Fc%:B%=1482184792:C%=i%:CALLP%+16:ENDWHILE:ENDPROC 7135DEFFNF(s$,Sc%):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 7140j%=H%!12:WHILEk%:j%=j%!0:k%-=1:ENDWHILE:k%=VALt$-1:j%=j%!4:WHILEk%:j%=j%!0:k%-=1:ENDWHILE:IFSc%j%!(j%!4*4+8)+=1 7145=j% 7150ELSE:j%=j%!0:k%+=1 7155ENDIF 7160ENDWHILE:PROCb(FNmsg_2(A%!12,"FAG",s$,t$)):=0 7165DEFFNstore_integer(v%):LOCALb%:B%=1196707401:C%=4:b%=USR(P%+12):IFb%=0ERROR253,FNmsg_1(A%!12,"FA5","INTG") 7170!b%=v%:=b% 7175DEFFNR(s$):LOCALt$,i%,Tc%:SYS39,s$,O%,256TO,,Tc%:IFTc%=0THEN="" 7180FORi%=0TOTc%-1:t$+=CHR$O%?i%:NEXT:=t$ 7185DEFFNungstrans(s$):LOCALt$,i%,c%:IFs$=""THEN="" 7190FORi%=1TOLENs$:c%=ASCMID$(s$,i%,1):IFc%>=128c%-=128:t$+="|!" 7195IFc%<32c%+=64:t$+="|" 7200IFc%=127c%=63:t$+="|" 7205IFINSTR("|<""",CHR$c%)THENt$+="|" 7210t$+=CHR$c%:NEXT:=t$ 7215DEFFNea(U%,RETURNFc%):LOCALJ%,yc%,b%,k$:B%=1280266050:C%=8:b%=USR(P%+12):IFb%=0ERROR253,FNmsg_1(A%!12,"FA5","BOOL") 7220J%=FNd:IFJ%THEN 7225CASEU%!8OF 7230WHEN1:J%=FNI(J%,yc%):b%!0=FNstore_integer(yc%):IF?J%=13J%=FNd 7235b%!4=FNstore_integer(FNc($J%)) 7240WHEN2,3,4:J%=FNq(J%,k$):$q%=k$:B%=q%:C%=U%!8:b%!0=USR(P%+28):IF?J%=13J%=FNd 7245B%=J%:C%=U%!8:b%!4=USR(P%+28) 7250WHEN7:J%=FNq(J%,k$):PROCX(H%,s$,b%+0,Fc%):IF?J%=13J%=FNd 7255PROCX(H%,$J%,b%+4,Fc%) 7260ENDCASE 7265ENDIF 7270=b% 7275DEFFNfa(U%,Uc%,RETURNFc%):LOCALi%,M%,Vc%,Wc%,J%,Xc%,Zc%,yc%,k$:IF1<=Uc%THEN 7280FORi%=1TOUc%:B%=1146377036:C%=4*U%!12+8:Vc%=USR(P%+12):IFVc%=0ERROR253,FNmsg_1(A%!12,"FA5","LSTD") 7285IFWc%Wc%!0=Vc%ELSEM%=Vc% 7290Vc%!0=0:Vc%!4=U%!12:Zc%=8:J%=FNd:IFJ%THEN 7295Xc%=U%!8:WHILEXc%:CASEXc%!4OF 7300WHEN1:J%=FNI(J%,yc%):Vc%!Zc%=FNstore_integer(yc%) 7305WHEN2,3,4:J%=FNq(J%,k$):$q%=k$:B%=q%:C%=Xc%!4:Vc%!Zc%=USR(P%+28) 7310WHEN7:J%=FNq(J%,k$):PROCX(H%,k$,Vc%+Zc%,Fc%) 7315ENDCASE 7320Xc%=!Xc%:Zc%+=4:ENDWHILE 7325ENDIF 7330Wc%=Vc%:NEXT 7335ENDIF 7340=M% 7345DEFFNga(U%,Uc%):LOCALi%,Vc%,J%,Wc%,M%,j%,t$:IF1<=Uc%THEN 7350FORi%=1TOUc%:J%=FNd:IFJ%THEN 7355t$=FNR($J%):B%=1380010051:C%=5+LENt$:Vc%=USR(P%+12):IFVc%=0ERROR253,FNmsg_1(A%!12,"FA5","CHAR") 7360Vc%!0=0:Vc%?4=ASCt$:Vc%?5=LENt$-1:t$=MID$(t$,2):IF1<=LENt$THEN 7365FORj%=1TOLENt$:Vc%?(j%+5)=ASCMID$(t$,j%,1):NEXT 7370ENDIF 7375IFWc%Wc%!0=Vc%ELSEM%=Vc% 7380ENDIF 7385Wc%=Vc%:NEXT 7390ENDIF 7395=M% 7400DEFPROCX(H%,c$,_c%,RETURNFc%):LOCALi%,s$,t$,`c%,ad%,Pc%,ab%,Bc%,bd%,Dc%,Qc%,t$:i%=INSTR(c$,":"):IFi%=0PROCh(H%,FNmsg_1(A%!12,"OKAA",c$),"OK2") 7405s$=LEFT$(c$,i%-1):t$=MID$(c$,i%+1):ab%=H%!8:bd%=H%!12:Pc%=0:WHILEab%:IF$(ab%+12)=s$THEN 7410IFVALt$>0THEN 7415B%=1381257040:C%=LENc$+1:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 7420$i%=c$:!_c%=i%:B%=1482184792:C%=8:`c%=USR(P%+12):IF`c%=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 7425!`c%=Fc%:`c%!4=_c%:Fc%=`c%:ENDPROC 7430ELSE:IFbd%THEN 7435Bc%=bd%!4:IFBc%THEN 7440WHILEBc%!0:Bc%=Bc%!0:ENDWHILE 7445ENDIF 7450ELSE:Bc%=0 7455ENDIF 7460ad%=Bc%:PROCW(ab%,Bc%,bd%,Pc%,Dc%,Fc%,H%):IFDc%=0ANDBc%=0THEN 7465J%=FNd:IFJ%t$=$J%ELSEt$="" 7470PROCh(H%,FNmsg_1(A%!12,"OK9",t$),"OK2") 7475ENDIF 7480Qc%=bd%!4:WHILEQc%<>Bc%:IFQc%!(Qc%!4*4+8)THEN 7485Dc%=-1:IF0<=Qc%!4-1THEN 7490FORi%=0TOQc%!4-1:IFNOTFNC(Qc%,Bc%,i%*4+8)THEN 7495Dc%=0:i%=Qc%!4 7500ENDIF 7505NEXT 7510ENDIF 7515IFDc%THEN 7520IF0<=Bc%!4-1THEN 7525FORi%=0TOBc%!4-1:`c%=Bc%!(i%*4+8):PROCB(`c%):PROCfree_structure(`c%):NEXT 7530ENDIF 7535ad%!0=0:B%=1413763664:C%=Bc%:CALLP%+16:Bc%=Qc% 7540ELSE:Qc%=!Qc% 7545ENDIF 7550ELSE:Qc%=!Qc% 7555ENDIF 7560ENDWHILE:B%=1381257040:C%=4:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 7565!i%=Bc%:!_c%=i%:Bc%!(Bc%!4*4+8)+=1:ENDPROC 7570ENDIF 7575ELSE:ab%=ab%!0:IFVALt$=0THEN 7580Pc%=bd%:bd%=bd%!0 7585ENDIF 7590ENDIF 7595ENDWHILE:PROCh(H%,FNmsg_1(A%!12,"OKAB",s$),"OK2"):ENDPROC 7600DEFFNC(s%,d%,o%):LOCALs$,d$:s%=s%!o%:d%=d%!o%:IFs%=0ORd%=0THEN 7605=(s%=d%) 7610ELSE:CASEs%!-4OF 7615WHEN1196707401:=!s%=!d% 7620WHEN1196577875:=$s%=$d% 7625WHEN810701907:CALLZ%,s%,s$:CALLZ%,d%,d$:=s$=d$ 7630WHEN1381258055:CALLY%,s%,s$:CALLY%,d%,d$:=s$=d$ 7635WHEN1280266050:=FNha(s%,d%) 7640WHEN1146377036:=FNia(s%,d%) 7645WHEN1381257040:=!s%=!d% 7650WHEN1380010051:=FNja(s%,d%) 7655OTHERWISE:PROCb(FNmsg_1(A%!12,"WA10",STR$~s%!-4)) 7660ENDCASE 7665ENDIF 7670=0 7675DEFFNha(s%,d%):IFFNC(s%,d%,0)THEN=FNC(s%,d%,4)ELSE=0 7680DEFFNia(s%,d%):LOCALi%:WHILEs%:IF0<=s%!4-1THEN 7685FORi%=0TOs%!4-1:IFNOTFNC(s%,d%,i%*4+8)THEN=0 7690NEXT 7695ENDIF 7700s%=s%!0:d%=d%!0:ENDWHILE:=-1 7705DEFFNja(s%,d%):LOCALi%:WHILEs%:IFs%?4<>d%?4THEN=0 7710IFs%?5<>d%?5THEN=0 7715i%=s%?5:WHILEi%:IFs%?(i%+5)<>d%?(i%+5)THEN=0 7720i%-=1:ENDWHILE:s%=!s%:d%=!d%:ENDWHILE:=-1 7725DEFFNI(cd%,RETURNyc%):LOCALi%,dd%:i%=INSTR($cd%,","):IFi%=0THEN 7730yc%=FNc($cd%):dd%=cd%+LEN$cd% 7735ELSE:yc%=FNc(LEFT$($cd%,i%-1)):dd%=cd%+i%:WHILE?dd%=32:dd%+=1:ENDWHILE 7740ENDIF 7745=dd% 7750DEFFNq(cd%,RETURNk$):LOCALi%,oa$,ed%,fd%:k$="":i%=0:WHILEcd%?i%=32:i%+=1:ENDWHILE:ed%=-1:fd%=(cd%?i%=34):WHILENOT(cd%?i%=13OR(ed%ANDcd%?i%=44)):IFNOTfd%ORcd%?i%<>34ORed%k$+=CHR$cd%?i% 7755IFfd%ANDcd%?i%=34ed%=NOTed% 7760i%+=1:ENDWHILE:IFcd%?i%=13THEN 7765dd%=cd%+i% 7770ELSE:dd%=cd%+i%+1:WHILE?dd%=32:dd%+=1:ENDWHILE 7775ENDIF 7780=dd% 7785DEFFNk(c$):LOCALc%,i%,gd%,hd%,id%,jd%,kd%,dd%,ld%,gb%:SYS8,17,c$TOc%,,gd%,,xc%:IFNOT(c%=0ORc%=1)THENSYS8,19,c$,c% 7790IFc%=0THEN=0 7795IF(gd%>>>20)=4095hd%=gd%>>8AND4095ELSEhd%=-1 7800IFhd%<>4038ERROR254,FNmsg_1(A%!12,"OKAL",c$) 7805B%=1096040772:C%=4+xc%+1:Oc%=USR(P%+12)+4:IFOc%=4ERROR253,FNmsg_1(A%!12,"FA5","DATA") 7810SYS8,16,c$,Oc%:IFxc%>=20ANDOc%!0=1213419859THEN 7815SYS272129,8,-1TOid%:kd%=Oc%!4:B%=1096040772:C%=4+kd%+1:dd%=USR(P%+12)+4:IFdd%=4ERROR253,FNmsg_1(A%!12,"FA5","DATA") 7820SYS131102,6,,,id%TOC%,,jd%;gb%:IF(gb%AND1)ERROR253,FNmsg_1(A%!12,"FA5","squash") 7825SYS272129,4,jd%,Oc%+20,xc%-20,dd%,kd%TOld%:SYS30,7,,jd%:B%=1096040772:C%=Oc%-4:CALLP%+16:Oc%=dd%:xc%=kd% 7830ENDIF 7835tb%=Oc%-4:!tb%=0:ub%=1:B%=Oc%:C%=xc%:CALLP%+52:IFOc%?(xc%-1)<>13xc%+=1:Oc%?(xc%-1)=13 7840V$=c$:=-1 7845DEFPROCm:B%=1096040772:C%=Oc%-4:CALLP%+16:Oc%=0:xc%=0:ENDPROC 7850DEFPROCOa:md%=Oc%:nd%=tb%:od%=xc%:pd%=ub%:pa$=V$:ENDPROC 7855DEFPROCPa:Oc%=md%:tb%=nd%:xc%=od%:ub%=pd%:V$=pa$:ENDPROC 7860DEFPROCRb(H%,S%):LOCALs%,t%,s$,z%,N%:S%!(S%!4*4+8)+=1:B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR253,FNmsg_1(A%!12,"FA5","PRNT") 7865IFA%!48THEN 7870s%=A%!48:WHILEs%!0:s%=s%!0:ENDWHILE:s%!0=z% 7875ELSE:A%!48=z% 7880ENDIF 7885z%!0=0:z%!4=H%:B%=S%!8:C%=2:z%!8=USR(P%+28):B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR253,FNmsg_1(A%!12,"FA5","CNCT") 7890SYS6,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:IFNOTFNsTHEN 7895N%!12=0 7900ELSE:SYS6,161,3TO,,s%:SYS6,161,4TO,,t%:IFs%THEN 7905$q%=STR$t%+"."+STR$s%:B%=q%:C%=2:N%!12=USR(P%+28) 7910ELSE:s$=CHR$t%:FORs%=1TO5:SYS6,161,152+s%TO,,t%:IFt%s$+=CHR$t%ELSEs%=5 7915NEXT:$q%=s$:B%=q%:C%=2:N%!12=USR(P%+28) 7920ENDIF 7925ENDIF 7930SYS131107,"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") 7935IF0<=H%!36-1THEN 7940FORt%=0TOH%!36-1:s%!(t%*4)=0:NEXT 7945ENDIF 7950z%!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 7955z%!48=FNG 7960ELSE:z%!48=0 7965ENDIF 7970z%!52=0:PROCc(H%,z%,-4,0):IFH%!24AND4PROCc(H%,z%,-12,0) 7975PROCk:IFH%!24AND8THEN 7980z%!56=10*H%?(24+1) 7985ELSE:z%!56=-1 7990ENDIF 7995PROCZ(z%):ENDPROC 8000DEFPROCt(RETURNz%,RETURNR%,RETURNnb%):SYS262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=0:z%=A%!48:WHILEz%:IFz%!28=nb%THEN 8005ENDPROC 8010ELSE:z%=z%!0 8015ENDIF 8020ENDWHILE:R%=Ha%:WHILER%:IFR%!16=nb%THEN 8025ENDPROC 8030ELSE:R%=R%!0 8035ENDIF 8040ENDWHILE:ENDPROC 8045DEFPROCTb (RETURNz%,RETURNnb%):SYS262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=0:z%=A%!48:WHILEz%:IFz%!28=nb%THEN 8050ENDPROC 8055ELSE:z%=z%!0 8060ENDIF 8065ENDWHILE:ENDPROC 8070DEFPROCUb (RETURNR%,RETURNnb%):SYS262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=Ha%:WHILER%:IFR%!16=nb%THEN 8075ENDPROC 8080ELSE:R%=R%!0 8085ENDIF 8090ENDWHILE:ENDPROC 8095DEFPROCT(z%):LOCALN%,i%,qd%,rd%,sd%:IFz%!24AND8ERROR254,FNmsg_0(A%!12,"OKAJ") 8100ya%=z%:za%=z%!4:N%=z%!12:IFz%!24AND(1<<17)THEN 8105ENDPROC 8110ENDIF 8115IFza%!24AND4THEN 8120PROCc(za%,ya%,-11,0):PROCs(FNprinter_find_window(ya%,"connections")):PROCq(FNprinter_find_window(ya%,"connections")) 8125ELSE:IFz%!40PROCicon_write(Q%,31,$z%!40)ELSEPROCicon_write(Q%,31,$z%!8) 8130IFN%?6AND1PROCicon_select(Q%,37)ELSEPROCicon_deselect(Q%,37) 8135PROCicon_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 8140WHEN1:i%=0 8145WHEN2:i%=1 8150WHEN4:IFFNs i%=2 8155WHEN5:i%=4 8160WHEN6:IFFNy i%=3 8165WHEN8:IFza%!24AND16i%=33 8170ENDCASE 8175IFNOTi%PROCicon_select(Q%,i%) 8180PROCicon_write(Q%,15,FNmsg_0(A%!12,"BR"+STR$N%?4)):i%=N%!8:qd%=i%AND3:sd%=(i%AND4)>>2:rd%=(i%AND48)>>4:IF(i%AND8)=0rd%=0ELSErd%+=1 8185PROCicon_write(Q%,17,FNmsg_0(A%!12,"DA"+STR$qd%)):PROCicon_write(Q%,18,FNmsg_0(A%!12,"PA"+STR$rd%)):IFsd%=0THEN 8190PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB0")) 8195ELSE:IFqd%=0ANDrd%<>0THEN 8200PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1b")) 8205ELSE:IFqd%=3ANDrd%=0THEN 8210PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1c")) 8215ELSE:PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1a")) 8220ENDIF 8225ENDIF 8230ENDIF 8235IFN%?5PROCicon_select(Q%,13)ELSEPROCicon_deselect(Q%,13) 8240IFN%?6AND2PROCicon_select(Q%,35)ELSEPROCicon_deselect(Q%,35) 8245PROCu(Q%,25,N%,12):PROCu(Q%,26,N%,20):PROCu(Q%,27,N%,24):PROCu(Q%,28,N%,28):PROCu(Q%,29,N%,32):IF$N%!16<>""PROCu(Q%,30,N%,16)ELSEPROCicon_write(Q%,30,"null:") 8250IFFNsPROCicon_unshade(Q%,2)ELSEPROCicon_shade(Q%,2) 8255IFFNyPROCicon_unshade(Q%,3)ELSEPROCicon_shade(Q%,3) 8260!W%=Q%:SYS262348,,W%OR1:W%!28=-1:IFza%!24AND16PROCicon_unshade(Q%,33)ELSEPROCicon_shade(Q%,33) 8265PROCs(Q%):SYS262341,,W%:PROCob 8270ENDIF 8275ENDPROC 8280DEFPROCu(Kb%,nb%,td%,Wa%):PROCicon_write(Kb%,nb%,FNprinter_read_string(td%!Wa%)):ENDPROC 8285DEFPROCC(td%,Wa%,nb%):IFtd%!Wa%THEN 8290B%=1196577875:C%=td%!Wa%:CALLP%+16:td%!Wa%=0 8295ENDIF 8300!X%=Q%:X%!4=nb%:SYS262350,,X%:B%=X%!28:C%=2:td%!Wa%=USR(P%+28):ENDPROC 8305DEFFNu:=FNT(Q%,17,3,"DA",A%!12) 8310DEFFNp:=FNT(Q%,18,4,"PA",A%!12) 8315DEFFNU:IFFNicon_read(Q%,19)=FNmsg_0(A%!12,"SB0")THEN=0ELSE=1 8320DEFPROCFb(ud%):IFud%=-1ud%=FNU 8325IFud%=0THEN 8330PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB0")) 8335ELSE:IFFNu=0ANDFNp<>0THEN 8340PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1b")) 8345ELSE:IFFNu=3ANDFNp=0THEN 8350PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1c")) 8355ELSE:PROCicon_write(Q%,19,FNmsg_0(A%!12,"SB1a")) 8360ENDIF 8365ENDIF 8370ENDIF 8375ENDPROC 8380DEFFNT(Kb%,nb%,vd%,qa$,wd%):LOCALi%,s$:s$=FNicon_read(Kb%,nb%):IF0<=vd%THEN 8385FORi%=0TOvd%:IFs$=FNmsg_0(wd%,qa$+STR$i%)THEN=i% 8390NEXT 8395ENDIF 8400=0 8405DEFPROCjb:LOCALN%,i%,p$,s$:N%=ya%!12:N%!0=0:IFFNicon_set(Q%,37)THEN 8410N%?6=N%?6OR1 8415ELSE:N%?6=N%?6ANDNOT1 8420ENDIF 8425IFFNicon_set(Q%,0)THEN 8430p$=FNB(1,ya%):IFp$=""N%!0=1ELSEERROR254,FNmsg_1(A%!12,"OKI",p$) 8435ENDIF 8440IFFNicon_set(Q%,1)THEN 8445p$=FNB(2,ya%):IFp$=""N%!0=2ELSEERROR254,FNmsg_1(A%!12,"OKJ",p$) 8450ENDIF 8455IFFNicon_set(Q%,2)N%!0=4 8460IFFNicon_set(Q%,3)N%!0=6 8465IFFNicon_set(Q%,4)N%!0=5 8470IFFNicon_set(Q%,33)N%!0=8 8475s$=FNicon_read(Q%,15):FORi%=0TO18:IFFNmsg_0(A%!12,"BR"+STR$i%)=s$THEN 8480N%?4=i%:i%=18 8485ENDIF 8490NEXT:i%=FNuORFNU<<2:IFFNp i%=i%ORFNp-1<<4OR8 8495N%!8=i%:IFFNicon_set(Q%,13)THEN 8500N%?5=1 8505ELSE:N%?5=0 8510ENDIF 8515IFFNicon_set(Q%,35)THEN 8520N%?6=N%?6OR2 8525ELSE:N%?6=N%?6ANDNOT2 8530ENDIF 8535PROCC(N%,12,25):PROCC(N%,20,26):PROCC(N%,24,27):PROCC(N%,28,28):PROCC(N%,32,29):PROCC(N%,16,30):PROCib(ya%):PROCf(-1,ya%,0):IFNOTya%!20THEN 8540IFya%!24AND2THEN 8545PROCselect_printer(ya%,-1,0) 8550ENDIF 8555PROCi(ya%) 8560ENDIF 8565ENDPROC 8570DEFPROCi(z%):LOCALra$,i%,x$,sa$,xd%,H%:IFz%!20=-1ENDPROC 8575H%=z%!4:ra$=FNV(z%):IFz%!44x$=$z%!44ELSEx$=$H%!4 8580sa$="ss_"+x$+","+x$:!O%=-1:O%!4=z%!20:SYS262350,,O%:xd%=O%!24AND1<<21:IFra$<>$O%!28ORsa$<>$O%!32THEN 8585i%=FNr(ra$,x$,-4,z%!20):PROCD(-1,z%!20):z%!20=i%:IFxd%PROCicon_select(-1,i%) 8590ENDIF 8595ENDPROC 8600DEFFNV(z%):LOCALN%,K%:IFz%!24AND4THEN=FNmsg_0(A%!12,"QU1") 8605IFz%!24AND8THEN 8610K%=z%!32:IFK%?11AND1THEN=FNmsg_0(A%!12,"QU1")ELSE=FNmsg_0(A%!12,"QU2") 8615ENDIF 8620IFz%!24AND32THEN=FNmsg_0(A%!12,"QU3") 8625IFz%!40THEN=$z%!40 8630N%=z%!12:CASEN%!0OF 8635WHEN0,1,2,5:=FNmsg_0(A%!12,"IC"+STR$N%!0) 8640WHEN4:=$N%!12 8645WHEN6:=$N%!24 8650ENDCASE 8655="" 8660DEFPROCAb:LOCALWa%,ld%,tc%,i%,s$,mc%:B%=1414744396:C%=2048:tc%=USR(P%+12):IFtc%=0ERROR253,FNmsg_1(A%!12,"FA5","LIST") 8665SYS393735,1,tc%,2048,500TOWa%;i%:IFi%AND1i%=Wa%+4:CALLZ%,i%,s$:ERROR254,s$ 8670PROCmenu_create(_%,FNmsg_0(A%!12,"ME6")):mc%=(_%!28AND256)<>0:ld%=tc%:i%=0:WHILEi%<Wa%:CALLZ%,ld%,s$:ld%+=LENs$+1:PROCmenu_item(_%,i%,s$,mc%):i%+=1:ENDWHILE:B%=1414744396:C%=tc%:CALLP%+16:ENDPROC 8675DEFPROCIb:LOCALz%,N%,nb%,gb%:LOCALR%,yd%,zd%,ib%,Ad%:REPEAT:PROCTb(z%,nb%):IFz%THEN 8680PROCicon_deselect(Bb%,nb%):IF(z%!24AND1)=0PROCZ(z%) 8685IF(z%!24AND(1<<16))THEN 8690PROCgb (z%) 8695ENDIF 8700ENDIF 8705UNTILz%=0:zd%=0:SYS263872:REPEAT:PROCUb (R%,nb%):IFR%THEN 8710IFR%!20<=0THEN 8715PROCicon_deselect(Bb%,nb%):ib%=FND (R%!4,R%!8,R%!12):PROCK (zd%,ib%) 8720ENDIF 8725ENDIF 8730UNTILR%=0:ib%=zd%:WHILEib%:yd%=FNx(ib%,0,0,0,gb%):PROCTa (Ha%,$ib%!4):Ad%=ib%:ib%=ib%!0:PROCd (1380799568,Ad%):ENDWHILE:SYS263873:ENDPROC 8735DEFPROCZ(z%):z%!24=z%!24OR1:N%=z%!12:PROCUa(z%):PROCA(z%):IFA%!44=1THEN 8740PROCselect_printer(z%,-1,0) 8745ENDIF 8750ENDPROC 8755DEFPROCUa(z%):LOCALs$,i%,mb%,H%:H%=z%!4:IFz%!44THEN 8760s$=$z%!44 8765ELSE:s$=$H%!4 8770ENDIF 8775i%=FNka(z%):mb%=-4:IFi%=-1THEN 8780i%=FNW(z%):mb%=-3 8785ENDIF 8790IFi%=-1THEN 8795i%=251658240:mb%=-5 8800ENDIF 8805z%!20=FNr(FNV(z%),s$,mb%,i%):IFsb%THEN 8810PROCD(-1,rb%):sb%=0 8815ENDIF 8820A%!44+=1:ENDPROC 8825DEFFNka(z%):LOCALnb%,Bd%:IFsb%THEN 8830nb%=rb% 8835ELSE:nb%=-1:Bd%=A%!48:WHILEBd%:IFNOTBd%!20nb%=Bd%!20 8840IFBd%=z%Bd%=0ELSEBd%=Bd%!0 8845ENDWHILE 8850ENDIF 8855=nb% 8860DEFFNW(z%):WHILEz%!20=-1:z%=z%!0:IFz%=0THEN=-1 8865ENDWHILE:=z%!20 8870DEFPROCVb:rb%=FNr(FNmsg_0(A%!12,"NNE"),"s"+FNmsg_0(A%!12,"IC"),-5,251658240):sb%=-1:!q%=A%!40:PROCe:ENDPROC 8875DEFPROCJb:LOCALz%,nb%,Cd%,c$,Ad%:LOCALR%,Cd%,zd%,ib%,z%:zd%=0:REPEAT:PROCt(z%,R%,nb%):PROCicon_deselect(Bb%,nb%):IFz%THEN 8880IFz%!24AND(1<<17)THEN 8885ib%=FND (0,0,z%):PROCK (zd%,ib%) 8890ELSE:PROCWb(z%) 8895ENDIF 8900ENDIF 8905IFR%ANDR%!20>0THEN 8910PROCXb ($R%!4):IFFNJ=0ANDA%!44=0THEN 8915PROCVb 8920ENDIF 8925ENDIF 8930UNTILz%=0ANDR%=0:ib%=zd%:WHILEib%:z%=ib%!12:c$=$z%!40:PROCZb (z%):PROC_b (c$):Ad%=ib%:ib%=ib%!0:PROCd (1380799568,Ad%):ENDWHILE:PROCk:IFV%=0THEN 8935IFA%!44THEN 8940Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 8945PROCselect_printer(Cd%,-1,0):Cd%=0 8950ELSE:Cd%=Cd%!0 8955ENDIF 8960ENDWHILE 8965ENDIF 8970ENDIF 8975ENDPROC 8980DEFPROCWb(z%):LOCALDd%:IFz%!24AND(1<<16)THEN 8985PROCgb (z%) 8990ENDIF 8995IFz%!24AND(1<<17)THEN 9000Dd%=-1 9005ENDIF 9010IFz%!24AND1THEN 9015IFz%!24AND(1<<17)THEN 9020Cd%=-1 9025ELSE:IFz%!32THEN 9030Cd%=FNX("WA2",$z%!8) 9035ELSE:Cd%=-1 9040ENDIF 9045ENDIF 9050IFCd%THEN 9055PROCc(z%!4,z%,-10,0):IFNOTz%!20THEN 9060IFA%!44=1ANDFNJ=0THEN 9065PROCVb 9070ENDIF 9075IFA%!44=1ANDFNJ>0THEN 9080!q%=A%!40:PROCe 9085ENDIF 9090PROCD(-1,z%!20):z%!20=-1:A%!44-=1 9095ENDIF 9100z%!24=z%!24ANDNOT63+65536:IFV%=z%SYS524632,-1:V%=0 9105PROCA(z%) 9110ENDIF 9115ENDIF 9120ENDPROC 9125DEFPROCKb:LOCALi%,z%,M%,Fd%,Gd%,Cd%,y$:B%=1482184792:C%=256:Gd%=USR(P%+12):IFGd%=0ERROR253,FNmsg_1(A%!12,"FA5","XXXX") 9130SYS262358,Bb%,Gd%,1<<21,1<<21:M%=Gd%:SYS263872:WHILENOT!M%:i%=!M%:z%=A%!48:Fd%=0:WHILEz%:IF((z%!24AND(1<<17))=0)ANDz%!28=i%THEN 9135IFz%!32THEN 9140SYS263873:Cd%=FNX("WA3",$z%!8):SYS263872:IFCd%PROCA(z%) 9145ELSE:Cd%=-1 9150ENDIF 9155IFCd%THEN 9160y$=$z%!8:PROC`b(z%,Fd%):PROCLb(y$) 9165ENDIF 9170z%=0 9175ELSE:Fd%=z%:z%=z%!0 9180ENDIF 9185ENDWHILE:M%+=4:ENDWHILE:IFV%=0THEN 9190IFA%!44THEN 9195Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 9200PROCselect_printer(Cd%,-1,0):Cd%=0 9205ELSE:Cd%=Cd%!0 9210ENDIF 9215ENDWHILE 9220ENDIF 9225ENDIF 9230IFV%=0PROCz 9235B%=1482184792:C%=Gd%:CALLP%+16:PROCk:PROCq(Bb%):SYS263873:ENDPROC 9240DEFPROC`b(z%,Fd%):LOCALj%,i%,Oa%,H%,S%:H%=z%!4:S%=H%!12:S%=S%!4:PROCc(H%,z%,-9,0):PROCWb(z%):WHILES%:IF$S%!8=$z%!8THEN 9245S%!(S%!4*4+8)-=1:S%=0 9250ELSE:S%=S%!0 9255ENDIF 9260ENDWHILE:IFya%=z%THEN 9265!q%=Q%:PROCe 9270ENDIF 9275i%=H%!20:WHILEi%:IFi%!12=z%THEN 9280!q%=i%!4:PROCe 9285ENDIF 9290i%=i%!0:ENDWHILE:IFz%!48PROCVa(z%!48) 9295IFV%=z%V%=0 9300PROCfree_structure(z%!8):j%=z%!12:IF(H%!24AND4)THEN 9305Oa%=H%!48:IF1<=Oa%THEN 9310FORi%=1TOOa%:PROCfree_structure(!j%):j%+=4:NEXT 9315ENDIF 9320ELSE:PROCfree_structure(j%!12):PROCfree_structure(j%!16):PROCfree_structure(j%!20):PROCfree_structure(j%!24):PROCfree_structure(j%!28):PROCfree_structure(j%!32) 9325ENDIF 9330B%=1413697091:C%=j%:CALLP%+16:j%=z%!16:IFj%THEN 9335Oa%=H%!36:IF0<=Oa%-1THEN 9340FORi%=0TOOa%-1:PROCfree_structure(j%!(i%*4)):NEXT 9345ENDIF 9350ENDIF 9355B%=1195789891:C%=j%:CALLP%+16:!q%=Bb%: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% 9360CALLP%+16:IFFd%THEN 9365Fd%!0=j% 9370ELSE:A%!48=j% 9375ENDIF 9380ENDPROC 9385DEFFNX(na$,ta$):LOCALx%,y%,w%,h%:PROCicon_write(Ab%,0,FNmsg_1(A%!12,na$,ta$)):PROCicon_write(Ab%,3,FNmsg_0(A%!12,na$+"a")):SYS262351,,q%:x%=!q%:y%=q%!4:!q%=Ab%: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% 9390q%!16=q%!8+h%:q%!28=-1:SYS262341,,q%:PROCac(Ab%):pa%=0:REPEAT:PROCv(la%):UNTILpa%:!q%=Ab%:PROCe:PROCbc:=(pa%=3) 9395DEFPROCac(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 9400DEFPROCbc:LOCALHd%,Id%,Jd%,Kd%,Ld%,Md%:SYS53,-1,4TO,,Id%:Id%=1<<Id%:SYS53,-1,5TO,,Kd%:Kd%=1<<Kd%:SYS53,-1,11TO,,Hd%:Hd%+=1:SYS53,-1,12TO,,Jd%:Jd%+=1:Ld%=Hd%*Id%:Md%=Jd%*Kd%:?q%=1:q%!1=0:q%!3=0:q%!5=Ld%:q%!7=Md%:SYS7,21,q%:ENDPROC 9405DEFPROCk:LOCALz%,M%,i%:LOCALR%:!O%=Bb%:IFsa%THEN 9410FORi%=0TOsa%-1:O%!4=i%+4:SYS262340,,O%:NEXT 9415ENDIF 9420IFJa%THEN 9425FORi%=sa%TOsa%+Ja%:O%!4=i%+4:SYS262340,,O%:NEXT 9430ENDIF 9435sa%=0:Ja%=0:!O%=Bb%: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%:sa%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):z%!28=i%:z%=z%!0:ENDWHILE:R%=Ha%:WHILER% 9440SYS262338,,O%TOi%:Ja%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):R%!16=i%:R%=R%!0:ENDWHILE:SYS262348,,O%OR1:O%!0=0:O%!4=-(sa%+Ja%+1)*(a%(4)!12-a%(4)!4):O%!8=O%!52-O%!44:O%!12=0:SYS262359,Bb%,O% 9445O%!4=-(sa%+Ja%+2)*(a%(4)!12-a%(4)!4):SYS262353,Bb%,O%!0,O%!4,O%!8,O%!12:IFFNh (Bb%)THEN 9450PROCq(Bb%) 9455ENDIF 9460ENDPROC 9465DEFFNy:LOCALi%:SYS131129,,"NFS_Mount"TO;i%:=((i%AND1)=0) 9470DEFFNs:LOCALi%:SYS131129,,"NetPrint_ReadPSName"TO;i%:=((i%AND1)=0) 9475DEFFNc(s$):LOCALt%,n%,f%:SYS131117,s$,aa%,256TO,t%,n%;f%:IFt%OR(f%AND1)ERROR253,FNmsg_1(A%!12,"FAD",s$) 9480=n% 9485DEFPROCw(z%,Nd%,Od%):LOCALp%:p%=ra%:WHILEp%:PROCc(p%,z%,Nd%,Od%):p%=p%!0:ENDWHILE:ENDPROC 9490DEFPROCc(H%,z%,Nd%,Pd%):LOCALi%:LOCALERROR:ONERRORLOCAL:RESTOREERROR:PROCcc(H%,z%,Nd%):ENDPROC 9495O%!0=Nd%:O%!4=H%:O%!8=z%:O%!12=Pd%:O%!16=ia%:O%!20=P%:O%!24=A%:IFH%!24AND1THEN 9500i%=EVAL("FN"+$H%!4+"_support("+STR$O%+")") 9505ELSE:IF0<=Va%-1THEN 9510FORi%=0TOVa%-1:IF$H%!4=b$(i%)THEN 9515B%=O%:CALLb%(i%) 9520ENDIF 9525NEXT 9530ENDIF 9535ENDIF 9540ENDPROC 9545DEFPROCcc(H%,z%,Nd%):IF(z%!24AND8)ERROR254,REPORT$ 9550IFERR=253ERROR253,REPORT$ 9555PROCb(FNv(A%!12,"WA6",$H%!4,STR$Nd%,REPORT$,STR$ERL)):ENDPROC 9560DEFPROCdc(z%):z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 9565DEFPROCnb(z%,c$):LOCALIb%,Qd%,i%:IFc$="configure"THEN 9570IFz%!24AND8ERROR254,FNmsg_0(A%!12,"OKAI") 9575ENDIF 9580Ib%=FNprinter_find_window(z%,c$):PROCs(Ib%):PROCq(Ib%):!O%=Ib%:SYS262348,,O%OR1:Qd%=O%!88:FORi%=0TOQd%:!O%=Ib%:O%!4=i%:SYS262350,,O%:IF(O%!24AND(1<<23))=0THEN 9585IF(O%!24AND(15<<12))=(15<<12)THEN 9590IF(z%!24AND(1<<16))OR(z%!24AND(1<<17))THEN 9595PROCicon_shade (Ib%,i%):PROCcaret_set (-1,-1) 9600ELSE:PROCicon_unshade (Ib%,i%):PROCcaret_set(Ib%,i%) 9605ENDIF 9610ENDPROC 9615ENDIF 9620ENDIF 9625NEXT:ENDPROC 9630DEFFNprinter_find_window(z%,c$):LOCALH%:H%=z%!4:i%=H%!20:WHILEi%:IF$(i%+16)=c$THEN 9635i%!8=H%:i%!12=z%:=i%!4 9640ENDIF 9645i%=i%!0:ENDWHILE:ERROR253,FNmsg_1(A%!12,"FAE",c$):=0 9650DEFPROCG(Ib%,RETURNKb%,RETURNH%,RETURNz%):H%=ra%:WHILEH%:Kb%=H%!20:WHILEKb%:IFKb%!4=Ib%THEN 9655z%=Kb%!12:ENDPROC 9660ENDIF 9665Kb%=Kb%!0:ENDWHILE:H%=H%!0:ENDWHILE:Kb%=0:H%=0:z%=0:ENDPROC 9670DEFFNprinter_find_prdata_entry(H%,c$):LOCALS%:IFH%=0THEN=0 9675S%=H%!12:IFS%=0THEN=0 9680S%=S%!4:IFS%=0THEN=0 9685WHILE$S%!8<>c$:S%=S%!0:IFS%=0THEN=0 9690ENDWHILE:=S% 9695DEFFNZ(M%):IFM%=0THEN=0 9700IFM%!-4<>1196707401ANDM%!-4<>1381257040THEN 9705ERROR253,FNmsg_0(A%!12,"FA6") 9710ENDIF 9715=!M% 9720DEFFNprinter_read_string(M%):LOCALi%,s$:IFM%=0THEN="" 9725CASEM%!-4OF 9730WHEN1196577875:=$M% 9735WHEN810701907:CALLZ%,M%,s$:=s$ 9740WHEN1381258055:CALLY%,M%,s$:=s$ 9745ENDCASE 9750ERROR253,FNmsg_0(A%!12,"FA7"):="" 9755DEFFNprinter_read_integer_entry(S%,Rd%):IFS%=0THEN=0 9760=FNZ(S%!(4+Rd%*4)) 9765DEFFNprinter_read_string_entry(S%,Rd%):IFS%=0THEN="" 9770=FNprinter_read_string(S%!(4+Rd%*4)) 9775DEFFNprinter_read_boolean_string_entry(S%,Rd%,Sd%):LOCALM%:IFS%=0="" 9780M%=S%!(4+Rd%*4):IFM%!-4<>1280266050ERROR253,FNmsg_0(A%!12,"FA8") 9785IFSd%THEN 9790=FNprinter_read_string(M%!4) 9795ELSE:=FNprinter_read_string(M%!0) 9800ENDIF 9805DEFFNprinter_read_list_integer_entry(S%,Rd%,tc%,Td%):LOCALM%:IFS%=0THEN=0 9810M%=S%!(4+Rd%*4):IFM%=0=0 9815IFM%!-4<>1146377036ERROR253,FNmsg_0(A%!12,"FA9") 9820WHILEtc%<>1ANDM%:M%=M%!0:tc%-=1:ENDWHILE:IFM%=0=0 9825M%+=8:WHILETd%<>1:M%+=4:Td%-=1:ENDWHILE:=FNZ(!M%) 9830DEFPROCaa(N$,RETURNUd%):LOCALERROR:ONERRORLOCALRESTOREERROR:ERROR0,REPORT$ 9835SYS30,6,,,17+LENN$TO,,Ud%:$(Ud%+16)=N$:SYS267521,Ud%,Ud%+16:ENDPROC 9840DEFFNmsg_0(Ud%,T$)=FNv(Ud%,T$,"","","","") 9845DEFFNmsg_1(Ud%,T$,S$)=FNv(Ud%,T$,S$,"","","") 9850DEFFNmsg_2(Ud%,T$,ua$,va$)=FNv(Ud%,T$,ua$,va$,"","") 9855DEFFNQ(Ud%,T$,ua$,va$,wa$)=FNv(Ud%,T$,ua$,va$,wa$,"") 9860DEFFNv(Ud%,T$,ua$,va$,wa$,xa$):LOCALF%,L%:SYS398594,Ud%,T$,ba%,256,ua$,va$,wa$,xa$TO,,,L%;F%:IFF%AND1THEN=T$ 9865ba%?L%=13:=$ba% 9870DEFPROC_(Ud%):IFUd%THEN 9875SYS267524,Ud%:SYS131102,7,,Ud% 9880ENDIF 9885ENDPROC 9890DEFPROCca(n$):ya$=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 9895SYS262336,300,1263747412,n$,q%TOVd%,Ob%:ENDPROC 9900DEFPROChb:SYS262365:END 9905DEFFNaa(ca%):LOCALWd%,Xd%,z%,t%:IFK$<>""ca%=ca%OR1 9910IF(ca%AND1)=0ORea%=-1ORca%<>A%!20THEN 9915SYS262343,ca%,q%,,Ia%TOWd% 9920ELSE:IFea%=0ORK$<>""THEN 9925SYS262343,ca%ANDNOT1,q%,,Ia%TOWd% 9930ELSE:SYS262369,ca%ANDNOT1,q%,ja%+ea%,Ia%TOWd% 9935ENDIF 9940ENDIF 9945SYS66TOXd%:Zd%=Xd%-ja%:ja%=Xd%:z%=A%!48:WHILEz%:t%=z%+56:IFNOT!t%THEN 9950IFZd%<!t% !t%-=Zd%ELSE!t%=0 9955ENDIF 9960z%=z%!0:ENDWHILE:=Wd% 9965DEFPROCna:LOCALz%,H%,t%:IFK$<>""THEN 9970SYS131080,6,K$:K$="" 9975ENDIF 9980z%=A%!48:WHILEz%:t%=z%+56:IF!t%=0THEN 9985H%=z%!4:PROCc(H%,z%,0,0):!t%=10*H%?(24+1) 9990ENDIF 9995z%=z%!0:ENDWHILE:ENDPROC 10000DEFFNtask_read_env(n$,_d%):LOCALTc%,hb%:SYS131107,n$,_d%,256,,3TO,,Tc%;hb%:IFhb%AND1Tc%=0 10005_d%?Tc%=13:=$_d% 10010DEFFNla(a$,b$):LOCAL`d%:SYS274525,-1,a$,b$,3TO`d%:=`d% 10015DEFFNtask_lower(s$):LOCALl$,ae%,i%:SYS274519,-1TOae%:l$="":IF1<=LENs$THEN 10020FORi%=1TOLENs$:l$+=CHR$ae%?ASCMID$(s$,i%,i%):NEXT 10025ENDIF 10030=l$ 10035DEFFNtask_upper(s$):LOCALu$,ae%,i%:SYS274520,-1TOae%:u$="":IF1<=LENs$THEN 10040FORi%=1TOLENs$:u$+=CHR$ae%?ASCMID$(s$,i%,i%):NEXT 10045ENDIF 10050=u$ 10055DEFPROCda:DIMbe%256:ENDPROC 10060DEFPROCla:LOCALr$,r%:r$=REPORT$:r%=INSTR(r$,"in "+CHR$34+"!"):IFr%r$=LEFT$(r$,r%-1) 10065CASEERROF 10070WHEN254:PROCj(r$,1) 10075WHEN253:PROCj(r$,2) 10080OTHERWISE:PROCj("Unexpected error: "+r$+" (error number &"+STR$~ERR+") at line "+STR$ERL,3) 10085ENDCASE 10090ENDPROC 10095DEFPROCj(r$,ce%):LOCALr%:SYS262356,,-1:!be%=ERR:$(be%+4)=r$+CHR$0:SYS262367,be%,ce%,ya$TO,r%:IFr%=2THEN 10100ONERROROFF 10105Nb%=2:PROCH:PROCx 10110ENDIF 10115ENDPROC 10120DEFPROCb(r$):!be%=1:$(be%+4)=r$+CHR$0:SYS262367,be%,1OR1<<4,FNmsg_1(A%!12,"ER2",ya$):ENDPROC 10125DEFPROCea:de%=0:ENDPROC 10130DEFFNr(za$,x$,mb%,ee%):LOCALt%,s%,i%,v$,w%:IFx$="s"+FNmsg_0(A%!12,"IC")THEN 10135v$="s"+x$:SYS262377,40,,x$TO,,,w% 10140ELSE:SYS393449,40,,x$TO,,,w%;i%:IFi%AND1THEN 10145SYS262377,40,,"s"+FNmsg_0(A%!12,"IC")TO,,,w%:IFLEFT$(x$,3)="su_"THEN 10150v$="ssu"+FNmsg_0(A%!12,"IC") 10155ELSE:v$="ss"+FNmsg_0(A%!12,"IC")+","+FNmsg_0(A%!12,"IC") 10160ENDIF 10165ELSE:IFLEFT$(x$,3)="su_"THEN 10170v$="s"+x$ 10175ELSE:v$="ss_"+x$+","+x$ 10180ENDIF 10185ENDIF 10190ENDIF 10195B%=1179009609:C%=LENza$+1:t%=USR(P%+12):IFt%=0ERROR253,FNmsg_1(A%!12,"FA5","IBFF") 10200$t%=za$:B%=1179009609:C%=LENv$+1:s%=USR(P%+12):IFs%=0ERROR253,FNmsg_1(A%!12,"FA5","IBFF") 10205$s%=v$:SYS53,-1,4TO,,i%:IF(w%<<i%)<LENza$*16w%=LENza$*16ELSEw%=w%<<i% 10210X%!0=mb%:X%!4=0:X%!8=-16:X%!12=w%:X%!16=88:X%!20=385888523:X%!24=t%:X%!28=s%:X%!32=LENza$+1:SYS262338,ee%,X%TOi%:=i% 10215DEFPROCD(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:SYS262340,,X%:IFX%!24AND1<<8THEN 10220IFX%!24AND3THEN 10225B%=1179009609:C%=X%!28:CALLP%+16:IFX%!24AND1THEN 10230IFNOTX%!32THEN 10235B%=1179009609:C%=X%!32:CALLP%+16 10240ENDIF 10245ENDIF 10250ENDIF 10255ENDIF 10260ENDPROC 10265DEFPROCicon_write(a%,b%,s$):LOCALh%,i%,n%:PROCcaret_info(h%,i%,n%):!X%=a%:X%!4=b%:SYS262350,,X%:IFLENs$+1>X%!36THEN 10270ERROR253,FNmsg_2(A%!12,"FAH",s$,STR$b%) 10275ENDIF 10280$X%!28=s$:X%!8=0:X%!12=0:SYS262349,,X%:IFh%=a%ANDi%=b%PROCcaret_set(a%,b%) 10285ENDPROC 10290DEFPROCicon_validation(a%,b%,s$):!X%=a%:X%!4=b%:SYS262350,,X%:$X%!32=s$:X%!8=0:X%!12=0:SYS262349,,X%:ENDPROC 10295DEFFNicon_read(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:=$X%!28 10300DEFPROCicon_unshade(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<22:SYS262349,,X%:ENDPROC 10305DEFPROCicon_shade(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<22:X%!12=1<<22:SYS262349,,X%:ENDPROC 10310DEFPROCicon_deselect(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<21:SYS262349,,X%:IFa%=Bb%ta%=0 10315ENDPROC 10320DEFPROCicon_select(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<21:X%!12=1<<21:SYS262349,,X%:IFa%=Bb%ta%=0 10325ENDPROC 10330DEFFNicon_set(a%,b%):!X%=a%:X%!4=b%:SYS262350,,X%:=(X%!24AND1<<21)<>0 10335DEFPROCicon_info(a%,b%,RETURNfe%,RETURNge%,RETURNhe%,RETURNie%):!X%=a%:X%!4=b%:SYS262350,,X%:fe%=X%!8:ge%=X%!12:he%=X%!16:ie%=X%!20:ENDPROC 10340DEFPROCcaret_set(h%,i%):LOCALj%:j%=LENFNicon_read(h%,i%):SYS262354,h%,i%,-1,-1,,j%:SYS262354,h%,i%,-1,-1,-1,j%:ENDPROC 10345DEFPROCcaret_info(RETURNh%,RETURNi%,RETURNn%):SYS262355,,X%:h%=!X%:i%=X%!4:n%=X%!20:ENDPROC 10350DEFPROCfa:Z$="":ENDPROC 10355DEFPROCFa(Aa$,Ba$):LOCALa$,a%:SYS6,161,140TO,,a%:IF(a%AND1)=1THEN 10360SYS8,17,Ba$TOa%:IFa%=1Z$=Ba$ELSEZ$=Aa$ 10365ELSE:Z$=Aa$ 10370ENDIF 10375SYS262361,,Z$:ENDPROC 10380DEFPROCHa:SYS262362:ENDPROC 10385DEFPROCl(f$,n$,je%,RETURNIb%):LOCAL_d%:PROCec(f$,n$,_d%):_d%!64=je%:PROCfc(_d%,Ib%):B%=1145981271:C%=_d%:CALLP%+16:ENDPROC 10390DEFPROCec(f$,n$,RETURNfc%):LOCALke%,Oa%,le%,jb%,s%,f%,s$:PROCgc(f$,n$,Oa%,le%):B%=1145981271:C%=Oa%+le%:fc%=USR(P%+12):IFfc%=0ERROR253,FNmsg_1(A%!12,"FA5","WIND") 10395IFf$<>""SYS262361,,f$ 10400IFle%THEN 10405B%=1179014466:C%=le%:ke%=USR(P%+12):IFke%=0ERROR253,FNmsg_1(A%!12,"FA5","BUFF") 10410SYS393435,,fc%,ke%,ke%+le%,-1,n$TOs%,,,,,,jb%;f% 10415ELSE:SYS393435,,fc%,,,-1,n$TOs%,,,,,,jb%;f% 10420ENDIF 10425IFf$<>""SYS262362 10430IFf%AND1f%=s%+4:CALLZ%,f%,s$:ERROR254,n$+": "+s$ 10435IFjb%=0ERROR254,FNmsg_1(A%!12,"OKAK",n$) 10440ENDPROC 10445DEFPROCfc(fc%,RETURNIb%):SYS262337,,fc%TOIb%:ENDPROC 10450DEFPROCq(a%):!W%=a%:SYS262347,,W%:W%!28=-1:SYS262341,,W%:ENDPROC 10455DEFPROCXa(a%,s$):LOCALme%,ne%,oe%,pe%:!W%=a%:SYS262348,,W%OR1:$W%!76=s$:IFW%!32AND1<<16THEN 10460ne%=W%!16:SYS262368,,W%:me%=W%!4:oe%=W%!12:pe%=W%!16:SYS262353,-1,me%,ne%,oe%,pe% 10465ENDIF 10470ENDPROC 10475DEFPROCGa(P$,RETURNM%,RETURNc$):LOCALf%,Wa%,Rb%:IFf$=""ANDVd%>=300THEN 10480SYS262363,,,,,-1,"*"+STRING$(12,CHR$0),M%TO,,,,,c$,M% 10485ELSE:IFP$=""P$=Z$ 10490f%=OPENINP$:IFM%=0M%=16 10495REPEAT:PTR#f%=M%:Wa%=FNi(f%):IFWa%THEN 10500PTR#f%=M%+8:Rb%=FNi(f%):c$=FNK(f%):M%+=24:IFRb%=1Wa%=0 10505ELSE:M%=0 10510ENDIF 10515UNTILWa%=0:SYS131085,,f% 10520ENDIF 10525ENDPROC 10530DEFPROCgc(f$,n$,RETURNOa%,RETURNle%):LOCALi%,qe%,M%,Wa%,Rb%,Ca$,Qd%:IFf$=""ANDVd%>=300THEN 10535SYS262363,,,,,-1,n$TO,Oa%,le% 10540ELSE:IFf$=""f$=Z$ 10545qe%=OPENINf$:Oa%=0:le%=0:M%=16:REPEAT:PTR#qe%=M%:Wa%=FNi(qe%):IFWa%THEN 10550PTR#qe%=M%+8:Rb%=FNi(qe%):Ca$=FNK(qe%):M%+=24:IFRb%=1THEN 10555IFCa$=n$THEN 10560PTR#qe%=Wa%+84:Qd%=FNi(qe%):le%=FNma(qe%,Wa%):IFQd%le%+=FNna(qe%,Qd%,Wa%) 10565Oa%=88+(Qd%*32):Wa%=0 10570ENDIF 10575ENDIF 10580ENDIF 10585UNTILWa%=0:SYS131085,,qe% 10590ENDIF 10595ENDPROC 10600DEFFNi(h%):=BGET#h%ORBGET#h%<<8ORBGET#h%<<16ORBGET#h%<<24 10605DEFFNK(h%):LOCALs$,c%:REPEAT:c%=BGET#h%:IFc%>31s$+=CHR$c% 10610UNTILc%<32:=s$ 10615DEFFNma(qe%,Wa%):LOCALv%:PTR#qe%=Wa%+28:v%=FNi(qe%):IFv%AND1<<31THEN 10620IFv%AND1<<26THEN=FNL(qe%,Wa%+56,Wa%+72,Wa%) 10625ELSE:IFv%AND1THEN=FNL(qe%,Wa%+56,Wa%+72,Wa%) 10630ENDIF 10635=0 10640DEFFNna(qe%,Uc%,Wa%):LOCALi%,j%:j%=0:IF0<=Uc%-1THEN 10645FORi%=0TOUc%-1:j%+=FNL(qe%,Wa%+88+i%*32+16,Wa%+88+i%*32+20,Wa%):NEXT 10650ENDIF 10655=j% 10660DEFFNL(qe%,re%,se%,Wa%):LOCALv%,te%,Oa%,i%:PTR#qe%=re%:v%=FNi(qe%):i%=v%AND256:te%=(v%AND3)+(i%>>6):CASEte%OF 10665WHEN0,1,2,3,4:Oa%=0 10670WHEN5,7:PTR#qe%=se%+4:v%=FNi(qe%):IFv%=-1THEN 10675Oa%=0 10680ELSE:PTR#qe%=Wa%+v%:Oa%=LENFNK(qe%)+1 10685ENDIF 10690PTR#qe%=se%+8:Oa%+=FNi(qe%) 10695WHEN6:PTR#qe%=se%+8:Oa%=FNi(qe%) 10700ENDCASE 10705=Oa% 10710DEFPROCia:LOCALf%:SYS131129,,"DragASprite_Start"TOue%;f%:IFf%AND1ue%=-1 10715SYS131129,,"DragASprite_Stop"TOve%;f%:IFf%AND1ve%=-1 10720SYS6,161,28TO,,f%:IF(f%AND2)=0THEN 10725ue%=-1:ve%=-1 10730ENDIF 10735B%=1163280723:C%=256:we%=USR(P%+12):IFwe%=0ERROR253,FNmsg_1(A%!12,"FA5","SAVE") 10740da%=0:ENDPROC 10745DEFPROCyb(xe%,Da$):LOCALb$:b$=STR$~xe%:b$=RIGHT$("000"+b$,3):ye%=xe%:PROCicon_validation(wb%,0,"sfile_"+b$):PROCicon_write(wb%,1,Da$):ENDPROC 10750DEFPROClb(ze%,Ae%):LOCALBe%,Ce%,De%,Fe%,Ge%,He%,Ld%,Md%,f$,Hd%,Id%,Jd%,Kd%:!we%=wb%:SYS262347,,we%:Be%=we%!4-we%!20:Ce%=we%!16-we%!24:PROCicon_info(wb%,0,De%,Ge%,Fe%,He%):SYS53,-1,4TO,,Id%:Id%=1<<Id%:SYS53,-1,5TO,,Kd%:Kd%=1<<Kd% 10755SYS53,-1,11TO,,Hd%:Hd%+=1:SYS53,-1,12TO,,Jd%:Jd%+=1:Ld%=Hd%*Id%:Md%=Jd%*Kd%:!we%=wb%:we%!4=5:we%!8=Be%+De%:we%!12=Ce%+Ge%:we%!16=Be%+Fe%:we%!20=Ce%+He%:we%!24=we%!8-ze%:we%!28=we%!12-Ae%:we%!32=Ld%+we%!16-ze% 10760we%!36=Md%+we%!20-Ae%:IFNOTue%THEN 10765f$="file_"+RIGHT$("000"+STR$~ye%,3):SYSue%,197,1,f$,we%+8,we%+24 10770ELSE:SYS262352,,we% 10775ENDIF 10780da%=-1:ENDPROC 10785DEFPROCqa:LOCALh%,i%,Ie%,Je%,Ke%:da%=0:IFNOTve%SYSve% 10790SYS262351,,we%:Ie%=!we%:Je%=we%!4:h%=we%!12:i%=we%!16:IFh%=wb%ENDPROC 10795PROChc(h%,i%,Ie%,Je%):ENDPROC 10800DEFPROChc(h%,i%,Ie%,Je%):LOCALFa$:Fa$=FNoa:!we%=48+LENFa$ANDNOT3:we%!12=0:we%!16=1:we%!20=h%:we%!24=i%:we%!28=Ie%:we%!32=Je%:we%!36=0:we%!40=ye%:$(we%+44)=Fa$+CHR$0:SYS262375,17,we%,h%,i%:ENDPROC 10805DEFFNoa:LOCALf$,i%:f$=FNicon_read(wb%,1):REPEAT:i%=INSTR(f$,":"):IFi%f$=MID$(f$,i%+1) 10810UNTILi%=0:REPEAT:i%=INSTR(f$,"."):IFi%f$=MID$(f$,i%+1) 10815UNTILi%=0:=f$ 10820DEFPROCga:Pb%=0:Le%=0:ENDPROC 10825DEFPROCmenu_create(RETURN_%,I$):LOCALQ$,i%,Ga$,i$,j%,x%,t%:IFPb%THEN 10830PROCic:Pb%=0:Le%=0 10835ENDIF 10840IFLEFT$(I$,1)="#"THEN 10845i%=1:Q$=FNM(I$,",",i%) 10850ELSE:Q$="" 10855ENDIF 10860Ga$=I$:j%=i%:REPEAT:i$=FNM(I$,",",i%):IFi$<>""Le%+=1 10865UNTILi$="":I$=Ga$:i%=j%:B%=1431192909:C%=28+Le%*24:Pb%=USR(P%+12):IFPb%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 10870IFLENQ$<=12THEN 10875$Pb%=Q$ 10880ELSE:B%=1431192909:C%=LENQ$+2:t%=USR(P%+12):IFt%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 10885$t%=Q$+CHR$0:Pb%!0=t% 10890ENDIF 10895Pb%?12=7:Pb%?13=2:Pb%?14=7:Pb%?15=0:Pb%!16=196:Pb%!20=44:Pb%!24=0:x%=LENQ$-3:Pb%!16=(x%*8+6)*2:FORj%=0TOLe%-1:i$=FNM(I$,",",i%):PROCmenu_item(Pb%,j%,i$,LENQ$>12):NEXT:_%=Pb%:ENDPROC 10900DEFPROCic:LOCALi%,p%,mc%:p%=Pb%+28:mc%=p%!0AND256:IF0<=Le%-1THEN 10905FORi%=0TOLe%-1:IFp%!8AND256THEN 10910IF(!p%AND4)=0THEN 10915B%=1431192909:C%=p%!12:CALLP%+16 10920ENDIF 10925ENDIF 10930p%+=24:NEXT 10935ENDIF 10940IFmc%THEN 10945B%=1431192909:C%=Pb%!0:CALLP%+16 10950ENDIF 10955B%=1431192909:C%=Pb%:CALLP%+16:ENDPROC 10960DEFPROCmenu_item(RETURN_%,Me%,i$,mc%):LOCALF%,p%,i%,x%,m%:x%=(_%!16/2-6)/8:IFRIGHT$(i$,1)="#"THEN 10965i$=LEFT$(i$):F%=F%OR2 10970ENDIF 10975IFRIGHT$(i$,1)="@"THEN 10980i$=LEFT$(i$):F%=F%OR8 10985ENDIF 10990IFMe%>=Le%THEN 10995B%=1431192909:C%=Pb%:D%=(Me%-Le%+1)*24:m%=USR(P%+20):IFm%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11000Pb%=m%:p%=Pb%+28+(Le%-1)*24:!p%=!p%ANDNOT128:Le%=Me%+1 11005ENDIF 11010IFMe%=Le%-1F%=F%OR128 11015IFMe%=0ANDmc%F%=F%OR256 11020p%=Pb%+28+Me%*24:p%!0=F%:p%!4=-1:p%!8=117440545:IFLEFT$(i$,1)="$"THEN 11025!p%+=4:i$=STRING$(12," ") 11030ELSE:IFLENi$<12THEN 11035$(p%+12)=i$ 11040ELSE:B%=1431192909:C%=LENi$+1:i%=USR(P%+12):IFi%=0ERROR253,FNmsg_1(A%!12,"FA5","MENU") 11045$i%=i$:p%!8=p%!8OR256:p%!12=i%:p%!16=-1:p%!20=LENi$+1 11050ENDIF 11055ENDIF 11060_%=Pb%:IFLENi$>x%THEN 11065x%=LENi$:_%!16=(x%*8+6)*2 11070ENDIF 11075ENDPROC 11080DEFPROCzb(_%,Me%,M%,Ne%):_%+=28+Me%*24:IFNe%THEN!_%=!_%OR1<<4 11085_%!4=M%:ENDPROC 11090DEFFNM(I$,Ha$,RETURNI%):LOCALL%:L%=I%+1:I%=INSTR(I$+Ha$,Ha$,L%):=MID$(I$,L%,I%-L%) 11095DEFPROCa(Oe%,Me%,Pe%):IF((Oe%!(28+8+24*Me%)AND4194304)=4194304)<>Pe%THEN 11100Oe%!(28+8+24*Me%)=Oe%!(28+8+24*Me%)EOR4194304 11105ENDIF 11110ENDPROC 11115DEFFNH(Oe%,Me%):=((Oe%!(28+8+24*Me%)AND4194304)=4194304) 11120DEFPROCmenu_tick_match(Oe%,Ia$):LOCALMe%,Ja$:Me%=Oe%+28:REPEAT:IFMe%!8AND256Ja$=$Me%!12ELSEJa$=$(Me%+12) 11125IFFNla(Ja$,Ia$)=0THEN 11130!Me%=!Me%EOR1:ENDPROC 11135ENDIF 11140IF!Me%AND128ENDPROC 11145Me%+=24:UNTIL0:ENDPROC 11150DEFPROCjc(Oe%,Me%,Qe%):IFQe%Oe%!(28+24*Me%)=Oe%!(28+24*Me%)OR1ELSEOe%!(28+24*Me%)=Oe%!(28+24*Me%)ANDNOT1 11155ENDPROC 11160DEFPROC`a(h%):LOCALx%,y%,Hd%,Id%,Jd%,Kd%:SYS53,-1,4TO,,Id%:Id%=1<<Id%:SYS53,-1,5TO,,Kd%:Kd%=1<<Kd%:SYS53,-1,11TO,,Hd%:Hd%+=1:SYS53,-1,12TO,,Jd%:Jd%+=1:!q%=h%:SYS262347,,q%:x%=Hd%*Id%:y%=Jd%*Kd%:x%=(x%-q%!12+q%!4)DIV2:y%=(y%+q%!16-q%!8)DIV2 11165SYS262356,,h%,x%,y%:ENDPROC 11170DEFPROCBb(a%):LOCALi%:B%=1163547472:C%=56:Ca%=USR(P%+12):IFCa%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11175IFa%THEN 11180a%=a%!36:IF0<52THEN 11185FORi%=0TO52STEP4:Ca%!i%=a%!i%:NEXT 11190ENDIF 11195ELSE:IF0<=52THEN 11200FORi%=0TO52STEP4:Ca%!i%=0:NEXT 11205ENDIF 11210ENDIF 11215PROCGb:PROCs(zb%):PROCq(zb%):PROCcaret_set(zb%,5):ENDPROC 11220DEFPROCGb:LOCALh%,i%,n%:PROCcaret_info(h%,i%,n%):PROCu(zb%,5,Ca%,4):PROCL(12,36):PROCL(13,32):PROCL(14,40):PROCL(15,44):PROCL(16,48):PROCqb:IFCa%!52=1THEN 11225PROCicon_unshade(zb%,33) 11230ELSE:PROCicon_shade(zb%,33) 11235ENDIF 11240ENDPROC 11245DEFPROCqb:LOCALs$:IFNOTFNicon_set(zb%,23)ANDNOTFNicon_set(zb%,22)THEN 11250PROCicon_select(zb%,23) 11255ENDIF 11260IFFNicon_set(zb%,23)THEN 11265s$=FNmsg_0(A%!12,"mm") 11270ELSE:s$=FNmsg_0(A%!12,"in") 11275ENDIF 11280PROCicon_write(zb%,26,s$):PROCicon_write(zb%,29,s$):PROCicon_write(zb%,27,s$):PROCicon_write(zb%,30,s$):PROCicon_write(zb%,28,s$):PROCicon_write(zb%,31,s$):PROCF(6,8):PROCF(7,12):PROCF(8,20):PROCF(9,16):PROCF(10,24):PROCF(11,28):ENDPROC 11285DEFPROCL(nb%,Wa%):PROCicon_write(zb%,nb%,STR$Ca%!Wa%):ENDPROC 11290DEFPROCF(nb%,Wa%):LOCALv%:v%=Ca%!Wa%:CASEnb%OF 11295WHEN8:v%=Ca%!12-v% 11300WHEN11:v%=Ca%!8-v% 11305ENDCASE 11310PROCicon_write(zb%,nb%,FNpa(v%)):ENDPROC 11315DEFFNpa(v%):LOCAL@%:IFFNicon_set(zb%,23)THEN 11320@%=16908554:=STR$(v%/c) 11325ELSE:@%=16909066:=STR$(v%/d) 11330ENDIF 11335DEFPROCO(f$,Re%):LOCALJ%,`%,vb%,Se%,t$:IFFNk(f$)THEN 11340REPEAT:J%=FNb("pn:"):IFJ%THEN 11345t$=FNqa(`%,$J%):IFt$<>""PROCkc(f$,t$) 11350`%!52=Re%:vb%=ia%:Se%=0:WHILEvb%>0:IF$`%!4=$vb%!4THEN 11355IFvb%!52=0THEN 11360`%!0=vb%!0:PROCfree_structure(vb%!4):B%=1163547472:C%=vb%:CALLP%+16:vb%=-1 11365ELSE:B%=1163547472:C%=`%:CALLP%+16:`%=0:vb%=-1 11370ENDIF 11375ELSE:IF$`%!4<$vb%!4THEN 11380`%!0=vb%:vb%=-1 11385ELSE:Se%=vb%:vb%=vb%!0 11390ENDIF 11395ENDIF 11400ENDWHILE:IF`%THEN 11405IFSe%Se%!0=`%ELSEia%=`% 11410ENDIF 11415ENDIF 11420UNTILJ%=0:PROCm 11425ENDIF 11430ENDPROC 11435DEFPROCkc(f$,t$):PROCS(FNmsg_2(A%!12,"OKO",f$,t$)):ENDPROC 11440DEFFNqa(RETURN`%,c$):LOCALt$:B%=1163547472:C%=56:`%=USR(P%+12):IF`%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11445`%!0=0:$q%=c$:B%=q%:C%=2:`%!4=USR(P%+28):J%=FNb("pw:"):IFJ%`%!8=VAL$J%ELSE="pw:" 11450J%=FNb("ph:"):IFJ%`%!12=VAL$J%ELSE="ph:" 11455J%=FNb("pb:"):IFJ%`%!16=VAL$J%ELSE="pb:" 11460J%=FNb("pt:"):IFJ%`%!20=VAL$J%ELSE="pt:" 11465J%=FNb("pl:"):IFJ%`%!24=VAL$J%ELSE="pl:" 11470J%=FNb("pr:"):IFJ%`%!28=VAL$J%ELSE="pr:" 11475J%=FNb("tb:"):IFJ%`%!32=VAL$J%ELSE="tb:" 11480J%=FNb("tt:"):IFJ%`%!36=VAL$J%ELSE="tt:" 11485J%=FNb("tl:"):IFJ%`%!40=VAL$J%ELSE="tl:" 11490J%=FNb("tr:"):IFJ%`%!44=VAL$J%ELSE="tr:" 11495J%=FNb("th:"):IFJ%`%!48=VAL$J%ELSE="th:" 11500="" 11505DEFPROClc(c%,M%):BPUT#c%,"pn: "+$M%!4:BPUT#c%,"pw: "+STR$M%!8:BPUT#c%,"ph: "+STR$M%!12:BPUT#c%,"pb: "+STR$M%!16:BPUT#c%,"pt: "+STR$M%!20:BPUT#c%,"pl: "+STR$M%!24:BPUT#c%,"pr: "+STR$M%!28:BPUT#c%,"tb: "+STR$M%!32:BPUT#c%,"tt: "+STR$M%!36:BPUT#c%,"tl: "+STR$M%!40:BPUT#c%,"tr: "+STR$M%!44:BPUT#c%,"th: "+STR$M%!48:ENDPROC 11510DEFPROCkb:LOCAL`%,s$,Te%,vb%,Se%,c%,z%:LOCALe,f,g,h,i,j:e=VALFNicon_read(zb%,6):f=VALFNicon_read(zb%,7):g=VALFNicon_read(zb%,10):h=VALFNicon_read(zb%,11):i=VALFNicon_read(zb%,8):j=VALFNicon_read(zb%,9):s$=FNicon_read(zb%,5):IFs$=""ERROR254,FNmsg_0(A%!12,"OKAD") 11515IFVALFNicon_read(zb%,6)=0ERROR254,FNmsg_0(A%!12,"OKAE") 11520IFVALFNicon_read(zb%,7)=0ERROR254,FNmsg_0(A%!12,"OKAE") 11525IF(i+j>f)ERROR254,FNmsg_1(A%!12,"OKAY",FNmsg_0(A%!12,"OKAZ")) 11530IF(g+h>e)ERROR254,FNmsg_1(A%!12,"OKAY",FNmsg_0(A%!12,"OKBA")) 11535SYS263872:`%=ia%:WHILE`%:IF$`%!4=s$THEN 11540Te%=`%:`%=0 11545ELSE:`%=`%!0 11550ENDIF 11555ENDWHILE:IFTe%IFTe%!52=2ERROR254,FNmsg_0(A%!12,"OKAX") 11560IFTe%=0THEN 11565B%=1163547472:C%=56:Te%=USR(P%+12):IFTe%=0ERROR253,FNmsg_1(A%!12,"FA5","PSZE") 11570Te%!0=0:$q%=s$:B%=q%:C%=2:Te%!4=USR(P%+28):vb%=ia%:Se%=0:WHILEvb%>0:IF$Te%!4<$vb%!4THEN 11575Te%!0=vb%:vb%=-1 11580ELSE:Se%=vb%:vb%=vb%!0 11585ENDIF 11590ENDWHILE:IFSe%Se%!0=Te%ELSEia%=Te% 11595ENDIF 11600PROCo(6,Te%,8,-1,Ue%):PROCo(7,Te%,12,-1,Ue%):PROCo(9,Te%,16,-1,Ue%):PROCo(8,Te%,20,-1,Ue%):PROCo(10,Te%,24,-1,Ue%):PROCo(11,Te%,28,-1,Ue%):PROCo(13,Te%,32,0,Ue%):PROCo(12,Te%,36,0,Ue%):PROCo(14,Te%,40,0,Ue%):PROCo(15,Te%,44,0,Ue%):PROCo(16,Te%,48,0,Ue%):Te%!52=1 11605PROCmc:z%=A%!48:WHILEz%:IFz%!36=Te%THEN 11610IFz%!24AND2THEN 11615PROCselect_printer(z%,-1,0):PROCub(z%):PROCz 11620ENDIF 11625ENDIF 11630z%=z%!0:ENDWHILE:SYS263873:ENDPROC 11635DEFPROCmc:LOCALc%,`%,Ve%,s$,bb%:IFha%THEN 11640s$="<Printers$Dir>.Remote.ID"+h$+".PaperRW" 11645ELSE:s$="<Printers$Dir>.PaperRW" 11650ENDIF 11655SYS131080,17,s$TObb%;f%:IF(f%AND1)!bb%=254:SYS43,bb% 11660IF(bb%=0)THEN 11665SYS131080,11,s$,4038,,0,0TObb%;f%:IF(f%AND1)!bb%=254:SYS43,bb% 11670ELSE:SYS131080,4,s$,,,,0TObb%;f%:IF(f%AND1)=0SYS131080,4,s$,,,,3TObb%;f% 11675IF(f%AND1)!bb%=254:SYS43,bb% 11680ENDIF 11685SYS131085,143,s$TOc%;f%:IF(f%AND1)!c%=254:SYS43,c% 11690IFc%THEN 11695`%=ia%:WHILE`%:IF`%!52=1THEN 11700PROClc(c%,`%):Ve%+=1 11705ENDIF 11710`%=`%!0:ENDWHILE:SYS131085,,c%:IFVe%THEN 11715SYS131080,18,s$,4038 11720ELSE:SYS131080,6,s$ 11725ENDIF 11730ENDIF 11735ENDPROC 11740DEFPROCo(nb%,td%,Wa%,We%,RETURNRe%):LOCALv,v%:v=VALFNicon_read(zb%,nb%):CASEnb%OF 11745WHEN8:v=VALFNicon_read(zb%,7)-v 11750WHEN11:v=VALFNicon_read(zb%,6)-v 11755ENDCASE 11760IFWe%THEN 11765IFFNicon_set(zb%,23)v%=v*cELSEv%=v*d 11770ELSE:v%=v 11775ENDIF 11780IFtd%!Wa%<>v%THEN 11785Re%=-1:td%!Wa%=v%:IFCa%Ca%!Wa%=v% 11790ENDIF 11795ENDPROC 11800DEFPROCpb:LOCALs$,`%,Se%,i%,z%:SYS263872:s$=FNicon_read(zb%,5):`%=ia%:WHILE`%>0:IF$`%!4=s$THEN 11805IF`%!52=1THEN 11810z%=A%!48:WHILEz%:IFz%!36=`%ERROR254,FNmsg_0(A%!12,"OKQa") 11815z%=z%!0:ENDWHILE:IFSe%THEN 11820Se%!0=`%!0 11825ELSE:ia%=`%!0 11830ENDIF 11835PROCfree_structure(`%!4):B%=1163547472:C%=`%:CALLP%+16:PROCmc 11840ELSE:ERROR254,FNmsg_0(A%!12,"OKR") 11845ENDIF 11850FORi%=0TO52STEP4:Ca%!i%=0:NEXT:PROCGb:`%=-1 11855ELSE:Se%=`%:`%=`%!0 11860ENDIF 11865ENDWHILE:IF`%=0ERROR254,FNmsg_0(A%!12,"OKQ") 11870SYS263873:ENDPROC 11875DEFPROCrb:PROCs(A%!40):!q%=A%!40:SYS262348,,q%OR1:q%!48=q%!56-(A%!44*ma%*2)-(A%!32*ma%):SYS262359,A%!40,q%+44:q%!28=-1:SYS262341,,q%:ENDPROC 11880DEFPROCib(z%):IFNOTFNh(Bb%)ENDPROC 11885!W%=Bb%:W%!4=z%!28:SYS262350,,W%:SYS262353,Bb%,W%!8,W%!12,W%!16,W%!20:ENDPROC 11890DEFPROCf(y%,z%,K%):LOCALJb%:IFNOTFNh(A%!40)ENDPROC 11895IFy%=-1THEN 11900B%=z%:C%=K%:y%=USR(P%+48) 11905ENDIF 11910!W%=A%!40:SYS262347,,W%:W%!12=W%!12-W%!4:W%!4=0:W%!8=y%-ma%:W%!16=y%:SYS262353,!W%,W%!4,W%!8,W%!12,W%!16:ENDPROC 11915DEFPROCnc(y%,z%,Xe%,Ze%):LOCALVe%:IFNOTFNh(A%!40)ENDPROC 11920IFy%=-1THEN 11925B%=z%:C%=K%:y%=USR(P%+48) 11930ENDIF 11935!W%=A%!40:SYS262347,,W%:W%!12=W%!12-W%!4:W%!4=0:Ve%=2:WHILEXe%<>Ze%:Ve%+=1:Xe%=Xe%!0:ENDWHILE:W%!8=y%-ma%*Ve%:W%!16=y%:SYS262353,!W%,W%!4,W%!8,W%!12,W%!16:ENDPROC 11940DEFPROCeb(_e%,O$,Ka$,B$,z%,Rb%):B%=_e%:C%=q%:$C%=O$:D%=O%:$D%=Ka$:E%=O%+256:$E%=B$:F%=z%:G%=Rb%:CALLP%+24:ENDPROC 11945DEFPROCn(z%,K%,rc%):LOCALvb%,p%,N%:IFwa%=z%ANDxa%=K%xa%=0:SYS262356,-1 11950p%=K%!44:IFp%THEN 11955IFp%!40THEN 11960z%!24=z%!24ANDNOT36:IFz%!48THEN 11965!q%=z%!48:PROCe 11970ENDIF 11975ENDIF 11980ENDIF 11985IFz%!32=K%THEN 11990z%!32=K%!0:vb%=0 11995ELSE:vb%=z%!32:WHILEvb%!0<>K%:vb%=vb%!0:ENDWHILE:vb%!0=K%!0 12000ENDIF 12005IFK%!12THEN 12010SYS131085,,K%!12:K%!12=0:z%!24=z%!24ANDNOT8:PROCi(z%):IFNOTz%!28THEN 12015O%!0=Bb%:O%!4=z%!28:O%!8=0:O%!12=1<<22:SYS262349,,O% 12020ENDIF 12025ENDIF 12030p%=0:REPEAT:SYS524624,p%TOp%:IFp%IFp%=K%!40ORp%=K%!72SYS524617,p% 12035UNTILp%=0:IFK%!40THEN 12040N%=z%!12:IFN%!0=1ORN%!0=2SYS6,21,FNn(N%!0) 12045SYS131085,0,K%!40:K%!40=0:PROCoc(N%!0):!q%=K%:PROCc(z%!4,z%,-7,q%) 12050ENDIF 12055IFK%!72THEN 12060SYS131085,,K%!72:K%!72=0 12065ENDIF 12070SYS131080,6,$K%!68:PROCfree_structure(K%!68):IFK%?11AND2SYS131080,6,$K%!20 12075PROCfree_structure(K%!16):PROCfree_structure(K%!20):PROCfree_structure(K%!24):p%=K%!44:IFp%THEN 12080PROCfree_structure(p%!104):PROCfree_structure(p%!108):PROCfree_structure(p%!112):PROCfree_structure(p%!120):B%=1112887380:C%=p%:CALLP%+16 12085ENDIF 12090IFK%!52THEN 12095B%=1179009620:C%=K%!52:CALLP%+16 12100ENDIF 12105B%=1430607185:C%=K%:CALLP%+16:A%!32-=1:IFA%!32<=0A%!20=A%!20OR1 12110IFrc%THEN 12115!q%=A%!40:SYS262348,,q%OR1:IFq%!32AND1<<16THEN 12120q%!48=q%!56-A%!44*ma%*2-A%!32*ma%:SYS262359,A%!40,q%+44:SYS262341,,q%:B%=z%:C%=vb%:CALLP%+32 12125ENDIF 12130ENDIF 12135ENDPROC 12140DEFPROCA(z%):LOCALK%,`e%:SYS263872:REPEAT:K%=z%!32:IFK%PROCn(z%,K%,0) 12145UNTILK%=0:!q%=A%!40:SYS262348,,q%OR1:IFq%!32AND1<<16THEN 12150q%!48=q%!56-A%!44*ma%*2-A%!32*ma%:SYS262359,A%!40,q%+44:SYS262341,,q%:B%=z%:C%=0:CALLP%+32 12155ENDIF 12160SYS263873:ENDPROC 12165DEFPROCH:LOCALz%:z%=A%!48:WHILEz%:PROCA(z%):z%=z%!0:ENDWHILE:A%!32=0:ENDPROC 12170DEFPROCma:LOCALaf%,j%,z%,K%:REPEAT:IFA%!24A%!24=!(A%!24+0) 12175IFA%!24=0A%!24=A%!48 12180UNTILA%!24:z%=A%!24:IF(z%!24AND4)=0THEN 12185A%!28=z%!32:af%=0:WHILEA%!28:IF?(A%!28+11)AND1THEN 12190A%!28=0 12195ELSE:IF?(A%!28+11)AND4THEN 12200af%=A%!28:A%!28=!(A%!28+0) 12205ELSE:IF!(A%!28+12)THEN 12210PROCpc(z%,A%!28) 12215ELSE:IF(z%!24AND32)=0THEN 12220IFA%!28<>z%!32THEN 12225IFaf%af%!0=!(A%!28+0) 12230!(A%!28+0)=z%!32:z%!32=A%!28:PROCnc(-1,z%,A%!28,af%) 12235ENDIF 12240IFya%=z%THEN 12245!q%=Q%:PROCe 12250ENDIF 12255j%=z%!4:j%=j%!20:WHILEj%:IF$(j%+16)="configure"THEN 12260IFj%!12=z%THEN 12265!q%=j%!4:PROCe 12270ENDIF 12275ENDIF 12280j%=j%!0:ENDWHILE:PROCpc(z%,A%!28) 12285ENDIF 12290ENDIF 12295A%!28=0 12300ENDIF 12305ENDIF 12310ENDWHILE 12315ENDIF 12320A%!32=0:z%=A%!48:WHILEz%:K%=z%!32:WHILEK%:A%!32+=1:K%=K%!0:ENDWHILE:z%=z%!0:ENDWHILE:IFA%!32=0A%!20=A%!20OR1 12325ENDPROC 12330DEFFNra(K%,bf%,RETURN_$):LOCALy$,i%,c$,H%:_$="":y$=RIGHT$("00"+STR$~K%!36,3):SYS131107,"Alias$@PrintType_"+y$,,-1TO,,i%:IFi%<0_$="@PrintType_"+y$:=-1 12335CASEK%!36OF 12340WHEN-1:c$=FNmsg_0(A%!12,"UNT") 12345WHEN8192:PROCj(FNmsg_0(A%!12,"OKT"),1):=0 12350WHEN4096:PROCj(FNmsg_0(A%!12,"OKS"),1):=0 12355WHEN4095,2808:K%!36=4095:=-1 12360WHEN4054,4055,4074,4075,4094:K%!36=4094:=-1 12365WHENbf%:K%!36=bf%:=-1 12370OTHERWISE:c$=FNtask_read_env("File$Type_"+y$,q%):IFc$=""c$=FNmsg_1(A%!12,"TYP",y$) 12375ENDCASE 12380CASEFNsa(c$,K%)OF 12385WHEN4:K%!36=4094:=-1 12390WHEN2:K%!36=4095:=-1 12395ENDCASE 12400=0 12405DEFFNsa(c$,K%):LOCALx%,y%,w%,h%:PROCicon_write(yb%,0,FNmsg_2(A%!12,"WA5",c$,$K%!24)):SYS262351,,q%:x%=!q%:y%=q%!4:!q%=yb%: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 12410SYS262341,,q%:PROCac(yb%):pa%=0:REPEAT:PROCv(la%):UNTILpa%:!q%=yb%:PROCe:PROCbc:=pa% 12415DEFPROCqc(cf%,df%,ef%,La$):IFcf%SYS131085,0,cf% 12420IFdf%EXT#df%=ef% 12425IFdf%SYS131085,0,df% 12430SYS131080,6,La$:ENDPROC 12435DEFPROCfb(Ma$,La$):LOCALff%,gf%,hf%,ef%,i%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCqc(ff%,gf%,ef%,La$):PROCj(REPORT$,1):ENDPROC 12440ff%=OPENINLa$:hf%=EXT#ff%:IFhf%THEN 12445SYS263872:gf%=OPENUPMa$:ef%=EXT#gf%:PTR#gf%=ef%:FORi%=1TOhf%DIV512:SYS12,4,ff%,O%,512:SYS12,2,gf%,O%,512:NEXT:IFhf%MOD512SYS12,4,ff%,O%,hf%MOD512:SYS12,2,gf%,O%,hf%MOD512 12450CLOSE#gf%:SYS263873 12455ENDIF 12460CLOSE#ff%:SYS8,6,La$:ENDPROC 12465DEFPROCpc(z%,K%):LOCALH%,N%,if%,b%,t%,P$,t$,_$,Na%,Oa%,jf%,s%,Sb%,z$,kf%,G$:LOCALA$,B$,Ub%,l%,f%:H%=z%!4:N%=z%!12:if%=H%!28:IFK%!12=0THEN 12470PROCselect_printer(z%,0,0):IF(z%!24AND4)<>0ENDPROC 12475P$=$K%!20:L$=$K%!16:M$=$K%!24:IFN%!0=5THEN 12480Sb%=(N%?6AND2)<>0 12485ELSE:Sb%=(N%?6AND1)<>0 12490ENDIF 12495IFSb%THEN 12500g$=FNl(0):IFg$=""THEN 12505z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 12510ENDIF 12515IFN%!0=5THEN 12520SYS36,"PrinterType$5",g$,LENg$:PROCI(5) 12525ELSE:SYS36,"PrinterType$10",g$,LENg$:PROCI(10) 12530ENDIF 12535G$=g$ 12540ENDIF 12545z$=FNl(0):IFz$=""THEN 12550z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 12555ENDIF 12560SYS36,"Printer$Temp",z$,LENz$:q%!0=48+LENP$ANDNOT3:q%!12=0:q%!16=524613:q%!40=K%!36:$(q%+44)=P$+CHR$0:SYS262375,18,q%:qa%=0:REPEAT:PROCv(ka%):UNTILqa%:b%=-1:IFqa%<>2THEN 12565b%=FNra(K%,if%,_$):IFb%THEN 12570IF_$<>""THEN 12575SYS262366,_$+" "+P$ 12580ENDIF 12585ENDIF 12590ENDIF 12595IFNOTb%THEN 12600PROCn(z%,K%,-1):ENDPROC 12605ENDIF 12610IFSb%THEN 12615s$=FNm(z%,-1):IFs$<>""THEN 12620PROCb(s$):IFz%!32THEN 12625z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0) 12630ENDIF 12635ENDIF 12640ENDIF 12645IFNOT(K%!36=4095ORK%!36=4094ORK%!36=if%)THEN 12650SYS8,17,z$TOt%,,Na%,,Oa%:IFt%THEN 12655IFK%?11AND2THEN 12660IFK$<>""SYS131080,6,K$ 12665K$=$K%!20 12670ENDIF 12675PROCfree_structure(K%!20):$q%=z$:B%=q%:C%=2:K%!20=USR(P%+28):K%!28=Oa%:K%!36=(Na%AND1048320)>>8:K%?11=K%?11OR2 12680ELSE:IFSb%THEN 12685IFN%!0=5THEN 12690PROCfb($N%!16,G$):PROCn(z%,K%,-1) 12695ELSE:SYS8,17,G$TOb%,,,,Oa%:IFb%=0OROa%=0THEN 12700SYS131080,6,G$:PROCn(z%,K%,-1) 12705ELSE:IF(K%?11AND2)SYS131080,6,$K%!20 12710PROCfree_structure(K%!20):$q%=G$:B%=q%:C%=2:K%!20=USR(P%+28):K%!28=Oa%:K%!36=if%:K%?11=K%?11OR2 12715ENDIF 12720ENDIF 12725ELSE:A$=$K%!16:B$=$K%!24:PROCn(z%,K%,-1):IFN%!0=9ANDq$<>""THEN 12730c$=$(z%!40):M%=INSTR(c$," "):WHILEM%:MID$(c$,M%,1)=CHR$160:M%=INSTR(c$," ",M%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Ka%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 12735IFFNA (z%,A$,B$)THEN 12740Ub%=V%!4:SYS131113,25,w$,C$ 12745ELSE:SYS131080,6,w$ 12750ENDIF 12755L$="":M$="":s$=FNm(z%,-1):IFs$<>""THEN 12760PROCb(s$) 12765ENDIF 12770ENDIF 12775ENDIF 12780PROCselect_printer(0,-1,-1) 12785ENDIF 12790ENDIF 12795ELSE:CASEN%!0OF 12800WHEN1:IFz%!24AND128THEN 12805g$="devices#buffer"+STR$FNN(1)+":$."+FNS 12810ELSE:g$="devices#buffer"+STR$FNN(1)+":$.Parallel" 12815ENDIF 12820SYS36,"PrinterType$1",g$,LENg$ 12825WHEN2:g$="devices#buffer"+STR$FNN(2)+":$.Serial":SYS36,"PrinterType$2",g$,LENg$ 12830ENDCASE 12835SYS263872:IFN%!0=5AND(N%?6AND2)<>0THEN 12840SYS131085,207,g$TOb%;t%:IF(t%AND1)=0PTR#b%=EXT#b% 12845ELSE:SYS131085,143,g$TOb%;t% 12850ENDIF 12855IFt%AND1i%=b%+4:CALLZ%,i%,t$ 12860SYS263873:PROCselect_printer(0,-1,-1):IFt%AND1THEN 12865PROCdc(z%):PROCoc(N%!0):ERROR254,FNmsg_1(A%!12,"OKP",t$) 12870ENDIF 12875K%!40=b%:SYS131085,64,$K%!20TOK%!12;t%:IF(t%AND1)K%!12=0 12880IFK%!12=0THEN 12885PROCn(z%,K%,-1):ERROR254,FNmsg_1(A%!12,"OKAF",$K%!20) 12890ENDIF 12895t$=FNl(0):IFt$=""THEN 12900z%!24=z%!24OR4:PROCi(z%):PROCf(-1,z%,0):ENDPROC 12905ENDIF 12910SYS131080,11,t$,4093TOb%;t%:IF(t%AND1)=0SYS131085,207,t$TOb%;t% 12915IFt%AND1THEN 12920PROCdc(z%):b%+=4:CALLZ%,b%,s$:ERROR254,FNmsg_1(A%!12,"OKP",s$) 12925ENDIF 12930K%!72=b%:$q%=t$:B%=q%:C%=2:K%!68=USR(P%+28):B%=1179009620:C%=1024:s%=USR(P%+12):IFs%=0ERROR253,FNmsg_1(A%!12,"FA5","TBFF") 12935K%!52=s%:z%!24=z%!24OR8:PROCi(z%):PROCf(-1,z%,0):IFK%!36<>if%THEN 12940IFz%!24AND64THEN 12945PROCn(z%,K%,-1):IFz%!40=0s$=$z%!8ELSEs$=$z%!40 12950ERROR254,FNmsg_1(A%!12,"OKAC",s$) 12955ENDIF 12960PROCrc(K%,if%) 12965ENDIF 12970ENDIF 12975ELSE:IFEOF#K%!12ANDK%!56=0THEN 12980t%=EXT#K%!72-PTR#K%!72:IFt%THEN 12985IFN%!0=1ORN%!0=2THEN 12990SYS6,128,NOTFNn(N%!0)TO,Oa%,Na%:Oa%=Oa%ORNa%<<8:IFOa%>1024Oa%=1024 12995ELSE:Oa%=1024/2 13000ENDIF 13005PROCsc(K%,t%,Oa%):ENDPROC 13010ENDIF 13015jf%=-1:IFN%!0=1ORN%!0=2THEN 13020SYS6,152,FNn(N%!0)TO;b%:IF(b%AND2)=0jf%=0 13025ENDIF 13030IFjf%THEN 13035PROCi(z%):A$=$K%!16:B$=$K%!24:PROCn(z%,K%,-1):IFN%!0=9ANDq$<>""THEN 13040c$=$(z%!40):M%=INSTR(c$," "):WHILEM%:MID$(c$,M%,1)=CHR$160:M%=INSTR(c$," ",M%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+STR$(Ka%):IFFNA (z%,A$,B$)THEN 13045Ub%=V%!4:SYS131113,25,w$,C$ 13050ELSE:SYS131080,6,w$ 13055ENDIF 13060s$=FNm(z%,-1):IFs$<>""THEN 13065PROCb(s$) 13070ENDIF 13075ENDIF 13080ENDIF 13085ELSE:PROCtc(z%,K%,if%) 13090ENDIF 13095ENDIF 13100ENDPROC 13105DEFPROCrc(K%,bf%):LOCALi%,p%,c$:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCuc(A%!24,A%!28) 13110B%=1112887380:C%=124:p%=USR(P%+12):IFp%=0ERROR253,FNmsg_1(A%!12,"FA5","TPUB") 13115K%!44=p%:IF0<=124-4 13120FORi%=0TO124-4STEP4:p%!i%=0:NEXT 13125ENDIF 13130?O%=3:SYS7,14,O%:SYS192,O%,O%+5,250:B%=O%+5:C%=2:p%!120=USR(P%+28):IFK%?11AND2THEN 13135c$=$K%!16+" - "+$K%!24 13140ELSE:c$=$K%!20:IFLENc$>40THEN 13145c$=RIGHT$(c$,40):c$=MID$(c$,1+INSTR(c$,".")) 13150ENDIF 13155ENDIF 13160$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:PROCM(A%!24,A%!28,-1):ENDPROC 13165DEFPROCuc(z%,K%):PROCn(z%,K%,-1):IFz%!32<>0THEN 13170z%!24=z%!24OR32:PROCi(z%) 13175ENDIF 13180ERROR254,FNmsg_1(A%!12,"OKPa",REPORT$):ENDPROC 13185DEFPROCtc(z%,K%,bf%):LOCALl%,t%,lf%,Tc%,b$,p%,Zb%,N%,mf%,H%:LOCALERROR:ONERRORLOCALRESTOREERROR:PROCuc(z%,K%) 13190N%=z%!12:H%=z%!4:Zb%=K%!44:IFN%!0=1ORN%!0=2THEN 13195SYS6,128,NOTFNn(N%!0)TO,Tc%,l%:Tc%=Tc%ORl%<<8:IFTc%>1024Tc%=1024 13200ELSE:Tc%=1024/2 13205ENDIF 13210l%=EXT#K%!72-PTR#K%!72:IFK%!56l%=0 13215IFl%PROCsc(K%,l%,Tc%):ENDPROC 13220SYS263872:l%=K%!28-PTR#K%!12:IFK%!36=bf%THEN 13225IFl%>Tc%l%=Tc% 13230SYS12,4,K%!12,q%,l%:SYS12,2,K%!40,q%,l% 13235ELSE:IFK%!36=4095OR(H%!32AND1)<>0THEN 13240CASEZb%!92OF 13245WHEN0:q%!8=K%!72:PROCM(z%,K%,-2):K%!32=-1:Zb%!92=1 13250WHEN1:q%!8=K%!72:PROCM(z%,K%,-3):K%!32=0:Zb%!92=2 13255WHEN2:IFH%!32AND2THEN 13260IFK%!56=0THEN 13265PROCvc(0):q%!8=K%!56:PROCwc(K%,FNta(z%,K%,-4)):PROCxc(z%,K%,Tc%):IFZb%!92=3THEN 13270q%!8=K%!72:PROCM(z%,K%,-14):Zb%!92=1 13275ENDIF 13280ELSE:PROCxc(z%,K%,Tc%) 13285ENDIF 13290ELSE:IFK%!56=0THEN 13295t%=1024/4:IFt%>Tc%t%=Tc% 13300K%!60=0:PROCvc(t%):IFZb%!40THEN 13305PROCdc(z%):PROCWa(z%):p%=Zb%!40 13310ENDIF 13315ENDIF 13320IFTc%>K%!56Tc%=K%!56 13325IFZb%!40<>0ANDTc%>p%Tc%=p% 13330IFTc%SYS12,2,K%!40,K%!52+K%!60,Tc% 13335K%!56-=Tc%:K%!60+=Tc% 13340ENDIF 13345ENDCASE 13350ELSE:t%=LENFNprinter_read_string(Zb%!108):WHILEl%ANDTc%>t%:b$=FNua(BGET#K%!12,Zb%):l%-=1:IFb$<>""BPUT#K%!40,b$; 13355Tc%-=LENb$:ENDWHILE 13360ENDIF 13365ENDIF 13370IFEOF#K%!12ANDK%!56=0THEN 13375q%!8=K%!72:PROCM(A%!24,A%!28,-15) 13380ENDIF 13385IFK%!28=0lf%=0ELSElf%=PTR#K%!12*100/K%!28 13390IFlf%<>K%!32THEN 13395K%!32=lf%:PROCf(-1,z%,K%) 13400ENDIF 13405PTR#K%!72=0:SYS263873:ENDPROC 13410DEFPROCsc(K%,nf%,Tc%):IFnf%>Tc%nf%=Tc% 13415SYS12,4,K%!72,q%,nf%:SYS12,2,K%!40,q%,nf%:IFEXT#K%!72-PTR#K%!72=0THEN 13420PTR#K%!72=0:EXT#K%!72=0 13425ENDIF 13430ENDPROC 13435DEFFNua(C%,Zb%):LOCALr$:IFC%=10ORC%=13THEN 13440IFZb%!16=1ORZb%!16=C%r$=FNprinter_read_string(Zb%!108) 13445Zb%!16=C% 13450ELSE:IFZb%!16r$=FNprinter_read_string(Zb%!108) 13455r$+=CHR$C%:Zb%!16=0 13460ENDIF 13465=r$ 13470DEFPROCwc(K%,s$):LOCALof%,pf%:pf%=K%!52:of%=K%!56:IFs$<>""THEN 13475$(pf%+of%)=s$:K%!56+=LENs$ 13480ENDIF 13485ENDPROC 13490DEFPROCxc(z%,K%,Tc%):LOCALof%,pf%:pf%=K%!52:of%=K%!56:IFof%THEN 13495IFN%!0=1ORN%!0=2THEN 13500IFof%>=Tc%ENDPROC 13505ENDIF 13510pf%?of%=10:of%+=1:pf%?of%=13:SYS12,2,K%!40,pf%,of%:K%!56=0 13515ENDIF 13520ENDPROC 13525DEFPROCM(z%,K%,qf%):q%!0=qf%:q%!4=K%:PROCc(z%!4,z%,-8,q%):ENDPROC 13530DEFFNta(z%,K%,qf%):LOCALs$,i%:q%!0=qf%:q%!4=K%:PROCc(z%!4,z%,-8,q%):i%=q%+8:CALLY%,i%,s$:=s$ 13535DEFPROCvc(F%):LOCALH%:H%=z%!4:B%=H%:C%=K%:D%=Zb%:E%=O%+128:E%!0=H%:E%!4=z%:E%!8=K%:E%!12=Zb%: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=ia%:O%!20=P%:O%!24=F%:IFF%=0CALLP%+4ELSECALLP%+0 13540ENDPROC 13545DEFFNN(t%):CASEt%OF 13550WHEN1:IFA%!80=0THEN 13555IFA%!76<>3THEN 13560A%!80=3 13565ELSE:A%!80=10 13570ENDIF 13575ENDIF 13580=A%!80 13585WHEN2:IFA%!76=0THEN 13590IFA%!80<>3THEN 13595A%!76=3 13600ELSE:A%!76=2 13605ENDIF 13610ENDIF 13615=A%!76 13620ENDCASE 13625=0 13630DEFPROCoc(t%):CASEt%OF 13635WHEN1:A%!80=0 13640WHEN2:A%!76=0 13645ENDCASE 13650ENDPROC 13655DEFFNn(t%):CASEt%OF 13660WHEN1:=A%!80 13665WHEN2:=A%!76 13670ENDCASE 13675=0 13680DEFFNP:LOCALbb%,rf%:SYS88,3TObb%,rf%:IF(bb%AND61440)=4096AND(rf%AND61440)=4096:=-1 13685=0 13690DEFFNS:LOCALbb%:SYS8,5,"Devices:FastParallel"TObb%:IFbb%<>0THEN 13695:="FastParallel" 13700ELSE::="Parallel" 13705ENDIF 13710DEFFNrmload_latest_module(c$,j$):LOCALsf%,tf%,uf%:LOCALM%,f%,rf%,vf%,wf%,s$,xf%:sf%=-1:SYS131102,18,c$TO,,,M%;f%:IF(f%AND1)=0ANDM%!20<>0THEN 13715M%+=(M%!20):WHILE?M%<>9AND?M%<>0:M%+=1:ENDWHILE:IF?M%<>0THEN 13720sf%=0:M%+=1:WHILE?M%<>32:IF?M%>=ASC"0"AND?M%<=ASC"9"THEN 13725sf%=sf%*10+?M%-ASC"0" 13730ENDIF 13735M%+=1:ENDWHILE 13740ENDIF 13745ENDIF 13750tf%=-1:rf%=0:vf%=-1:REPEAT:SYS131102,20,rf%,vf%TO,rf%,vf%,M%,xf%,,wf%;f%:IF(f%AND1)=0THEN 13755CALLZ%,M%,s$:IFs$=c$tf%=VAL(STR$~(wf%))/100 13760ENDIF 13765UNTIL(tf%<>-1)OR(f%AND1)<>0:uf%=-1:SYS131085,67,j$TOf%;M%:IF(M%AND1)f%=0 13770IFf%<>0THEN 13775PTR#f%=20:M%=BGET#f%+((BGET#f%)<<8)+((BGET#f%)<<16)+((BGET#f%)<<24):IFM%<>0THEN 13780PTR#f%=M%:REPEAT:rf%=BGET#f%:UNTILrf%=0ORrf%=9:IFrf%<>0THEN 13785uf%=0:REPEAT:rf%=BGET#f%:IFrf%>=ASC"0"ANDrf%<=ASC"9"THEN 13790uf%=uf%*10+rf%-ASC"0" 13795ENDIF 13800UNTILrf%=32 13805ENDIF 13810ENDIF 13815CLOSE#f% 13820ENDIF 13825IFsf%>tf%rf%=sf%ELSErf%=tf% 13830IFrf%>uf%f%=rf%ELSEf%=uf% 13835rf%=0:IFtf%=f%THEN 13840IFxf%<1THEN 13845SYS131102,4,c$:SYS131102,3,c$TOM%;rf% 13850ENDIF 13855ENDIF 13860IFuf%=f%ANDuf%>tf%ANDuf%>sf%THEN 13865SYS131102,1,j$TOM%;rf% 13870ENDIF 13875IF(rf%AND1)=0SYS131102,18,c$TOM%;rf% 13880IF(rf%AND1)!M%=253:SYS43,M% 13885=f% 13890DEFPROC` (yf%):LOCALf%,g%,zf%,s$:ha%=0:SYS131102,18,"Freeway"TO;f%:SYS131102,18,"RemotePrinterSupport"TO;zf%:SYS131102,18,"ShareFS"TO;g%:IF(f%AND1)OR(g%AND1)OR(zf%AND1)THEN 13895Ga%=0 13900ELSE:SYS131077,"RMEnsure ShareFS 2.00 ERROR Foo"TO;f%:IF(f%AND1)THEN 13905Ga%=0 13910ELSE:h$=FNtask_read_env("Inet$LocalAddr",q%):Ga%=-1:PROCyc:PROCzc:SYS424323,2:Na$="<Wimp$ScrapDir>.Printers":s$=FNtask_read_env ("Printers$Dir",q%):IFINSTR(s$,"Share:")THEN 13915ha%=-1 13920ELSE:ha%=0 13925ENDIF 13930ENDIF 13935ENDIF 13940IF(zf%AND1)=0THEN 13945SYS424320TOIa% 13950ENDIF 13955IFha%THEN 13960SYS131080,8,"<Printers$Path>Remote"TO;f%:s$="<Printers$Path>Remote.ID"+h$:SYS131080,8,s$TO;f% 13965ENDIF 13970ENDPROC 13975DEFPROCyc:SYS293504,0,2:ENDPROC 13980DEFFNj(Af%):LOCALW$:CALLZ%,Af%,W$:=W$ 13985DEFPROCka:ENDPROC 13990DEFPROCzc:LOCALBf%,Cf%,Df%,Ff%,gc%,Vb%,c$,gb%:LOCALGf%,Hf%,c$,Oa$,R%,Cd%:Cf%=0:Df%=0:Ja%=0:REPEAT:Cf%=Df%:SYS293507,0,2,0,0,0,0,0,Cf%TO,,Ff%,,gc%,,,Df%:IF(Df%>0)THEN 13995Gf%=FNf (1196577875,Ff%):Hf%=FNf (1196577875,gc%+1):If%=FNf (810701907,Ff%):Jf%=FNf (810701907,gc%+1):SYS293507,0,2,Ff%,If%,gc%+1,Jf%,0,Cf%TO,,,,,,Vb%:Jf%?gc%=0:$Gf%=FNj (If%):$Hf%=FNj (Jf%):PROCd (810701907,If%):PROCd (810701907,Jf%) 14000R%=FND (Gf%,Hf%,Vb%):PROCK (Ha%,R%):c$=$Gf%:IFFN_ (c$)THEN 14005yd%=FNx (R%,0,0,-1,gb%):IFNOTgb%THEN 14010PROCXb (c$):PROCN (c$):IFV%=0THEN 14015IFA%!44THEN 14020Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 14025PROCselect_printer(Cd%,-1,0):Cd%=0 14030ELSE:Cd%=Cd%!0 14035ENDIF 14040ENDWHILE 14045ENDIF 14050ENDIF 14055ENDIF 14060ENDIF 14065Ja%+=1 14070ENDIF 14075UNTIL(Df%<0):ENDPROC 14080DEFPROC_b (c$):LOCALGf%,Hf%,gc%,Vb%,Oa$,hb%,R%,Pa$,Cd%,gb%,jb%:SYS424578,0,2,c$,0,0TO,,,gc%,,Vb%;hb%:IF(hb%AND1)THEN 14085ENDPROC 14090ENDIF 14095jb%=0:R%=Ha%:WHILER%:IF($R%!4=c$)AND((R%!20)<=0)THEN 14100ENDPROC 14105ENDIF 14110R%=R%!0:ENDWHILE:Gf%=FNf (1196577875,LENc$+1):Hf%=FNf (1196577875,gc%+1):Jf%=FNf (810701907,gc%+1):$Gf%=c$:SYS424578,0,2,c$,gc%+1,Jf%TO;hb%:IF(hb%AND1)THEN 14115ENDPROC 14120ENDIF 14125Jf%?gc%=0:$Hf%=FNj (Jf%):PROCd (810701907,Jf%):R%=FND (Gf%,Hf%,Vb%):PROCK (Ha%,R%):Ja%+=1:IFFN_ (c$)THEN 14130yd%=FNx (R%,0,0,-1,gb%):IFNOTgb%THEN 14135PROCXb (c$):PROCN (c$):IFV%=0THEN 14140IFA%!44THEN 14145Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 14150PROCAc(Cd%,-1,0,-1,gb%):Cd%=0 14155ELSE:Cd%=Cd%!0 14160ENDIF 14165ENDWHILE 14170ENDIF 14175ENDIF 14180ENDIF 14185ENDIF 14190PROCk:ENDPROC 14195DEFPROCXb (c$):LOCALSe%,Bf%,jb%,Kf%:Bf%=Ha%:Se%=0:jb%=0:IFBf%THEN 14200REPEAT:IF($Bf%!4)=c$ANDBf%!20>0THEN 14205jb%=-1 14210ELSE:Se%=Bf%:Bf%=Bf%!0 14215ENDIF 14220UNTILjb%OR(Bf%=0):IF(Se%=0)AND(Bf%<>0)THEN 14225Ha%=Bf%!0:PROCD (-2,Bf%!20):PROCd (1196577875,Bf%!4):PROCd (1196577875,Bf%!8):PROCd (1380799568,Bf%) 14230ELSE:IFBf%THEN 14235Se%!0=Bf%!0:PROCD (-2,Bf%!20):PROCd (1196577875,Bf%!4):PROCd (1196577875,Bf%!8):PROCd (1380799568,Bf%) 14240ENDIF 14245ENDIF 14250ENDIF 14255ENDPROC 14260DEFFN_ (c$):LOCALBf%,Lf%:Bf%=Ha%:Lf%=0:WHILEBf%ANDNOTLf%:IF$Bf%!4=c$ANDBf%!20>0THEN 14265Lf%=-1 14270ELSE:Bf%=Bf%!0 14275ENDIF 14280ENDWHILE:=Lf% 14285DEFPROCN (c$):LOCALz%,Fd%,M%,N%,Cd%,y$,H%,`$:IFFNva (Ha%,c$)THEN 14290PROCTa (Ha%,c$) 14295ELSE:Fd%=0:z%=A%!48:M%=z%:N%=z%!12:WHILEM%:IF$M%!40=c$ANDN%!0=9THEN 14300M%=0 14305ELSE:Fd%=z%:z%=z%!0:M%=z%:N%=z%!12 14310ENDIF 14315ENDWHILE:IFz%THEN 14320H%=z%!4:`$=$H%!4:y$=$z%!8:PROCRa (c$,`$,y$):PROC`b (z%,Fd%):PROCLb (y$) 14325ENDIF 14330ENDIF 14335IFFNh (Bb%)THEN 14340PROCk:PROCq (Bb%) 14345ENDIF 14350ENDPROC 14355DEFFNt(Vb%):=STR$~Vb% 14360DEFFNf (Mf%,Oa%):LOCALNf%:B%=Mf%:C%=Oa%:Nf%=USR(P%+12):IF(Nf%=0)THEN 14365ERROR253,FNmsg_1 (A%!12,"FA5",CHR$((B%AND-16777216)>>24)+CHR$((B%AND16711680)>>16)+CHR$((B%AND65280)>>8)+CHR$(B%AND255)) 14370ENDIF 14375=Nf% 14380DEFPROCd (Mf%,td%):B%=Mf%:C%=td%:CALLP%+16:ENDPROC 14385DEFPROCJ (RETURNOf%,k$):$q%=k$:B%=q%:C%=2:Of%=USR(P%+28):ENDPROC 14390DEFFND (Gf%,Hf%,Pf%):LOCALNf%:Nf%=FNf (1380799568,24):Nf%!0=0:Nf%!4=Gf%:Nf%!8=Hf%:Nf%!12=Pf%:Nf%!16=-1:Nf%!20=-1:=Nf% 14395DEFFNwa (c$,nb%,R$):LOCALNf%,Qf%,wd%:Nf%=FNf (1380799568,24):PROCJ (Qf%,c$):PROCJ (wd%,R$):Nf%!0=0:Nf%!4=Qf%:Nf%!8=wd%:Nf%!12=-1:Nf%!16=-1:Nf%!20=nb%:=Nf% 14400DEFPROCK (RETURNtc%,Me%):LOCALBf%:IFtc%=0THEN 14405tc%=Me% 14410ELSE:Bf%=tc%:WHILE(Bf%!0<>0):Bf%=Bf%!0:ENDWHILE:Bf%!0=Me% 14415ENDIF 14420ENDPROC 14425DEFFNva (RETURNtc%,c$):LOCALBf%:IFtc%=0THEN 14430=0 14435ELSE:Bf%=tc%:WHILEBf%:IF$Bf%!4=c$THEN 14440=-1 14445ELSE:Bf%=Bf%!0 14450ENDIF 14455ENDWHILE 14460ENDIF 14465=0 14470DEFPROCTa (RETURNtc%,c$):LOCALSe%,Bf%,jb%,Kf%:IFtc%THEN 14475Bf%=tc%:Se%=0:jb%=0:REPEAT:IF($Bf%!4)=c$THEN 14480jb%=-1 14485ELSE:Se%=Bf%:Bf%=Bf%!0 14490ENDIF 14495UNTILjb%OR(Bf%=0):IF(Se%=0)AND(Bf%<>0)THEN 14500tc%=Bf%!0:PROCd (1196577875,Bf%!4):PROCd (1196577875,Bf%!8):PROCd (1380799568,Bf%) 14505ELSE:IFBf%THEN 14510Se%!0=Bf%!0:PROCd (1196577875,Bf%!4):PROCd (1196577875,Bf%!8):PROCd (1380799568,Bf%) 14515ENDIF 14520ENDIF 14525ENDIF 14530ENDPROC 14535DEFPROCta:LOCALNd%,z%,N%,Cd%:LOCALdb%,Rf%,s$,H%,s%,t%,l%,t$,M%:REPEAT:SYS424321,,,-1TONd%,,Rf%:IFNd%>0THEN 14540IFRf%>0THEN 14545db%=FNf (1196577875,Rf%):SYS424321,,db%,Rf% 14550ELSE:SYS424321,,0,0 14555ENDIF 14560CASENd%OF 14565WHEN1:IFV%THEN 14570N%=V%!12:IFN%!0=9ANDq$<>""THEN 14575t$=$(V%!40):M%=INSTR(t$," "):WHILEM%:MID$(t$,M%,1)=CHR$160:M%=INSTR(t$," ",M%+1):ENDWHILE:w$=q$+"RemSpool."+h$+"."+t$:C$=q$+"RemQueue."+h$+"."+STR$(Ka%):SYS131080,17,w$TOt%,,,,l%;f%:IF(l%>0)AND((f%AND1)=0)AND(t%=1)THEN 14580IFL$=""THEN 14585L$=FNmsg_0(A%!12,"UNKN") 14590ENDIF 14595IFM$=""THEN 14600M$=FNmsg_0(A%!12,"UNKN") 14605ENDIF 14610IFFNA (V%,L$,M$)THEN 14615H%=V%!4:SYS131113,25,w$,C$ 14620ELSE:SYS131080,6,w$ 14625ENDIF 14630L$="":M$="":s$=FNm(V%,-1):IFs$<>""THEN 14635PROCb(s$) 14640ENDIF 14645ENDIF 14650ENDIF 14655ENDIF 14660WHEN2:PROCBc (FNj (db%)) 14665WHEN3:IFGa%THEN 14670PROC_b (FNj (db%)) 14675ENDIF 14680WHEN4:PROCN (FNj (db%)) 14685WHEN5 14690WHEN6:PROCCc (FNj (db%)) 14695WHEN7:PROCDc:PROC` (0) 14700WHEN8:PROCFc 14705ENDCASE 14710IF(Rf%>0)THEN 14715PROCd (1196577875,db%) 14720ENDIF 14725ENDIF 14730UNTILNd%<0:IFV%=0THEN 14735IFA%!44THEN 14740Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 14745PROCselect_printer(Cd%,-1,0):Cd%=0 14750ELSE:Cd%=Cd%!0 14755ENDIF 14760ENDWHILE 14765ENDIF 14770ENDIF 14775ENDPROC 14780DEFPROCwa:PROCDc:PROC` (0):fa%=0:ENDPROC 14785DEFPROCCc (c$):ENDPROC 14790DEFFNda:LOCALC$,f%,v%,w%,e$,Uc%,Sf%:REPEAT:C$=q$+"RemQueue."+h$+"."+STR$Ka%:SYS424326:SYS131080,5,C$TOv%;f%:SYS424325:IFf%AND1THEN 14795Ka%=-1:=FNmsg_0 (A%!12,"OKAS",FNj(v%+4)) 14800ENDIF 14805IF(v%<>0)THEN 14810Ka%+=1 14815ENDIF 14820UNTILv%=0:="" 14825DEFPROCBc (Qa$):LOCALRa$,Sa$,Ib%,Ta$,B$,c%,z%:LOCALM%,c$,H%,Rb%,Ua$,A$:B$=MID$(Qa$,INSTR(Qa$,".")+1):Ra$=Na$+"."+Qa$:Sa$=Na$+".RemQueue."+B$+"I":Ta$="":O$="":h%=OPENINSa$:IFh%=0THEN 14830ENDPROC 14835ENDIF 14840c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%<>0):Ta$+=CHR$c%:c%=BGET#h%:ENDWHILE:c%=BGET#h%:WHILE(NOTEOF#h%)AND(c%<>0):Ua$+=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,Sa$:M%=A%!48:z%=0:WHILE(M%):IF(M%!40=0)THEN 14845H%=M%!4:c$=$(H%!4) 14850ELSE:c$=$(M%!40) 14855ENDIF 14860IFc$=Ta$THEN 14865z%=M%:M%=0 14870ELSE:M%=M%!0 14875ENDIF 14880ENDWHILE:IF(z%<>0)THEN 14885H%=z%!4:Rb%=H%!28:PROCeb (-1,"("+FNmsg_0 (A%!12,"IC9")+") "+A$,Ra$,B$,z%,Rb%) 14890ENDIF 14895ENDPROC 14900DEFPROCcb (Tf%,o$):LOCALe%,f%:SYS403072,Tf%TOe%;f%:IF(f%AND1)THEN 14905L$=FNmsg_0(A%!12,"UNKN"):M$=FNmsg_0(A%!12,"UNKN") 14910ELSE:L$=FNj (e%):M$=o$ 14915ENDIF 14920ENDPROC 14925DEFFNA (z%,A$,o$):LOCALQa$,h%,f%,c$,M%:Qa$=q$+"RemQueue."+h$+"."+STR$(Ka%)+"I":c$=$z%!40:SYS131085,131,Qa$TOh%;f%:IF(f%AND1)h%=0 14930IFh%<>0THEN 14935BPUT#h%,c$+CHR$0+h$+CHR$0+A$+CHR$0+o$:SYS131085,0,h%TO;f% 14940ENDIF 14945IF(f%AND1)ORh%=0:=0 14950=-1 14955DEFPROCHb:LOCALz%,nb%,R%:IFNOTFNwTHEN 14960PROCj(FNmsg_0(A%!12,"OKAV"),1):ENDPROC 14965ENDIF 14970IFINSTR(FN`,"Share:")>0THEN 14975PROCb (FNmsg_0 (A%!12,"OKAT")):ENDPROC 14980ENDIF 14985REPEAT:PROCt (z%,R%,nb%):PROCicon_deselect (Bb%,nb%):IFz%AND((z%!24AND(1<<17))=0)THEN 14990PROCLa (z%) 14995ENDIF 15000UNTIL(z%=0)AND(R%=0):ENDPROC 15005DEFPROCLa (z%):LOCALc$,Uf%,fc%,Vf%,W$,f%,bb%,f$,Wf%,Va$,H%:IF(z%!24AND(1<<17))>0THEN 15010ENDPROC 15015ENDIF 15020IF(z%!40=0)THEN 15025H%=z%!4:c$=$(H%!4) 15030ELSE:c$=$(z%!40) 15035ENDIF 15040IFNOTFNwTHEN 15045PROCj(FNmsg_1(A%!12,"OKAW",c$),1):z%!24=z%!24AND(NOT(1<<16)):ENDPROC 15050ENDIF 15055IFINSTR(FN`,"Share:")>0THEN 15060PROCb (FNmsg_1 (A%!12,"OKAU",c$)):z%!24=z%!24AND(NOT(1<<16)):ENDPROC 15065ENDIF 15070R$=$(z%!8):IF(z%!24AND1)=0THEN 15075PROCZ (z%) 15080ENDIF 15085Uf%=0:REPEAT:SYS131107,"Inet$LocalAddr*",0,1<<31,Uf%,0TO,,Vf%:IFVf%<0THEN 15090fc%=FNf (1196577875,NOT(Vf%)+1):IF(fc%>0)THEN 15095SYS35,"Inet$LocalAddr*",fc%,NOT(Vf%),Uf%,0TO,,,Uf%:fc%?(NOT(Vf%))=0:W$=FNj (fc%):PROCd (1196577875,fc%):f$="unshare _S"+W$:SYS131077,f$:f$="share <Wimp$ScrapDir>.Printers _S"+W$+" -noicon":SYS131077,f$ 15100ENDIF 15105ENDIF 15110UNTILVf%>=0:PROCGc (z%,c$):SYS424578,0,2,c$,0,0TO,,,,,Vb%;f%:IF(f%AND1)=0THEN 15115PROCb (FNmsg_1 (A%!12,"OKAQ",c$)):ENDPROC 15120ENDIF 15125Wf%=A%!48:WHILEWf%:IF(Wf%!40=0)THEN 15130H%=Wf%!4:Va$=$(H%!4) 15135ELSE:Va$=$(Wf%!40) 15140ENDIF 15145IF(Va$=c$)AND((Wf%!24AND(1<<16))>0)THEN 15150PROCb (FNmsg_1 (A%!12,"OKAQa",c$)):ENDPROC 15155ENDIF 15160Wf%=Wf%!0:ENDWHILE:SYS424577,0,2,c$,LENR$,R$TObb%;f%:IF(f%AND1)THEN 15165PROCb (FNmsg_1 (A%!12,"OKAQ",c$)):ENDPROC 15170ENDIF 15175z%!24=z%!24OR(1<<16):ENDPROC 15180DEFPROCgb (z%):LOCALc$,Vf%,fc%,Xf%,R$,W$,H%:IF(z%!40=0)THEN 15185H%=z%!4:c$=$(H%!4) 15190ELSE:c$=$(z%!40) 15195ENDIF 15200IF(z%!24AND(1<<16))THEN 15205z%!24=z%!24AND(-1-(1<<16)) 15210ENDIF 15215IFGa%THEN 15220SYS293505,1,2,c$,0,0 15225ENDIF 15230ENDPROC 15235DEFPROCHc:ENDPROC 15240DEFPROCP:Zf%=Oc%:_f%=!tb%:`f%=xc%:ag%=ub%:Wa$=V$:ENDPROC 15245DEFPROCQ:Oc%=Zf%:!tb%=_f%:xc%=`f%:ub%=ag%:V$=Wa$:ENDPROC 15250DEFPROCMa:bg%=Oc%:cg%=!tb%:dg%=xc%:eg%=ub%:Xa$=V$:ENDPROC 15255DEFPROCNa:Oc%=bg%:!tb%=cg%:xc%=dg%:ub%=eg%:V$=Xa$:ENDPROC 15260DEFFNx(R%,fg%,gg%,hg%,RETURNig%):LOCALZa$,_a$,`$:LOCALTa$,s$,`a$,c$,jg%:LOCALhb%,kg%,lg%,mg%,jb%,p%,z%:LOCALERROR:ig%=0:SYS263872:Za$="Share::_S"+FNt (R%!12)+".$":hb%=0:SYS424326:SYS131080,17,Za$TO;hb%:SYS424325:IF(hb%AND1)THEN 15265IFhg%THEN 15270ig%=-1 15275ELSE:PROCb(FNmsg_1 (A%!12,"OKAOs",$R%!4)) 15280ENDIF 15285SYS263873:=0 15290ENDIF 15295c$=$R%!4:p%=INSTR(c$," "):WHILEp%:MID$(c$,p%,1)=CHR$160:p%=INSTR(c$," ",p%+1):ENDWHILE:`a$=Za$+"."+c$:z%=FNxa(R%,`a$,fg%,gg%,hg%,ig%):SYS263873:=z% 15300DEFFNxa (R%,ab$,hb%,gg%,hg%,RETURNig%):LOCALdb%,H%,M%,s$,U%,Ac%,Bc%,Cc%,Dc%,Fc%,Pc%:LOCALz%,N%,Pa$,`$,lg%,i%,ng%,ab%,og%,pg%,qg%,rg%:LOCALsg%,ig%,jg%:ig%=0:IFNOTFNk (ab$)THEN 15305SYS263873:IFhg%THEN 15310ig%=-1:=0 15315ELSE:PROCb (FNmsg_1(A%!12,"OKAOs",$R%!4)) 15320ENDIF 15325ENDIF 15330SYS263872:PROCMb(H%):Cc%=H%!12:IFCc%THEN 15335Ac%=Cc%!4:IFAc%THEN 15340M%=!tb%:U%=H%!8:U%=U%!4:J%=FNb($(U%+16)):IFJ%THEN 15345WHILEAc%:IF$Ac%!8=$J%THEN 15350PROCm:SYS263873:z%=FNya($R%!4,$R%!8,H%,Ac%,gg%,hg%,ig%):=z% 15355ENDIF 15360Bc%=Ac%:Ac%=Ac%!0:ENDWHILE 15365ELSE:PROCp(FNmsg_1(A%!12,"OKZc",$(U%+16))) 15370ENDIF 15375!tb%=M% 15380ELSE:Bc%=0 15385ENDIF 15390ELSE:Bc%=0 15395ENDIF 15400PROCW(H%!8,Bc%,Cc%,0,Dc%,Fc%,H%):PROCm:H%!24=H%!24OR2:z%=FNya($R%!4,$R%!8,H%,Bc%,gg%,hg%,ig%):SYS263873:=z% 15405DEFPROCZb (z%):LOCALi%,M%,Fd%,Gd%,Cd%,y$,nb%,R%,tg%:PROCt (tg%,R%,nb%):IF(NOTtg%)ANDR%THEN 15410ENDPROC 15415ENDIF 15420SYS263872:M%=A%!48:WHILEM%:IFM%!0=z%THEN 15425Fd%=M%:M%=0 15430ELSE:M%=M%!0 15435ENDIF 15440ENDWHILE:y$=$z%!8:PROC`b(z%,Fd%):PROCLb(y$):IFV%=0THEN 15445IFA%!44THEN 15450Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 15455PROCselect_printer(Cd%,-1,0):Cd%=0 15460ELSE:Cd%=Cd%!0 15465ENDIF 15470ENDWHILE 15475ENDIF 15480ENDIF 15485IFV%=0PROCz 15490B%=1482184792:C%=Gd%:CALLP%+16:PROCk:IFFNh(Bb%)THEN 15495PROCq(Bb%) 15500ENDIF 15505SYS263873:ENDPROC 15510DEFFNza (H%):LOCALz%,Nf%:z%=A%!48:Nf%=0:WHILEz%:IFz%!4=H%THEN 15515Nf%=-1:z%=0 15520ELSE:z%=z%!0 15525ENDIF 15530ENDWHILE:=Nf% 15535DEFFNJ:LOCALBf%,Nf%:Nf%=0:Bf%=Ha%:WHILEBf%:IFBf%!20>0THEN 15540Nf%+=1 15545ENDIF 15550Bf%=Bf%!0:ENDWHILE:=Nf% 15555DEFPROCFc:LOCALz%,Cd%:IFNOTGa%THEN 15560ENDPROC 15565ENDIF 15570z%=A%!48:WHILEz%:IFz%!24AND(1<<17)THEN 15575PROCN ($z%!40) 15580ENDIF 15585z%=z%!0:ENDWHILE:PROCDc:PROCk:IFV%=0THEN 15590IFA%!44THEN 15595Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 15600PROCselect_printer(Cd%,-1,0):Cd%=0 15605ELSE:Cd%=Cd%!0 15610ENDIF 15615ENDWHILE 15620ENDIF 15625ENDIF 15630Ga%=0:ENDPROC 15635DEFPROCDc:LOCALBf%,`e%,Cd%:Bf%=Ha%:WHILEBf%:`e%=Bf%!0:IFBf%!20<=0THEN 15640PROCN ($Bf%!4) 15645ENDIF 15650Bf%=`e%:ENDWHILE:IFV%=0THEN 15655IFA%!44THEN 15660Cd%=A%!48:WHILECd%:IFNOTCd%!20THEN 15665PROCselect_printer(Cd%,-1,0):Cd%=0 15670ELSE:Cd%=Cd%!0 15675ENDIF 15680ENDWHILE 15685ENDIF 15690ENDIF 15695ENDPROC 15700DEFFNO(H%,bb$,s$):="Printers:Remote.ID"+bb$+"."+$H%!4+"."+s$ 15705DEFPROCIc (z%):ENDPROC 15710DEFFNya(c$,R$,H%,S%,gg%,hg%,RETURNig%):LOCALs%,t%,s$,z%,N%:ig%=0:S%!(S%!4*4+8)+=1:B%=1414419024:C%=68:z%=USR(P%+12):IFz%=0ERROR254,FNmsg_1(A%!12,"FA5","PRNT") 15715IFA%!48THEN 15720s%=A%!48:WHILEs%!0:s%=s%!0:ENDWHILE:s%!0=z% 15725ELSE:A%!48=z% 15730ENDIF 15735z%!0=0:z%!4=H%:B%=S%!8:C%=2:z%!8=USR(P%+28):B%=1413697091:C%=36:N%=USR(P%+12):IFN%=0ERROR254,FNmsg_1(A%!12,"FA5","CNCT") 15740N%!0=9:N%?4=1+((s%AND28)>>2):N%?5=0:SYS6,161,16TO,,s%:N%!8=(s%AND224)>>5:IFNOTFNsTHEN 15745N%!12=0 15750ELSE:SYS6,161,3TO,,s%:SYS6,161,4TO,,t%:IFs%THEN 15755$q%=STR$t%+"."+STR$s%:B%=q%:C%=2:N%!12=USR(P%+28) 15760ELSE:s$=CHR$t%:FORs%=1TO5:SYS6,161,152+s%TO,,t%:IFt%s$+=CHR$t%ELSEs%=5 15765NEXT:$q%=s$:B%=q%:C%=2:N%!12=USR(P%+28) 15770ENDIF 15775ENDIF 15780SYS131107,"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") 15785IF0<=H%!36-1THEN 15790FORt%=0TOH%!36-1:s%!(t%*4)=0:NEXT 15795ENDIF 15800z%!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 15805z%!48=FNG 15810ELSE:z%!48=0 15815ENDIF 15820z%!52=0:PROCc(H%,z%,-4,0):IFH%!24AND4PROCc(H%,z%,-12,0) 15825PROCJ (z%!40,$R%!4):PROCk:IFH%!24AND8THEN 15830z%!56=10*H%?(24+1) 15835ELSE:z%!56=-1 15840ENDIF 15845z%!24=z%!24OR(1<<17):IFNOTgg%THEN 15850PROCJc(z%,hg%,ig%) 15855ENDIF 15860=z% 15865DEFPROCRa (c$,`$,R$):LOCALz%,nb%,mb%,p%,ug%,Bf%:z%=A%!48:IFNOTz%THEN 15870nb%=251658240:mb%=-5 15875ELSE:nb%=FNW (z%):mb%=-3 15880ENDIF 15885da$="su_"+`$:ug%=FNr (c$,da$,mb%,nb%):PROCK (Ha%,FNwa (c$,ug%,R$)):IFA%!48=0ANDrb%>0THEN 15890PROCD (-1,rb%):rb%=-1 15895ENDIF 15900ENDPROC 15905DEFPROCSa(z%):LOCALJ%,S%,d%,N%,h%,X$,vb%,H%:cb%=z%!16:H%=z%!4:h%=FNc($FNe("cs:")):IF0<=h%-1THEN 15910FORd%=0TOh%-1:J%=FNd:IFJ%THEN 15915T%=FNa(J%,"nl:"):IFT%THEN 15920cb%!(d%*4)=0 15925ELSE:T%=FNa(J%,"in:"):IFT%THEN 15930cb%!(d%*4)=FNstore_integer(FNc($T%)) 15935ELSE:T%=FNa(J%,"st:"):IFT%THEN 15940B%=T%:C%=2:cb%!(d%*4)=USR(P%+28) 15945ELSE:T%=FNa(J%,"s0:"):IFT%THEN 15950B%=T%:C%=3:cb%!(d%*4)=USR(P%+28) 15955ELSE:T%=FNa(J%,"gs:"):IFT%THEN 15960B%=T%:C%=4:cb%!(d%*4)=USR(P%+28) 15965ELSE:T%=FNa(J%,"pt:"):IFT%THEN 15970B%=1381257040:C%=4:cb%!(d%*4)=USR(P%+12):IFcb%!(d%*4)=0ERROR253,FNmsg_1(A%!12,"FA5","POTR") 15975!cb%!(d%*4)=FNAa($T%) 15980ELSE:PROCR(FNmsg_1(A%!12,"OKH",$J%)) 15985ENDIF 15990ENDIF 15995ENDIF 16000ENDIF 16005ENDIF 16010ENDIF 16015ENDIF 16020NEXT 16025ENDIF 16030PROCZ (z%):ENDPROC 16035DEFFN`:=FNtask_read_env ("Wimp$ScrapDir",ba%) 16040DEFPROCGc (z%,c$):LOCALH%,vb%,S%,c%,ab%,U%,tc%,i%,j%,k%,l%,s$,p%,cb$,pb%,vg%,wg%:SYS263872:H%=z%!4:cb$=$z%!8:IFH%THEN 16045IFH%!8THEN 16050p%=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:ab%=H%!8:vb%=H%!12:IF$(ab%+12)<>"printers"THEN 16055BPUT#c%,$(ab%+12)+":":BPUT#c%,"#" 16060ENDIF 16065S%=vb%!4:WHILES%:IFS%!(S%!4*4+8)THEN 16070U%=ab%!4:i%=S%+8:IFLEFT$($(U%+16),6)="pr_nme"THEN 16075IFFNprinter_read_string(!i%)=cb$THEN 16080vg%=-1 16085ELSE:vg%=0 16090ENDIF 16095ELSE:vg%=-1 16100ENDIF 16105WHILEU%:IFvg%THENBPUT#c%,$(U%+16)+" "; 16110IF!i%=0THEN 16115IFU%!4=6THEN 16120IFvg%THENBPUT#c%,48 16125ELSE:IFU%!4=1THEN 16130IFvg%THENBPUT#c%,48 16135ENDIF 16140ENDIF 16145IFvg%THENBPUT#c%,10 16150ELSE:j%=!i%:CASEU%!4OF 16155WHEN1:IFvg%THENBPUT#c%,STR$!j% 16160WHEN2:IFvg%THENBPUT#c%,FNprinter_read_string(j%) 16165WHEN3:IFvg%THENBPUT#c%,FNprinter_read_string(j%) 16170WHEN4:IFvg%THENBPUT#c%,FNungstrans(FNprinter_read_string(j%)) 16175WHEN5:IFvg%THENBPUT#c%,10 16180CASEU%!8OF 16185WHEN1:IFvg%THENBPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 16190WHEN2:IFvg%THENBPUT#c%," "+FNprinter_read_string(j%!0) 16195IFvg%THENBPUT#c%," "+FNprinter_read_string(j%!4) 16200WHEN3:IFvg%THENBPUT#c%," "+FNprinter_read_string(j%!0) 16205IFvg%THENBPUT#c%," "+FNprinter_read_string(j%!4) 16210WHEN4:IFvg%THENBPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)) 16215IFvg%THENBPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 16220WHEN7:IFvg%THENBPUT#c%," "; 16225IFvg%THENPROCr(!j%!0,H%,c%,wg%) 16230IFvg%THENBPUT#c%,", "; 16235IFvg%THENPROCr(!j%!4,H%,c%,wg%) 16240ENDCASE 16245WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:IFvg%THENBPUT#c%,STR$l% 16250WHILEj%:IF0<=j%!4-1THEN 16255FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 16260WHEN1196707401:IFvg%THENBPUT#c%," "+STR$!l%+", "; 16265WHEN1196577875:IFvg%THENBPUT#c%," "+$l%+", "; 16270WHEN810701907:CALLZ%,l%,s$:IFvg%THENBPUT#c%," "+s$+", "; 16275WHEN1381258055:CALLY%,l%,s$:IFvg%THENBPUT#c%," "+FNungstrans(s$)+", "; 16280WHEN1381257040:IFvg%THENPROCr (!l%,H%,c%,wg%) 16285IFvg%THENBPUT#c%,"##" 16290ENDCASE 16295NEXT 16300ENDIF 16305IFvg%THENPTR#c%=PTR#c%-2 16310IFvg%THENBPUT#c%,10 16315j%=!j%:ENDWHILE 16320WHEN7:IFvg%THENPROCr (!j%,H%,c%,wg%) 16325WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:IFvg%THENBPUT#c%,STR$l% 16330WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 16335FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 16340ENDIF 16345IFvg%THENBPUT#c%," "+FNungstrans(s$) 16350j%=!j%:ENDWHILE 16355ENDCASE 16360ENDIF 16365U%=U%!0:i%+=4:ENDWHILE:IFvg%THENBPUT#c%,"#" 16370ENDIF 16375S%=S%!0:ENDWHILE:CLOSE#c%:SYS131080,18,"<Wimp$ScrapDir>.Printers."+c$,4038:SYS131080,4,"<Wimp$ScrapDir>.Printers."+c$,,,,3 16380ENDIF 16385ENDIF 16390SYS263873:ENDPROC 16395DEFPROCr (M%,H%,c%,wg%):LOCALdb$,ab%,U%,jb%,i%,j%,eb$,pb%,k%,l%,p%,s$:wg%+=1:eb$=FNo (M%,H%):U%=INSTR(eb$,":"):db$=MID$(eb$,1,U%-1):ab%=H%!8:jb%=0:WHILEab%ANDNOTjb%:IF$(ab%+12)=db$THEN 16400jb%=-1 16405ELSE:ab%=ab%!0 16410ENDIF 16415ENDWHILE:IFNOTjb%ANDNOTab%THEN 16420ENDPROC 16425ENDIF 16430BPUT#c%," "+db$+":":U%=ab%!4:i%=FNAa (eb$):IFi%=0THEN 16435ENDPROC 16440ENDIF 16445i%=i%+8:WHILEU%:BPUT#c%,$(U%+16)+" ";:IF!i%=0THEN 16450IFU%!4=6THEN 16455BPUT#c%,48 16460ELSE:IFU%!4=1THEN 16465BPUT#c%,48 16470ENDIF 16475ENDIF 16480BPUT#c%,10 16485ELSE:j%=!i%:CASEU%!4OF 16490WHEN1:BPUT#c%,STR$!j% 16495WHEN2:BPUT#c%,FNprinter_read_string(j%) 16500WHEN3:BPUT#c%,FNprinter_read_string(j%) 16505WHEN4:BPUT#c%,FNungstrans(FNprinter_read_string(j%)) 16510WHEN5:BPUT#c%,10:CASEU%!8OF 16515WHEN1:BPUT#c%," "+STR$!j%!0+", "+STR$!j%!4 16520WHEN2:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 16525WHEN3:BPUT#c%," "+FNprinter_read_string(j%!0):BPUT#c%," "+FNprinter_read_string(j%!4) 16530WHEN4:BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!0)):BPUT#c%," "+FNungstrans(FNprinter_read_string(j%!4)) 16535WHEN7:BPUT#c%," ";:PROCr(!j%!0,H%,c%,wg%):BPUT#c%,", ";:PROCr(!j%!4,H%,c%,wg%) 16540ENDCASE 16545WHEN6:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:IF0<=j%!4-1THEN 16550FORk%=0TOj%!4-1:l%=j%!(k%*4+8):CASEl%!-4OF 16555WHEN1196707401:BPUT#c%," "+STR$!l%+", "; 16560WHEN1196577875:BPUT#c%," "+$l%+", "; 16565WHEN810701907:CALLZ%,l%,s$:BPUT#c%," "+s$+", "; 16570WHEN1381258055:CALLY%,l%,s$:BPUT#c%," "+FNungstrans(s$)+", "; 16575WHEN1381257040:PROCr (!l%,H%,c%,wg%):BPUT#c%,"##" 16580ENDCASE 16585NEXT 16590ENDIF 16595PTR#c%=PTR#c%-2:BPUT#c%,10:j%=!j%:ENDWHILE 16600WHEN7:PROCr (!j%,H%,c%,wg%) 16605WHEN8:k%=j%:l%=0:WHILEk%:l%+=1:k%=!k%:ENDWHILE:BPUT#c%,STR$l%:WHILEj%:s$=CHR$j%?4:IF1<=j%?5THEN 16610FORk%=1TOj%?5:s$+=CHR$j%?(k%+5):NEXT 16615ENDIF 16620BPUT#c%," "+FNungstrans(s$):j%=!j%:ENDWHILE 16625ENDCASE 16630ENDIF 16635U%=U%!0:i%+=4:ENDWHILE:BPUT#c%,"#":ENDPROC 16640DEFFNAa(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 16645j%=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 16650k%-=1 16655ENDIF 16660ENDWHILE:=j% 16665ELSE:j%=j%!0:k%+=1 16670ENDIF 16675ENDWHILE:PROCb(FNmsg_2(A%!12,"FAG",s$,t$)):=0 16680DEFPROCJc(z%,hg%,RETURNig%):ig%=0:z%!24=z%!24OR1:N%=z%!12:PROCUa(z%):PROCA(z%):IFA%!44=1THEN 16685PROCAc(z%,-1,0,hg%,ig%) 16690ENDIF 16695ENDPROC 16700DEFPROCAc(z%,ac%,bc%,hg%,RETURNig%):LOCALcc%,i%,s$:ig%=0:cc%=V%:IFNOTbc%V%=z% 16705IFV%=0ENDPROC 16710s$=FNm(V%,0):IFs$<>""THEN 16715IFac%THEN 16720V%!24=V%!24ANDNOT2 16725ENDIF 16730V%!24=V%!24OR4:PROCi(V%):PROCf(-1,V%,0):IFV%=cc%THEN 16735PROCicon_deselect(-1,cc%!20):cc%=0 16740ENDIF 16745V%=cc%:IFhg%THEN 16750ig%=-1 16755ELSE:PROCb(s$) 16760ENDIF 16765ENDPROC 16770ENDIF 16775PROCc(V%!4,V%,-6,0):PROCub(V%):PROCz:IFac%THEN 16780IFcc%THEN 16785PROCicon_deselect(-1,cc%!20):cc%!24=cc%!24ANDNOT2 16790ENDIF 16795V%!24=V%!24OR2:PROCicon_select(-1,V%!20):SYS524608TO,,,,i%:IF?i%CALLZ%,i%,s$:SYS36,"Printer$",i%,LENs$ 16800ELSE:V%=cc% 16805ENDIF 16810ENDPROC
�>Datafiles.!RunImage ��,�$ |ș263872:�A%84,A%!16 256,W%256,aa%256,O%512,q%1024,X%256,ba%256:�a%(4):�aa("Printers:Messages",A%!12):��_(A%!12):���,�$ T�ba:�ca(�msg_0(A%!12,"ID")):�da:�ea:�fa:�ga:�ha:�P%+8:�ia:�ja:�ka:ș263873:��la �:�v(A%!20):�0:� (��v(ca%):�r%,t%,z%:r%=�aa(ca%):Ȏr%� #�0:�ma:�na ( �1:�oa -�2:ș262341,,q% 2 �3:�e 7 �6:�pa <�7:�da%� A�qa F�:�w(V%,7,q%) K� P �8:�ra U �9:�sa Z�13:!(q%!0)=0:�ta _�17,18:�ua(r%) d�19:�va i:�w(V%,r%,q%) n� s'ea%=-1:z%=A%!48:ȕz%:t%=z%!56:�t%� x�ea%=-1ea%=t%��t%<ea%ea%=t% }� �z%=z%!0:�:Ȏfa%� ��1:ea%+=500:fa%=2 ��2:�wa:fa%=0 �� �� �`��ja:�j$:q%!0=24:q%!12=0:q%!16=524611:q%!20=34:ș262375,18,q%:ga%=q%!8:�xa:�ya:�` (-1):�ha%� �:j$="<Printers$Path>Remote.ID"+h$:ș131080,8,j$:j$+="." ��:j$="<Printers$Path>" �� �Hș36,"PrinterChoices$Path",j$,�j$,0,0:�O("Printers:PaperRO",2):�ha%� �3�O ("<Printers$Dir>.Remote.ID"+h$+".PaperRW",1) �$�:�O("<Printers$Dir>.PaperRW",1) �� �"�ia%=0�253,�msg_0(A%!12,"FAK") ��za:ea%=-1:ș66�ja%:�Aa:� �3��xa:A%!20=12589105:ka%=12589427:la%=12589361:� �V��ba:�h%,l%,a%,w%: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:� ����ya:c=1814.4*72000/(180<<8):d=72000:ma%=44:na%=0:oa%=0:pa%=0:qa%=0:ra%=0:sa%=0:A%!48=0:A%!44=0:V%=0:ta%=0:J$="":ua%=0:va%=0:wa%=0:xa%=0:A%!24=0:A%!28=0:g$="null:":ya%=0:za%=0:A%!32=0:aa$="":A%!36=0:Aa%=0:Ba%=0:ia%=0:Ca%=0:Da%=0 �ș6,204,,255�,Fa%:K$="":ba$="":A%!76=0:A%!80=0:Ga%=0:Ha%=0:Ia%=0:Ja%=0:h$="":Ka%=0:q$="":L$="":M$="":La%=0:Ma%=0:fa%=0:ha%=0:� �x��ha:�c%,d%,Na%,Oa%,Pa%,Qa%,Ra%:�a$():�a$(255):Pa%=0:Qa%=0:Sa%=0:Ta%=0:Ua%=0:Va%=0:c%=-1:�:�Ba(j$,U$,c$,c%):�c$<>""� �Zș8,17,"Printers:"+c$+".Resources.Support"�d%,,Na%,,Oa%:�d%=1�(Na%�-1048576)=-1048576� �$Oa%=Oa%+3��3:Ȏ(Na%�1048320)>>8� �4091:�Oa%>Pa%Pa%=Oa% �Sa%<255a$(Sa%)=c$ Sa%+=1 �4092:Qa%+=Oa%:Ta%+=1 � � "� '%�c$="":�Ta%>0�b%(Ta%-1),b$(Ta%-1) ,Ra%=�+Qa%+Pa%+16*1024:�=Ra% 1�(�+Qa%+Pa%+16*1024)<Ra%� 6>Ra%=Ra%/1024:Ra%=Ra%-Ra%�8+8:�253,�msg_1(A%!12,"FA4",�Ra%) ;� @�Sa%>0� ER�c$(Sa%-1):�d%=0�Sa%-1:c$(d%)="Printers:"+a$(d%)+".Resources.Support":�:ȣc$() J� O� TP��Ba(�j$,�U$,�c$,�Wa%):�i%,Xa%:�Wa%=-1j$=�task_read_env("Printers$Path",ba%) Y�:�Wa%=-1� ^�j$=""� cc$="":� h� mi%=�j$,","):�i%=0i%=�j$+1 r!U$=�j$,i%-1):��U$)="."U$=�U$) wU$+=�0:j$=�j$,i%+1):Wa%=0 |� �3ș12,10,U$,ba%,1,Wa%,256,"*"�,,,Xa%,Wa%:�Xa%=1� ��ba%!16=2� �i%=ba%+20:�Z%,i%,c$:� �� ��:Wa%=-1 �� ��0:� �v��Ca(c$):�Na%,Oa%,f$:f$="Printers:"+c$+".Resources.Support":ș8,17,f$�d%,,Na%,,Oa%:Oa%=Oa%+3��3:�d%<>1ș8,19,f$,d% �2�(Na%�-1048576)<>-1048576�254,�msg_1("FA3",c$) �Ȏ(Na%�1048320)>>8� � �4091 ��4092:�Va%<Ta%� �4�u%Oa%:b%(Va%)=u%:b$(Va%)=c$:ș8,16,f$,u%:Va%+=1 �� �:�254,�msg_1("FA3",c$) �� �� �{��Da(c$,�Za%):�d%,Na%,f$,h%,_a%,`a%,H%:�ab%:f$="Printers:"+c$+".Resources.Support":ș8,17,f$�d%,,Na%:�d%<>1ș8,19,f$,d% �2�(Na%�-1048576)<>-1048576�254,�msg_1("FA3",c$) �JB%=1347769168:C%=60:Za%=�(P%+12):�Za%=0�253,�msg_1(A%!12,"FA5","PSUP") �Ȏ(Na%�1048320)>>8� ��4091:Za%!24=1 ��4092:Za%!24=0 �=:B%=1347769168:C%=Za%:�P%+16:�254,�msg_1(A%!12,"FA3",c$) �� �kZa%!0=0:$q%=c$:B%=q%:C%=2:Za%!4=�(P%+28):Za%!8=0:Za%!12=0:ș8,17,�g(Za%,"Resources.!Sprites")�d%:�d%=1� Uș131077,"IconSprites "+�g(Za%,"Resources.!Sprites")�C%;d%:�(d%�1)!C%=253:ș43,C% � 1ș8,17,�g(Za%,"Resources.Messages")�d%:�d%=1� 2�aa(�g(Za%,"Resources.Messages"),d%):Za%!16=d% �:Za%!16=0 � !Mș8,17,�g(Za%,"Resources.Templates")�d%:�d%<>1�254,�msg_1(A%!12,"FA2",c$) &j�Fa(�g(Za%,"Resources.Templates"),�g(Za%,"Resources.Template3D")):d%=0:`a%=Za%+20:�:�Ga("",d%,c$):�d%� +_�l("",c$,1,h%):B%=1145981271:C%=16+1+�c$:_a%=�(P%+12):�_a%=0�253,�msg_1(A%!12,"FA5","WIND") 0E_a%!0=0:_a%!4=h%:_a%!8=0:_a%!12=0:$(_a%+16)=c$:!`a%=_a%:`a%=_a%+0 5� :U�d%=0:�Ha:�c(Za%,0,-1,0):笤k(�g(Za%,"Template"))�254,�msg_1(A%!12,"OK1a",$Za%!4) ?�Ia(Za%):�m:�ha%� D笤k(�O(Za%,h$,"PrData"))� I�f$="<Printers$Dir>.Remote.ID"+h$+"."+$Za%!4:ș131080,8,f$:f$="<Printers$Dir>.Remote.ID"+h$+"."+$Za%!4+".PrData":d%=�(f$):�d%=0� N#�254,�msg_1(A%!12,"OK1",$Za%!4) S��:ab%=Za%!8:ȕab%:�#d%,$(ab%+12)+":":�#d%,"#":ab%=ab%!0:�:�#d%:ș8,18,f$,4038:笤k(�O(Za%,h$,"PrData"))�254,�msg_1(A%!12,"OK1",$Za%!4) X� ]� b;�:笤k(�g(Za%,"PrData"))�254,�msg_1(A%!12,"OK1",$Za%!4) g� l7�Ja(Za%):�m:�O(�g(Za%,"Resources.PaperRO"),0):�ra%� q$H%=ra%:ȕH%!0:H%=H%!0:�:H%!0=Za% v �:ra%=Za% {� �� �9��Ka:�z%,H%,t%:ea%=-1:z%=A%!48:ȕz%:H%=z%!4:�H%!24�8� �/t%=10*H%?(24+1):�ea%=-1ea%=t%��t%<ea%ea%=t% �z%!56=t% ��:z%!56=-1 �� �z%=z%!0:�:ș66�ja%:� �Sݤw:�ca$,f%,bb%,s$:�z%,H%,c$:ca$=�task_read_env("Wimp$ScrapDir",ba%):�ca$="":=0 ��ca$<>ba$� �9ș131080,8,"<Wimp$ScrapDir>.Printers"�bb%;f%:�(f%�1)� �Lbb%+=4:�Z%,bb%,s$:�b(�msg_2(A%!12,"WA13","<Wimp$ScrapDir>.Printers",s$)) ��:ba$=ca$:�Ga%� �xș131080,8,"<Wimp$ScrapDir>.Printers.RemQueue"�bb%;f%:�(f%�1)=0ș131080,8,"<Wimp$ScrapDir>.Printers.RemSpool"�bb%;f% ��(f%�1)� �Lbb%+=4:�Z%,bb%,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) �� ��La (z%) �� � z%=z%!0:� �� � =-1 ���Aa:�c%,d%,s$,J%,c$,H%,cb%,t%,db%,eb%,fb%,gb%:�hb%,ib%,R%,jb%,kb%,lb%,k$,z%,mb%,nb%,da$,p%,ob%,s$,pb%:�kb%,qb%:rb%=�r(�msg_0(A%!12,"NNE"),"s"+�msg_0(A%!12,"IC"),-5,251658240):sb%=-1:�ha%� =s$="<Printers$Dir>.Remote.ID"+h$+".Settings":ș8,17,s$�c% )�:ș8,17,"<Printers$Dir>.Settings"�c% � �c%=1� % �ha%� *%笤k (s$)�254,�msg_0(A%!12,"OKD") /=�:笤k("<Printers$Dir>.Settings")�254,�msg_0(A%!12,"OKD") 4� 9J%=�b("fv:"):�J%=0� >�j(�msg_0(A%!12,"OKV"),1) C�:�c($J%)<>1� H�j(�msg_0(A%!12,"OKV"),1) M5�:�P:�:J%=�b("cl:"):�Ma:hb%=0:ib%=�b("fg:"):�ib%� Rhb%=�c ($ib%) W� \#db%=�b("sn:"):�db%c$=$db%�c$="" a*�Na:�(J%>0)�((hb%�(1<<17))=0)�(ib%>0)� fd%=�$J%,":"):�d%=0d%=�$J%+1 kHs$=�$J%,d%+1):$J%=�$J%,d%-1):H%=ra%:eb%=0:ȕH%��eb%:�$H%!4=$J%eb%=-1 p�eb%H%=H%!0 u�:�eb%� z'�Oa:�Ca($J%):�Da($J%,H%):�Pa:eb%=-1 � � �eb%� �#db%=�b("nm:"):�db%c$=$db%�c$="" �"�b(�msg_2(A%!12,"WA1",$J%,c$)) � �:�Qa(H%) �� �� �I�J%=0:�Q:�:J%=�b("cl:"):kb%=!tb%:qb%=ub%:�P:hb%=0:ib%=�b("fg:"):�ib%� �hb%=�c ($ib%) �� �#db%=�b("sn:"):�db%c$=$db%�c$="" �)�Q:�(J%>0)�((hb%�(1<<17))>0)�(ib%>0)� �%jb%=0:R%=Ha%:ȕR%��jb%:�c$=$R%!4� � jb%=-1 � �:R%=R%!0 �� ��:�jb%��Ga%� �p%=�$J%,":"):�p%=0� �p%=�$J% �� ��Ra (c$,�$t%,1,p%-1)," ") � �:�hb%�1� �Y�P:z%=�x (R%,hb%,-1,0,gb%):�Q:�P:!tb%=kb%:ub%=qb%:�Sa (z%):�Q:�Ta (Ha%,$R%!4):�hb%�2� �z%!24=z%!24�2 ��:z%!24=z%!24��2 �� � � � �J%=0 � � �m $� )0�w(A%!48,-5,0):ob%=0:z%=A%!48:ȕz%:�z%!24�2� .ob%=-1:fb%=z%:z%=0 3 �:z%=z%!0 8� =�:z%=A%!48:�(�ob%)�(z%)� B�select_printer (z%,-1,0) G�:�ob%�fb%� L�select_printer (fb%,-1,0) Q� V� [� `F��Qa(H%):�J%,S%,z%,d%,N%,h%,X$,vb%:J%=�e("nm:"):X$=$J%:�H%!44>100� e �b(�msg_1(A%!12,"WA7",X$)):� j� o(vb%=H%!12:S%=vb%!4:ȕS%>0:�$S%!8=X$� tS%!(S%!4*4+8)+=1:S%=-1 y �:S%=S%!0 ~� ��:�S%=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:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"s0:"):�T%� �"B%=T%:C%=3:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"gs:"):�T%� �"B%=T%:C%=4:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"pt:"):�T%� �UB%=1381257040:C%=4:N%!(d%*4)=�(P%+12):�N%!(d%*4)=0�253,�msg_1(A%!12,"FA5","POTR") �!N%!(d%*4)=�F($T%,0) �!�:�R(�msg_1(A%!12,"OKH",$J%)) �� �� � � � � � � � #J�:B%=1413697091:C%=36:N%=�(P%+12):�N%=0�253,�msg_1(A%!12,"FA5","CNCT") (Dz%!12=N%:N%!0=�c($�e("ct:")):N%!4=�c($�e("bd:")):笤P�(N%?4>15)� -@�j(�msg_1(A%!12,"OKAM",�msg_0(A%!12,"BR"+�(N%?4))),1):N%?4=0 2� 7�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%) A�:N%?6=0 F� KȎN%!0� P�4:笤s� U<N%!0=0:�b(�msg_2(A%!12,"WA9",$z%!8,�msg_0(A%!12,"CN4"))) Z� _�6:笤y� d<N%!0=0:�b(�msg_2(A%!12,"WA9",$z%!8,�msg_0(A%!12,"CN6"))) i� n� s� x^h%=�c($�e("cs:")):B%=1195789891:C%=h%*4:cb%=�(P%+12):�cb%=0�253,�msg_1(A%!12,"FA5","CNFG") }z%!16=cb%:�0<=h%-1� ��d%=0�h%-1:J%=�d:�J%� �T%=�a(J%,"nl:"):�T%� �cb%!(d%*4)=0 ��:T%=�a(J%,"in:"):�T%� �&cb%!(d%*4)=�store_integer(�c($T%)) ��:T%=�a(J%,"st:"):�T%� �"B%=T%:C%=2:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"s0:"):�T%� �"B%=T%:C%=3:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"gs:"):�T%� �"B%=T%:C%=4:cb%!(d%*4)=�(P%+28) ��:T%=�a(J%,"pt:"):�T%� �WB%=1381257040:C%=4:cb%!(d%*4)=�(P%+12):�cb%!(d%*4)=0�253,�msg_1(A%!12,"FA5","POTR") �!cb%!(d%*4)=�F($T%,0) �!�:�R(�msg_1(A%!12,"OKH",$J%)) �� �� �� �� �� �� �� �� �� �Wz%!20=-1:z%!24=�c($�e("fg:")):z%!28=-1:z%!32=0:J%=�e("pn:"):d%=ia%:ȕd%:�$d%!4=$J%� �z%!36=d%:d%=0 �:d%=d%!0:�d%=0� :d%=ia%:z%!36=d%:�b(�Q(A%!12,"WA11",$J%,$d%!4,X$)):d%=0 � � [�:C%=2:B%=�e("sn:"):z%!40=�(P%+28):B%=�e("ic:"):z%!44=�(P%+28):�H%!32�4z%!48=�G�z%!48=0 z%!52=0:�z%!24�1� "�Ua(z%):�z%!24�2� '�select_printer(z%,-1,0) ,� 1� 6�z%!24�(1<<16)�Ga%� ;�La (z%) @� E1d%=A%+48:ȕ!d%:d%=!d%+0:�:!d%=z%:sa%+=1:�Ka:� J<ݤe(ea$):�J%:J%=�b(ea$):�J%=0�R(�msg_1(A%!12,"OKG",ea$)) O=J% T(��R(e$):�S(�msg_1(A%!12,"OKE",e$)):� Y(ݤg(H%,s$):="Printers:"+$H%!4+"."+s$ ^ݤz(h%):�p%:�h%=-2�=-1 c�h%=wb%�=-1 h�h%=xb%�=-1 m�h%=yb%�=-1 r�h%=zb%�=-1 w�h%=Ab%�=-1 |�h%=A%!40�=-1 ��h%=Q%�=-1 ��h%=Bb%�=-1 ��h%=Cb%�=-1 �p%=A%!48:ȕp%:�p%!48=h%�=-1 �p%=p%!0:�:=0 ����za:�i%,fa$,ga$,Db%,Fb%,Gb%,Hb%,j%:�Fa("Printers:Templates","Printers:Template3D"):�l("","info",1,Cb%):�l("","prntctrl",1,Bb%):�l("","connections",1,Q%):�l("","queue",1,A%!40):�l("","query",1,Ab%) ���l("","papersize",1,zb%):�l("","howquery",1,yb%):�l("","shutdown",1,xb%):�l("","save",1,wb%):�Ha:�icon_write(Cb%,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%=Bb%: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(Bb%,j%,�msg_0(A%!12,�icon_read(Bb%,j%))):�:� �ݤba(a,b):�a>b�=a�=b �WݤG:�p%:�Fa("Printers:Templates","Printers:Template3D"):�l("","pause",1,p%):�Ha:=p% �Q��Va(Ib%):!O%=Ib%:ș262348,,O%�1:B%=1179014466:C%=O%!76:�P%+16:ș262339,,O%:� �,��oa:�Jb%,i%,t$,ha$,z%,H%,Kb%:�R%:Ȏ!q%� �/�A%!40:ș262344,,q%�Jb%:B%=q%:C%=Jb%:�P%+36 �p�Bb%:ș262344,,q%�Jb%:ȕJb%:�i%=0�3:a%(i%)!4=a%(4)!4:a%(i%)!12=a%(4)!12:�:z%=A%!48:Lb%=0:ȕz%:Lb%+=1:�z%!40� �$a%(0)!20=$z%!40 ��:?a%(0)!20=13 �� �c$a%(1)!20=$z%!8:t$=�!(z%!12+0):ha$=�msg_0(A%!12,"IC"+t$):�ha$="IC"+t$ha$=�msg_1(A%!12,"ICx",t$) �!$a%(2)!20=ha$:�z%!24�(1<<16)� �t$="SHA" ��:�z%!24�1� t$="ACT" �:t$="INA" � � �$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:�:R%=Ha%:ȕR%:$a%(0)!20=$R%!4:$a%(1)!20=$R%!8:$a%(2)!20=�msg_0 (A%!12,"IC9"):�R%!20>0� "$a%(3)!20=�msg_0 (A%!12,"UNA") !$�:$a%(3)!20=�msg_0 (A%!12,"INA") &� +k�i%=0�3:ș262370,,a%(i%):a%(i%)!12=a%(i%)!4:a%(i%)!4-=(a%(4)!12-a%(4)!4):�:R%=R%!0:�:ș262346,,q%�Jb%:� 0&:�G(!q%,Kb%,H%,z%):�c(H%,z%,1,q%) 5� :� ?,��Wa(z%):�y%,s$:�z%!40s$=$z%!40�s$=$z%!8 D��Xa(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%:� IE��s(Ib%):!O%=24:O%!12=0:O%!16=262347:O%!20=Ib%:ș262375,17,O%,0:� N*��e:�i%,j%,z%,H%,Kb%:�s(!q%):�z(!q%)� Sș262342,,q% X&�:�G(!q%,Kb%,H%,z%):�c(H%,z%,3,q%) ]� b� g#��free_structure(p%):�i%:�p%=0� lȎp%!-4� q �1146377036:ȕp%:�0<=p%!4-1� v/�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��ua(r%):�s$,z%,H%,Kb%,Mb%,i%:Mb%=q%!4:Ȏq%!16� ��0:�H:�x � �1:�Za ��2:�q%!36� �9ș262356,,-1:i%=q%+44:�Z%,i%,s$:�icon_write(Q%,30,s$) �� � �3:�_a ��5 ��8:�A%!32� � �!q%<>20� ��(q%!20�1)=0Nb%=1�Nb%=2 ��:Nb%=1 �� �8q%!12=q%!8:ș262375,19,q%,Mb%:A%!20=A%!20�1:�`a(xb%) �� �5�10:�#q%!20,"/"+�task_read_env("Printers$Dir",O%) �,�11:z%=A%!48:ȕz%:�(z%!24�8)<>0�z%<>oa%� �"r%=z%!12:�r%!0=q%!20�q%!24<=0� �cs$=�msg_0(A%!12,"INU"):!q%=32+�s$��3:q%!12=q%!8:q%!16=12:$(q%+28)=s$+�0:ș262375,17,q%,Mb%:z%=0 � � �z%z%=z%!0 � �12:na%=2 �1282:�z(q%!32)� �ab %�:�G(q%!32,Kb%,H%,z%):�Kb%� *�c(H%,z%,r%,q%) /�:�q%!36� 4 �ua%�c (ua%!4,ua%,r%,q%)��ab 9� >� C� H�262345:�q%!20=xb%� M�A%!32>0A%!20=A%!20��1 R �:�bb W� \�524609:A%!36=0 a�524610:�V%� fq%!20=-2:q%!24=V%!20:�Za k�:z%=A%!48:�z%� p%q%!20=1:s$=�msg_0(A%!12,"OKU")+�0 u'�:q%!20=2:s$=�msg_0(A%!12,"OKW")+�0 z� K!q%=28+�s$��3:q%!12=q%!8:q%!16=524612:$(q%+24)=s$+�0:ș262375,17,q%,Mb% �� ��524611:�q%!4<>Ob%� � �q%!0=20� � �H:�x ��:�q%!12=ga%� �!�b(�msg_0(A%!12,"FAJ")):�H:�x �,�:q%!12=q%!8:q%!20=34:ș262375,17,q%,Mb% �� �� �� ��524614:qa%=2 ��524626:�V%� ��select_printer(V%,-1,0) �� � :�w ��w(V%,r%,q%) �� �� ���ab:�s$,z%,F$:Ȏq%!32� ��-2:�A%!48=0� �.�interactive_help(�msg_0(A%!12,"ICON0")):� �� �)�y(q%!36,z%):�z%!40s$=$z%!40�s$=$z%!8 �/�interactive_help(�msg_1(A%!12,"ICON1",s$)) �P�wb%:s$=�msg_0(A%!12,"SAVE"+�q%!36):�s$="SAVE"+�q%!36s$=�msg_0(A%!12,"SAVE") �interactive_help(s$) V�xb%:s$=�msg_0(A%!12,"SHTDWN"+�q%!36):�s$="SHTDWN"+�q%!36s$=�msg_0(A%!12,"SHTDWN") �interactive_help(s$) S�yb%:s$=�msg_0(A%!12,"HWQRY"+�q%!36):�s$="HWQRY"+�q%!36s$=�msg_0(A%!12,"HWQRY") �interactive_help(s$) S�zb%:s$=�msg_0(A%!12,"PAPER"+�q%!36):�s$="PAPER"+�q%!36s$=�msg_0(A%!12,"PAPER") �interactive_help(s$) $S�Ab%: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")) 3#�Q%:F$="CNCT"+�q%!36:�q%!36=13� 8$�icon_set(Q%,13)F$+="b"�F$+="a" =� B�q%!36=35� G$�icon_set(Q%,35)F$+="b"�F$+="a" L� Q�q%!36=37� V$�icon_set(Q%,37)F$+="b"�F$+="a" [� `5s$=�msg_0(A%!12,F$):�s$=F$s$=�msg_0(A%!12,"CNCT") e�interactive_help(s$) j2�Bb%:�interactive_help(�msg_0(A%!12,"PRCTRL")) o0�Cb%:�interactive_help(�msg_0(A%!12,"INFO")) t%:ș262388,1,W%,q%!32,q%!36:ȎJ$� y�"ME1":�!W%<>2� ~1�interactive_help(�msg_0(A%!12,"HME1-"+�!W%)) ��:�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":�H(Pb%,!W%)� ��!W%>3�xa%=0� �-�interactive_help(�msg_0(A%!12,"SMQ1-7")) �5�:�interactive_help(�msg_0(A%!12,"SMQ1-"+�(!W%))) �� ��:�!W%<>4� �3�interactive_help(�msg_0(A%!12,"HMQ1-"+�(!W%))) ��:�xa%!12� �.�interactive_help(�msg_0(A%!12,"HMQ1-4a")) �0�:�interactive_help(�msg_0(A%!12,"HMQ1-4b")) �� �� �� ��"MC1":�H(Pb%,!W%)� ��!W%=6� �0�interactive_help(�msg_0(A%!12,"HMC1S-6")):� �� �(ș262358,Bb%,O%,1<<21,1<<21:�!O%=-1� �-�interactive_help(�msg_0(A%!12,"SMC1-2")) /�:�interactive_help(�msg_0(A%!12,"SMC1-0")) � 3�:�interactive_help(�msg_0(A%!12,"HMC1-"+�!W%)) � �"MC1s":�H(Pb%,!W%)� �!W%=6� 0�interactive_help(�msg_0(A%!12,"HMC1S-6")):� #� ((ș262358,Bb%,O%,1<<21,1<<21:�!O%=-1� -.�interactive_help(�msg_0(A%!12,"SMC1s-2")) 20�:�interactive_help(�msg_0(A%!12,"SMC1s-0")) 7� <4�:�interactive_help(�msg_0(A%!12,"HMC1s-"+�!W%)) A� F� K� P� Up��interactive_help(m$):�Mb%:!q%=24+�m$��3:q%!12=q%!8:q%!16=1283:$(q%+20)=m$+�0:Mb%=q%!4:ș262375,17,q%,Mb%:� Z&��Za:�s$,i%,y%,z%,K%:�q%!20=A%!40� _X!W%=A%!40:ș262347,,W%:B%=q%!32-W%!16+W%!24:y%=�(P%+44):i%=A%!16:z%=!i%:K%=i%!4:�z%� dq%!20=-2:q%!24=z%!20 i� n�:�y(q%!24,z%) s� x&�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:�:aa$=s$:A%!36=0:Aa%=q%!4:s$=�l(-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%,Aa%:Ba%=q%!8 ���:q%!12=q%!8:ș262375,19,q%,Aa%:�select_printer(z%,0,0):ș36,"Printer$Temp",s$,�s$:q%!16=524608:ș262375,18,q%,Aa%:�cb (Aa%,aa$) �� �� �ݤl(Qb%):�c%:笤w� � �Qb%� ��254,�msg_0(A%!12,"OKAO") �$�:�j(�msg_0(A%!12,"OKAO"),1):="" �� �� �c�:Da%+=1:ș8,17,"<Wimp$ScrapDir>.Printers."+�Da%�c%:�c%=0:=�R("<Wimp$ScrapDir>.Printers."+�Da%) �7��_a:�s$,i%,z%,O$,o$,Rb%,Mb%:�q%!40=4038�q%!20=Bb%� � �db:� �� �Di%=q%+44:�Z%,i%,o$:ș8,17,o$�Rb%:�(Rb%�2)�(q%!40<4096)q%!40=4096 ��q%!20=A%!40� �X!W%=A%!40:ș262347,,W%:B%=q%!32-W%!16+W%!24:y%=�(P%+44):i%=A%!16:z%=!i%:K%=i%!4:�z%� �q%!20=-2:q%!24=z%!20 �� �� �&�q%!20<>-2�254,�msg_0(A%!12,"OKN") �mA%!36=Ba%<>0�Ba%=q%!12:q%!12=q%!8:q%!16=4:Mb%=q%!4:ș262375,17,q%,Mb%:Ba%=0:�y(q%!24,z%):Rb%=q%!40:�z%=0� �&�Rb%<>4038�254,�msg_0(A%!12,"OKW") �db:� � �A%!36� bș272000,Aa%�i%:�Z%,i%,O$:o$=aa$: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) � " �eb(A%!36,O$,s$,o$,z%,Rb%):� '��bb:ȎJ$� ,�"MQ1":�wa%� 1*�xa%xa%?11=xa%?11��8�wa%!24=wa%!24��16 6$�f(-1,wa%,xa%):va%=0:wa%=0:xa%=0 ;� @X�"MC1","MC1s":ș262358,Bb%,O%,1<<21,1<<21:�!O%�O%!4=-1�ta%=0�icon_deselect(Bb%,!O%) E� JJ$="":� OQ��va:�s$,z%,K%,N%,Sb%,G$,H%,z$,t%,Na%,Oa%,Tb%,o$:�C$,z%,jb%,w$,c$,A$:Ȏq%!16� T �11:na%=1 Y6�524608:�y(q%!24,z%):�z%=0�254,�msg_0(A%!12,"OKW") ^1K%=z%!32:H%=z%!4:N%=z%!12:�K%=0�(z%!24�36)=0� ci%=q%+44:�Z%,i%,o$:ȎN%!0� h�5:Sb%=(N%?6�2)<>0 m�9:Sb%=0 r:Sb%=(N%?6�1)<>0 w� | �Sb%� �g$=�l(-1):�N%!0=5� �%ș36,"PrinterType$5",g$,�g$:�I(5) �)�:ș36,"PrinterType$10",g$,�g$:�I(10) �� � G$=g$ �� �z$=�l(-1):ș36,"Printer$Temp",z$,�z$:q%!0=20:q%!16=524613:ș262375,18,q%,Aa%:qa%=0:�:�v(ka%):�qa%:b%=(qa%=2):Tb%=q%!4:�Sb%� �s$=�m(z%,-1):�s$<>""� ��b(s$):�z%!32� �$z%!24=z%!24�4:�i(z%):�f(-1,z%,0) �� �� �� ��b%� �ș8,17,z$�t%,,Na%,,Oa%:�t%� �s$=z$:ș8,23,z$�,,,,,,Rb% ��:�Sb%� ��N%!0=5� ��fb($N%!16,G$):� ��:s$=G$:Rb%=H%!28 �� ��:�N%!0=9�q$<>""� �c$=$(z%!40):M%=�c$," "):ȕM%:�c$,M%,1)=�160:M%=�c$," ",M%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Ka%):ș131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� �-ș272000,Aa%�i%:�Z%,i%,A$:�A (z%,A$,o$)� �Ub%=V%!4:ș131113,25,w$,C$ ��:ș131080,6,w$ � � � �select_printer(V%,0,-1):� � � !?ș272000,Tb%�O$:i%=�o$:ȕi%>0:�o$,i%,1)="."��o$,i%,1)=":"� &o$=�o$,i%+1):i%=0 +� 0%i%-=1:�:�eb(-1,O$,s$,o$,z%,Rb%):� 5� :� ?��select_printer(z%,0,-1):ș36,"Printer$Temp",,-1:s$=�l(-1):q%!0=48+�s$��3:q%!16=2:q%!36=-1:$(q%+44)=s$+�0:ș262375,17,q%,Aa%:Ba%=q%!8 D�524613:qa%=1 I:�w(V%,19,q%) N� S� X+��x:�H%:�z%,c$,Rb%,c$,Vb%,f%,N%:�z:�V%� ]1c$=$V%!40:N%=V%!12:H%=V%!4:Rb%=H%!28:�N%!0=9� b8ș424578,0,2,c$,0,0�,,,,,Vb%;f%:�(Vb%>0)�((f%�0)=0)� gș424323,0,Vb%,c$,Rb% l� q� v� { �Ga%� �#z%=A%!48:ȕz%:�(z%!24)�(1<<16)� ��(z%!40=0)� �H%=z%!4:c$=$H%!4 ��:c$=$z%!40 �� ��gb (z%) �� � z%=z%!0:� �� �qș131077,"%Wipe <Wimp$ScrapDir>.Printers.* RF~C~V":H%=ra%:ȕH%:�_(H%!16):H%=H%!0:�:�_(A%!12):�w(0,-2,0):�hb:� �(��ra:�H%,z%,Kb%,D$,H$,Wb%:笤z(!q%)� �+�G(!q%,Kb%,H%,z%):�z%!40D$=$z%!40�D$="" �1Wb%=V%:�c(H%,z%,8,q%):�$(Kb%+16)="configure"� ��z%!40H$=$z%!40�H$="" ��H$<>D$� ��(z%!24�(1<<16))� �8�ib(z%):�i(z%):�f(-1,z%,0):�(H%!24�4)=0�h(Q%)�T(z%) �I�:�b (�msg_0(A%!12,"OKAP")):H$=D$:�d (1196577875,z%!40):�J (z%!40,D$) �� �� ��z%!20<>-1�Wb%<>V%� ��select_printer(Wb%,-1,0) �� �� ��:�q%!24=13� � Ȏ!q%� !�Q%:�jb:�J$="ME6"ș262356,,-1 !q%=Q%:�e �zb%:�kb:!q%=zb%:�e :�wb%:ș262356,,-1:�icon_write(Q%,30,�icon_read(wb%,1)) � �:ș262364,q%!24 � %� *� /X��U(Xb%):�i%:!W%=Xb%:ș262348,,W%�1:i%=W%!88:ȕi%:�icon_deselect(Xb%,i%-1):i%-=1:�:� 4@��pa:�z%,nb%,K%,Zb%,H%,Kb%,H$,D$,B%,C%,Wb%:�R%:�z(q%!12)=0� 9-�G(q%!12,Kb%,H%,z%):�z%!40D$=$z%!40�D$="" >8Wb%=V%:�c(Kb%!8,Kb%!12,6,q%):�$(Kb%+16)="configure"� C�z%!40H$=$z%!40�H$="" H�H$<>D$� M�(z%!24�(1<<16))� R8�ib(z%):�i(z%):�f(-1,z%,0):�(H%!24�4)=0�h(Q%)�T(z%) WI�:�b (�msg_0(A%!12,"OKAP")):H$=D$:�d (1196577875,z%!40):�J (z%!40,D$) \� a� f�z%!20<>-1�Wb%<>V%� k�select_printer(Wb%,-1,0) p� u� z �:Ȏq%!8� �1024:Ȏq%!12� ��Bb%:�q%!16� �笤icon_set(q%!12,q%!16)� �'�U(q%!12):�icon_select(q%!12,q%!16) �� ��:�U(q%!12) �� �� ��256:Ȏq%!12� ��Bb%:�q%!16� ��icon_set(q%!12,q%!16)� ��icon_deselect(q%!12,q%!16) ��:�icon_select(q%!12,q%!16) �� �� �� ��64:�q%!12=wb%�lb(!q%,q%!4) ��2:Ȏq%!12� ��-2:�g("ME1",-1,0) ��A%!40:�g("MQ1",-1,0) ��Bb%:�g("MC1s",-1,0) ��Q%:Ȏq%!16� ��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) � !�zb%:�q%!16=47�g("MP1",-1,-1) � �4:Ȏq%!12� �-2:�mb $�Ab%:pa%=q%!16 )�yb%:pa%=q%!16 .�wb%:�q%!16=2� 35ș262356,,-1:�icon_write(Q%,30,�icon_read(wb%,1)) 8� =�xb%:ș262356,,-1:�q%!16=3� B!q%=A%!40:�e:�H:ȎNb%� G�1:ș262364,508 L �2:�x Q� V�:A%!20=A%!20��1 [� `�Bb%:�q%!16� e笤icon_set(q%!12,q%!16)� j'�U(q%!12):�icon_select(q%!12,q%!16) o� t�t(z%,R%,nb%):�z%� y(�c(z%!4,z%,-3,0):�nb(z%,"configure") ~� �� ��Q%:Ȏq%!16� ��0,1,2,3,4,33:�ob ��5:�jb:!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 �� ��zb%:Ȏq%!16� ��42:�kb:!q%=zb%:�e ��33:�pb:!q%=zb%:�e �4�48:B%=1163547472:C%=Ca%:�P%+16:Ca%=0:!q%=zb%:�e �&�23,22:�icon_select(zb%,q%!16):�qb ��47:�g("MP1",-1,-1) �� �!:z%=A%!48:ȕz%:�z%!48=q%!12� �K%=z%!32:Zb%=K%!44:�Zb%� ��Zb%!40� � �q%!16=4� ��n(z%,K%,-1) �>�:z%!24=z%!24��36:Zb%!40=0:�i(z%):�f(-1,z%,0):!q%=z%!48:�e � � � z%=0 �:z%=z%!0 � � #� (�1:Ȏq%!12� -�-2:�mb 2�Q%:Ȏq%!16� 7�0,1,2,3,4,33:�ob < �5:�jb A� F�zb%:Ȏq%!16� K�42:�kb P�33:�pb U&�23,22:�icon_select(zb%,q%!16):�qb Z� _� d� i� n� s-��ob:�c%,h%,i%,n%:c%=-1:�icon_set(Q%,1)� x��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 ��:�caret_set(Q%,c%) �� �� �*��y(Ib%,�z%):z%=A%!48:ȕz%:�z%!20=Ib%� �z%=z%!0:�:� �;��mb:�z%,_b%,`b%:`b%=�-1:_b%=(q%!8=1):�y(q%!16,z%):�z%� � �_b%� ��`b%�T(z%)��rb ��:�`b%� �(�c(z%!4,z%,-3,0):�nb(z%,"configure") �.�:�select_printer(z%,-1,0):�h(Bb%)�sb(z%) � � � � �tb(z%):� =��select_printer(z%,ac%,bc%):�cc%,i%,s$:cc%=V%:�bc%V%=z% " �V%=0� 's$=�m(V%,0):�s$<>""� , �ac%� 1V%!24=V%!24��2 6� ;�V%!32� @$V%!24=V%!24�4:�i(V%):�f(-1,V%,0) E� J�V%=cc%� O/�icon_deselect(-1,cc%!20):ș524632,-1:cc%=0 T� YV%=cc%:�b(s$):� ^� c%�c(V%!4,V%,-6,0):�ub(V%):�z:�ac%� h �cc%� m.�icon_deselect(-1,cc%!20):cc%!24=cc%!24��2 r� w]V%!24=V%!24�2:�icon_select(-1,V%!20):ș524608�,,,,i%:�?i%�Z%,i%,s$:ș36,"Printer$",i%,�s$ |�:V%=cc% �� �� �H��ub(z%):�`%:`%=z%!36:ș524612,,`%!8,`%!12,`%!24,`%!16,`%!28,`%!20:� �8��z:!ba%=20:ba%!12=0:ba%!16=524615:ș262375,17,ba%:� ��ݤB(dc%,z%):�p$,r%,s$,i%:p$=�msg_0(A%!12,"CLM"):!q%=32+�p$��3:q%!12=0:q%!16=11:q%!20=dc%:q%!24=0:$(q%+28)=p$+�0:ș262375,18,q%:na%=0:oa%=z%:�:�v(ka%):�na%:oa%=0:�na%=2i%=q%+28:�Z%,i%,s$:=s$ �="" ��ݤm(z%,ec%):�N%,p$,H%,bb%,f%,s$,fc%:�ia$,bb%,hb%,Vb%,c$,M%:�bb%=0�255:aa%?bb%=q%?bb%:�:H%=z%!4:N%=z%!12:g$=�task_read_env("PrinterType$"+�N%!0,ba%):ș6,204,Fa%:ș424324:ȎN%!0� � �1:�ec%� �/p$=�B(1,z%):�p$<>""�=�msg_1(A%!12,"OKI",p$) �� �fc%=�n(1):�fc%=0fc%=3 ��z%!24�128� �%g$="devices#buffer"+�fc%+":$."+�S �,�:g$="devices#buffer"+�fc%+":$.Parallel" �� � �2:�ec%� �/p$=�B(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�,Fa%:fc%=�n(2):�fc%=0fc%=3 �(g$="devices#buffer"+�fc%+":$.Serial" �'�4:�$N%!12=""�=�msg_0(A%!12,"OKAG") �?g$="NetPrint#"+$N%!12+":":ș263872:ș262659,$N%!12:ș263873 �!�5:g$=$N%!16:�g$=""g$="null:" �$ș131080,17,g$�bb%;f%:�f%�1bb%=0 � �bb%� �=ș131085,67,g$�bb%;f%:�(f%�1)=0�#bb%:ș131080,18,g$,H%!28 *�:ș131080,11,g$,H%!28�bb%;f%:�(f%�1)� bb%+=4:�Z%,bb%,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:�Ga%� &>c$=$z%!40:ș424578,0,2,c$,0,0�bb%,,,gc%,,Vb%;hb%:�(hb%�1)� +=�msg_1 (A%!12,"OKAR",c$) 0� 5'ș424323,1,Vb%,c$�bb%;hb%:�(hb%�1)� :=�msg_1 (A%!12,"OKAR",c$) ?� D}q$="Share::_S"+�t(Vb%)+".":ia$="Share::_S"+�t(Vb%)+".RemSpool."+h$:ș293254:ș131080,8,ia$,,,0�bb%;hb%:ș293253:�(hb%�1)� I=�msg_1 (A%!12,"OKAR",c$) N� Sbia$="Share::_S"+�t(Vb%)+".RemQueue."+h$:ș293254:ș131080,8,ia$,,,0�bb%;hb%:ș293253:�(hb%�1)� X=�msg_1 (A%!12,"OKAR",c$) ]� bs$=�da:�s$<>""� g=�msg_1 (A%!12,"OKAR",c$) l� q�M%=�c$," "):ȕM%:�c$,M%,1)=�160:M%=�c$," ",M%+1):�:g$="Share::_S"+�t(Vb%)+".RemSpool."+h$+"."+c$:ș293254:ș131080,17,g$�bb%;f%:�f%�1bb%=0 v �bb%� {=ș131085,67,g$�bb%;f%:�(f%�1)=0�#bb%:ș131080,18,g$,H%!28 �ș293253 �3�:ș131080,11,g$,H%!28�bb%;f%:ș293253:�(f%�1)� �=�msg_1 (A%!12,"OKAR",c$) �� �� ��:=�msg_1 (A%!12,"OKAR",c$) �� �� �Mș36,"PrinterType$"+�N%!0,g$,�g$:�I(N%!0):�bb%=0�255:q%?bb%=aa%?bb%:�:="" ���vb(fc%):�fc%ș6,21,fc% �� �5��I(hc%):�x%:�:��:�wb:�vb(�n(x%)):ș6,5,hc%:� �ș6,245,,255�,x%:�x%<>hc%� ��xb:ș6,5,hc%:�wb �� �� ���xb:ș6,229:� ���wb:ș6,229,1:� �4ݤca(N%,�a$):�c%,f%,s$:笤y�=�msg_0(A%!12,"OKL") �!�N%!20=0�=�msg_0(A%!12,"OKK") �>a$="NFS#Printer::"+$N%!20:�N%!24=0a$+=".lp"�a$+="."+$N%!24 �(�N%!28=0a$+=".nobody"�a$+="."+$N%!28 ��N%!32a$+="."+$N%!32 � ș131085,143,a$�c%;f%:�f%�1� � Ȏ!c%� ��204:=�msg_0(A%!12,"OKM") ):f%=c%+4:�Z%,f%,s$:=s$+" ("+�!c%+")" � � ș131085,,c%:="" 8��g(ja$,ic%,jc%):�y%,i%,kc%,lc%,mc%:�z%,R%,nb%:�ic%� nc%=q%!0-64:oc%=q%!4 � % �jc%� *q!O%=q%!12:O%!4=q%!16:ș262350,,O%:kc%=O%!16:lc%=O%!20:ș262347,,O%:nc%=O%!20+O%!4+kc%+2:oc%=O%!24+O%!16+lc%-2 /� 4�ja$="SVE"� 98�yb(za%!28,�msg_0(A%!12,"OP")):ș262356,,wb%,nc%,oc% >�:Ȏja$� Cy�"ME1":�menu_create(_%,�msg_0(A%!12,"ME1")):�zb(_%,0,Cb%,0):�a(_%,2,A%!44=0):oc%=96+(5+1)*ma%:�sb%wa%=0��y(q%!16,wa%) H�"ME2":�P� MR�menu_create(_%,�msg_0(A%!12,"ME2")+�msg_0(A%!12,"ME2a")+�msg_0(A%!12,"ME2b")) R?�:�menu_create(_%,�msg_0(A%!12,"ME2")+�msg_0(A%!12,"ME2b")) W� \*�menu_tick_match(_%,�icon_read(Q%,15)) aV�"ME3":�menu_create(_%,�msg_0(A%!12,"ME3")):�menu_tick_match(_%,�icon_read(Q%,17)) fV�"ME4":�menu_create(_%,�msg_0(A%!12,"ME4")):�menu_tick_match(_%,�icon_read(Q%,18)) kR�"ME5":�menu_create(_%,�msg_0(A%!12,"ME5")):mc%=(_%!28�256)<>0:�(�u=0��p<>0)� p�u=3��p=0� u-�menu_item(_%,1,�msg_0(A%!12,"ME5c"),mc%) z/�:�menu_item(_%,1,�msg_0(A%!12,"ME5a"),mc%) � �� �*�menu_tick_match(_%,�icon_read(Q%,19)) ��"ME6":�ic%�Ab �*�menu_tick_match(_%,�icon_read(Q%,25)) ��"MQ1":�ic%� �m�bb:va%=oc%:!q%=A%!40:ș262347,,q%:B%=va%-q%!16+q%!24:va%=�(P%+44):i%=A%!16:wa%=!i%:xa%=i%!4:�xa%=-1xa%=0 ��xa%=0� �R�menu_create(_%,�msg_1(A%!12,"MQ1",�msg_0(A%!12,"MQ1a"))):�wa%wa%!24=wa%!24�16 ��:�xa%!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"))) �� �xa%?11=xa%?11�8 �� ��f(-1,wa%,xa%) �� �X�a(_%,0,0):�a(_%,1,0):�a(_%,2,0):�a(_%,3,0):�a(_%,4,0):�a(_%,5,0):�a(_%,6,0):�xa%=0� �'�a(_%,4,-1):�a(_%,5,-1):�a(_%,6,-1) �&�:�xa%?11�5�a(_%,4,-1)��a(_%,5,-1) �� ��wa%!24�36� ��a(_%,0,-1):�a(_%,1,-1) ��:�a(_%,2,-1) �� �'�"MP1":�create_paper_menu(_%,zb%,5) ?�"MC1","MC1s":�menu_create(_%,�msg_0(A%!12,"MC1s")):�Ga%=0� �a(_%,2,-1) � 8ș262358,Bb%,O%,1<<21,1<<21:�(!O%=-1�O%!4=-1)�ta%=0� �!O%�icon_deselect(Bb%,!O%) �q%!12=Bb%�q%!16>3� �icon_select(Bb%,q%!16):i%=1 $ �:i%=0 )� . �:i%=2 3� 8 Ȏ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) B�1:�t (z%,R%,nb%):�R%� G4�a (_%,0,-1):�a (_%,1,-1):�a (_%,2,-1):�R%!20>0� L�a (_%,3,-1) Q�:�a (_%,4,-1) V� [�a (_%,5,-1) `� e�z%� j�z%!24�(1<<17)� o7�a (_%,1,-1):�a (_%,2,-1):�a (_%,3,-1):�a (_%,5,-1) t� y� ~�2:�a(_%,0,-1):�a(_%,1,-1) �� �� �&J$=ja$:�display_menu(0,_%,nc%,oc%) �� �� ����create_paper_menu(�Ib%,Xb%,nb%):�`%,i%,mc%:�menu_create(Ib%,�msg_0(A%!12,"MP1")):mc%=(Ib%!28�256)<>0:`%=ia%:i%=0:ȕ`%:�menu_item(Ib%,i%,$`%!4,mc%):i%+=1:`%=`%!0:�:�menu_tick_match(Ib%,�icon_read(Xb%,nb%)):� �?��display_menu(z%,_%,pc%,qc%):ua%=z%:ș262356,,_%,pc%,qc%:� �/ݤwas_adjust_used:ș262351,,O%:=(O%!8�1)<>0 �.��sa:�_b%,rc%,`%,i%,h%,n%,z%,nb%:�R%:�ua%� ��c(ua%!4,ua%,9,q%):� �� �_b%=�was_adjust_used:ȎJ$� ��"ME1":Ȏ!q%� ��1:�tb(wa%) � �2:�rb ��3:�Bb(wa%) ��4:�Cb:�Db ��5:�A%!32� � A%!20=A%!20�1:Nb%=2:�`a(xb%) ��:�x �� �� �-�"ME2":�icon_write(Q%,15,$(!q%*24+40+_%)) �5�"ME3":�icon_write(Q%,17,$(!q%*24+40+_%)):�Fb(-1) �5�"ME4":�icon_write(Q%,18,$(!q%*24+40+_%)):�Fb(-1) �"ME5":�Fb(!q%) T�"ME6":�menu_tick_match(_%,�icon_read(Q%,25)):�icon_write(Q%,25,$(!q%*24+40+_%)) �"MQ1":rc%=-1:Ȏ!q%� �0:wa%!24=wa%!24�4 �1:wa%!24=wa%!24�32 '�2:wa%!24=wa%!24��36:i%=wa%!32:�i%� i%=i%!44:�i%� #�i%!40� (i%!40=0:�wa%!48� -!q%=wa%!48:�e 2� 7� <� A� F�3:�A(wa%):rc%=0 K�4:�xa%!12� Pxa%?11=xa%?11�1 U�:xa%?11=xa%?11�4 Z� _�5:xa%?11=xa%?11��5 d�6:�n(wa%,xa%,-1):rc%=0 i� n �rc%� s�i(wa%):�!q%<3� x�f(-1,wa%,0) }�:�f(va%,wa%,xa%) �� �� �K�"MP1":`%=ia%:i%=!q%:ȕi%:`%=`%!0:i%-=1:�:�i%=0�52�4:Ca%!i%=`%!i%:�:�Gb ��"MC1","MC1s":Ȏ!q%� ��0:�t(z%,R%,nb%):�z%� �(�c(z%!4,z%,-3,0):�nb(z%,"configure") �� ��1:�t(z%,R%,nb%):�z%� � �T(z%) �� � �2:�Hb � �3:�Ib:�k � �4:�Jb:�k � �5:�Kb:�k ��6:�A%!48� � �4,26 ��0<=sa%-1� �(�i%=0�sa%-1:�icon_select(Bb%,i%+4):� �� �� � �Ha%� ��0<=Ja%-1� �,�i%=sa%�sa%+Ja%:�icon_select(Bb%,i%+4):� �� �� � ta%=-1 �7:�U(Bb%) � � �_b%� ș262351,,q%:�g(J$,0,0) �:�bb "� '� ,<��Cb:�c%,f%,H%,z%,M%,p%,Oa%,s$,f$:�sc%,R%:ș263872:�ha%� 11f$="<Printers$Dir>.Remote.ID"+h$+".Settings1" 6#�:f$="<Printers$Dir>.Settings1" ;� @Lș131085,143,f$�c%;f%:�f%�1f%=c%+4:�Z%,f%,s$:�254,�msg_1(A%!12,"OKB",s$) ED�:��:ș131085,0,c%:ș131080,6,f$:�254,�msg_1(A%!12,"OKB",�$) Jh�#c%,"fv: 1":z%=A%!48:ȕz%:H%=z%!4:�#c%,"cl: "+$H%!4+":"+�H%!40:�#c%,"nm: "+$z%!8:M%=z%!12:�H%!24�4� O'Oa%=H%!48:�#c%,"cn: "+�Oa%:�1<=Oa%� T �f%=1�Oa%:p%=!M%:M%+=4:Ȏ-1� Y�p%=0:�#c%,"nl: " ^&�p%!-4=1196707401:�#c%,"in: "+�!p% c%�p%!-4=1196577875:�#c%,"st: "+$p% h-�p%!-4=810701907:�Z%,p%,s$:�#c%,"s0: "+s$ m:�p%!-4=1381258055:�Y%,p%,s$:�#c%,"gs: "+�ungstrans(s$) r,�p%!-4=1381257040:�#c%,"pt: "+�o(!p%,H%) w1:ș131085,,c%:�254,�msg_1(A%!12,"OKC",$z%!8) |� �� �� �E�:�#c%,"ct: 16_"+�~M%!0:�#c%,"bd: 16_"+�~M%!4:�M%!8�48M%!8=M%!8�8 �B�#c%,"ft: 16_"+�~M%!8:�#c%,"et: ";:�M%!12=0�#c%,10��#c%,$M%!12 �,�#c%,"fl: ";:�M%!16=0�#c%,10��#c%,$M%!16 �,�#c%,"ns: ";:�M%!20=0�#c%,10��#c%,$M%!20 �,�#c%,"np: ";:�M%!24=0�#c%,10��#c%,$M%!24 �,�#c%,"nu: ";:�M%!28=0�#c%,10��#c%,$M%!28 �,�#c%,"no: ";:�M%!32=0�#c%,10��#c%,$M%!32 ��#c%,"cf: 16_"+�~M%?6 �� �0M%=z%!16:Oa%=H%!36:�#c%,"cs: "+�Oa%:�1<=Oa%� � �f%=1�Oa%:p%=!M%:M%+=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: "+�o(!p%,H%) �1:ș131085,,c%:�254,�msg_1(A%!12,"OKC",$z%!8) �� �� �� ��#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:�:R%=Ha%:ȕR%:�R%!20>0� ���#c%,"cl:":�#c%,"nm: "+$R%!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:" � �#c%,"sn: "+$R%!4:�#c%,"ic:" � UR%=R%!0:�:�#c%:ș131080,18,f$,4038:ș131080,6,�f$):ș131113,25,f$,�f$):ș263873:� R��Db:�H%,vb%,S%,c%,ab%,U%,tc%,i%,j%,k%,l%,s$,f%,f$:ș263872:H%=ra%:ȕH%:�H%!8� �H%!24�2� �ha%� Ff$="<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$) 0D�:��:ș131085,0,c%:ș131080,6,f$:�254,�msg_1(A%!12,"OKB",�$) 5Vab%=H%!8:vb%=H%!12:ȕab%:�#c%,$(ab%+12)+":":�#c%,"#":S%=vb%!4:ȕS%:�S%!(S%!4*4+8)� :T�#c%,"# Usage: "+�S%!(S%!4*4+8):U%=ab%!4:i%=S%+8:ȕU%:�#c%,$(U%+16)+" ";:�!i%=0� ?�U%!4=6� D�#c%,48 I�:�U%!4=1� N�#c%,48 S� X� ]�#c%,10 b�:j%=!i%:ȎU%!4� g�1:�#c%,�!j% l$�2:�#c%,�printer_read_string(j%) q$�3:�#c%,�printer_read_string(j%) v0�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%," "+�o(!j%!0,H%)+", "+�o(!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$)+", "; �)�1381257040:�#c%," "+�o(!l%,H%)+", "; �� �� �� � �#c%=�#c%-2:�#c%,10:j%=!j%:� ��7:�#c%,�o(!j%,H%) �F�8:k%=j%:l%=0:ȕk%:l%+=1:k%=!k%:�:�#c%,�l%:ȕj%:s$=�j%?4:�1<=j%?5� ��k%=1�j%?5:s$+=�j%?(k%+5):� �� �$�#c%," "+�ungstrans(s$):j%=!j%:� �� �� �U%=U%!0:i%+=4:�:�#c%,"#" �� oS%=S%!0:�:ab%=ab%!0:vb%=vb%!0:�:�#c%:ș131080,18,f$,4038:ș131080,6,�f$):ș131113,25,f$,�f$):H%!24=H%!24��2 � � � H%=H%!0:�:ș263873:� Vݤo(p%,H%):�vb%,S%,ab%,uc%,vc%:vb%=H%!12:ȕvb%:S%=vb%!4:vc%=0:ȕS%:�S%!(S%!4*4+8)� vc%+=1:�p%=S%� %9ab%=H%!8:ȕuc%:ab%=ab%!0:uc%-=1:�:=$(ab%+12)+":"+�vc% *� /� 4<S%=S%!0:�:uc%+=1:vb%=vb%!0:�:�b(�msg_0(A%!12,"FAF")):="" 91ݤh(h%):!W%=h%:ș262347,,W%:=(W%!32�1<<16)<>0 >��tb(z%):笤h(Bb%)� C�A%!48�Ha%� H�k M� R� W�s(Bb%):�q(Bb%):�sb(z%):� \��sb(z%):�p%:�z%� aOș262358,Bb%,O%,1<<21,1<<21:p%=O%:ȕ�!p%:�!p%<>z%!28�icon_deselect(Bb%,!p%) f0p%+=4:�:�(z%!24�44)=0�icon_select(Bb%,z%!28) k� p� u��B(p%):�M%,i%,pb%:�p%=0� zȎp%!-4� 7�1381257040:M%=!p%:pb%=M%+M%!4*4+8:!pb%-=1:�!pb%=0� �pb%=M%+8:�1<=M%!4� � �i%=1�M%!4:�B(!pb%):pb%+=4:� �� �� �!�1280266050:�B(p%!0):�B(p%!4) � �1146377036:ȕp%:�0<=p%!4-1� �"�M%=0�p%!4-1:�B(p%!(M%*4+8)):� �� � p%=p%!0:� �� �� �b��Lb(ka$):�H%,vb%,wc%,S%,i%,j%,k%,l%,pb%:H%=ra%:ȕH%:wc%=0:vb%=H%!12:S%=vb%!4:ȕS%:�$S%!8=ka$� ��(S%!(S%!4*4+8))=0� �H%!24=H%!24�2:�0<=S%!4-1� �?�i%=0�S%!4-1:pb%=S%!(i%*4+8):�B(pb%):�free_structure(pb%):� �� � �wc%� �wc%!0=S%!0 ��:vb%!4=S%!0 �� �B%=1413763664:C%=S%:�P%+16 �� � S%=0:H%=0 ��:wc%=S%:S%=S%!0 �� �:�H%H%=H%!0 �:� *��p(la$):�S(�msg_1(A%!12,"OKZ",la$)):� E��Mb(�H%):�M%,J%,c%,d%:J%=�b("cl:"):�J%=0�p(�msg_0(A%!12,"OKZa")) H%=ra%:ȕH%:�$H%!4=$J%� �H%!24�32� ]ș131080,7,"PrinterChoices:"+$J%+".WriteTest"�;c%:�(c%�1)�m:�254,�msg_1(A%!12,"OKAN",$J%) $� )"M%=!tb%:�Nb(H%,H%!8):!tb%=M%:� . �:H%=H%!0 3� 8�:�H%=0� =/�Oa:�Ca($J%):�Da($J%,H%):�Pa:�Ka:�H%!24�32� B]ș131080,7,"PrinterChoices:"+$J%+".WriteTest"�;c%:�(c%�1)�m:�254,�msg_1(A%!12,"OKAN",$J%) G� L�c(H%,A%!48,-5,0) Q� V%�H%=0�p(�msg_1(A%!12,"OKZb",$J%)) [� `7��Nb(H%,ab%):�U%,J%:U%=ab%!4:�:J%=�b($(U%+16)):�J%� eȎU%!4� j�5:�Ob(H%,ab%,$J%) o/�6:�?J%=13�p(�msg_1(A%!12,"OK7a",$(U%+16))) t�Pb(H%,ab%,$J%) y�7:�V(H%,ab%,$J%) ~/�8:�?J%=13�p(�msg_1(A%!12,"OK7a",$(U%+16))) ��Qb(H%,ab%,$J%) �� �0�:�!tb%<xc%�p(�msg_1(A%!12,"OKZc",$(U%+16))) �� �U%=U%!0:�U%=0:� �)��Ob(H%,ab%,t$):�J%,ma$,k$:J%=�d:�J%� �ȎU%!8� �!�1:J%=�I(J%,yc%):�?J%=13J%=�d �$�2,3,4:J%=�q(J%,k$):�?J%=13J%=�d �.�7:J%=�q(J%,k$):�V(H%,ab%,k$):�?J%=13J%=�d ��V(H%,ab%,$J%) �� �� �� �2��Pb(H%,ab%,t$):�i%,p%,zc%,J%:zc%=�t$:�1<=zc%� ��i%=1�zc%:J%=�d:�J%� �&p%=U%!8:ȕp%:�p%!4=7�V(H%,ab%,$J%) �p%=!p%:� �� �� �� �� �I��V(H%,ab%,c$):�i%,s$,t$:i%=�c$,":"):�i%=0�p(�msg_1(A%!12,"OKAA",c$)) �;s$=�c$,i%-1):t$=�c$,i%+1):ab%=H%!8:ȕab%:�$(ab%+12)=s$� ��t$>0� � �:�Nb(H%,ab%):� � �:ab%=ab%!0 � #�:�p(�msg_1(A%!12,"OKAB",s$)):� ,��Qb(H%,ab%,t$):�i%,zc%:zc%=�t$:�1<=zc%� #�i%=1�zc%:�d (� -� 2� 7c��db:�J%,H%,M%,s$,U%,Ac%,Bc%,Cc%,Dc%,Fc%:J%=q%+44:�Z%,J%,s$:笤k(s$)�254,�msg_1(A%!12,"OKX",s$) <$ș263872:�Mb(H%):Cc%=H%!12:�Cc%� AAc%=Cc%!4:�Ac%� F0M%=!tb%:U%=H%!8:U%=U%!4:J%=�b($(U%+16)):�J%� KȕAc%:�$Ac%!8=$J%� P�m:ș263873:�Rb(H%,Ac%):� U� ZBc%=Ac%:Ac%=Ac%!0:� _'�:�p(�msg_1(A%!12,"OKZc",$(U%+16))) d� i!tb%=M% n�:Bc%=0 s� x�:Bc%=0 }� �I�W(H%!8,Bc%,Cc%,0,Dc%,Fc%,H%):�m:H%!24=H%!24�2:�Rb(H%,Bc%):ș263873:� �0��S(s$):�m:�254,�Q(A%!12,"OK0",�ub%,V$,s$):� �3��h(H%,s$,na$):�S(�msg_2(A%!12,na$,$H%!4,s$)):� �`��Ia(Gc%):�J%,T%,Hc%,i%,Ic%,Jc%,Kc%,Lc%:J%=�b("tp:"):�J%=0�h(Gc%,�msg_0(A%!12,"OK3"),"OK2a") ��:J%=�d:�J%� �T%=�a(J%,"tp:"):�T%� �bHc%+=1:B%=1414548820:C%=12+1+�$T%:Ic%=�(P%+12):�Ic%=0�h(Gc%,�msg_1(A%!12,"FA5","TMPT"),"OK2a") � �Jc%� � Jc%!0=Ic% ��:Gc%!8=Ic% �� �/Ic%!0=0:Ic%!4=0:Ic%!8=0:$(Ic%+12)=$T%:Lc%=0 ��:T%=�a(J%,"end:"):�T%� �/�?T%<>13�h(Gc%,�msg_0(A%!12,"OK3a"),"OK2a") �Hc%-=1:Jc%=Ic% �>�:i%=�$J%,":"):�i%=0�h(Gc%,�msg_1(A%!12,"OK4",$J%),"OK2a") �2�Hc%<>1�h(Gc%,�msg_1(A%!12,"OK4a",$J%),"OK2a") �bIc%!8+=1:B%=1498567758:C%=16+1+i%:Kc%=�(P%+12):�Kc%=0�h(Gc%,�msg_1(A%!12,"FA5","NTRY"),"OK2a") ��Lc%Lc%!0=Kc%�Ic%!4=Kc% �FKc%!0=0:Kc%!4=0:Kc%!8=0:Kc%!12=0:$(Kc%+16)=�$J%,i%):J%+=i%+1:Ȏ-1� �ɤa(J%,"in")<>0:Kc%!4=1 �ɤa(J%,"st")<>0:Kc%!4=2 �ɤa(J%,"s0")<>0:Kc%!4=3 �ɤa(J%,"gs")<>0:Kc%!4=4 �Jɤa(J%,"bl")<>0:Kc%!4=5:T%=�a(J%,"bl"):ȕ?T%=32:T%+=1:�:�?T%=�","T%+=1 � Ȏ-1� ɤa(T%,"in")<>0:Kc%!8=1 ɤa(T%,"st")<>0:Kc%!8=2 ɤa(T%,"s0")<>0:Kc%!8=3 ɤa(T%,"gs")<>0:Kc%!8=4 ɤa(T%,"ptr")<>0:Kc%!8=7 ,:�h(Gc%,�msg_1(A%!12,"OK5",$T%),"OK2a") "� ':ɤa(J%,"ls")<>0:Kc%!4=6:T%=�a(J%,"ls"):�Sb(T%,Kc%,Gc%) ,ɤa(J%,"ptr")<>0:Kc%!4=7 1ɤa(J%,"ch")<>0:Kc%!4=8 6,:�h(Gc%,�msg_1(A%!12,"OK6",$J%),"OK2a") ;� @Lc%=Kc% E� J� O� T �Hc%=-1:� YK��Sb(Mc%,U%,Gc%):�tc%,M%,t%:M%=U%+8:�:ȕ?Mc%=32:Mc%+=1:�:�?Mc%=44Mc%+=1 ^!ȕ?Mc%=32:Mc%+=1:�:�?Mc%<>13� cRU%!12+=1:B%=1414744396:C%=8:tc%=�(P%+12):�tc%=0�253,�msg_1(A%!12,"FA5","LIST") h/!M%=tc%:M%=tc%:tc%!0=0:t%=�a(Mc%,"in"):�t%� mMc%=t%:tc%!4=1 r�:t%=�a(Mc%,"st"):�t%� wMc%=t%:tc%!4=2 |�:t%=�a(Mc%,"s0"):�t%� �Mc%=t%:tc%!4=3 ��:t%=�a(Mc%,"gs"):�t%� �Mc%=t%:tc%!4=4 ��:t%=�a(Mc%,"ptr"):�t%� �Mc%=t%:tc%!4=7 �-�:�h(Gc%,�msg_1(A%!12,"OK7",$Mc%),"OK2a") �� �� �� �� �� �� ��?Mc%=13:� �Mݤb(m$):�Nc%,i%:i%=Oc%+!tb%:ȕi%<Oc%+xc%:ȕ?i%=32:i%+=1:�:�?i%=35�?i%=13� �i%+=�$i%+1:ub%+=1 ��:�m$=�$i%,�m$)� �DNc%=i%+�m$:ȕ?Nc%=32:Nc%+=1:�:i%+=�$i%+1:!tb%=i%-Oc%:ub%+=1:=Nc% ��:i%+=�$i%+1:ub%+=1 �� �� ��:=0 �Iݤd:�Nc%,i%:i%=Oc%+!tb%:ȕi%<Oc%+xc%:ȕ?i%=32:i%+=1:�:�?i%=35�?i%=13� �!i%+=�$i%+1:!tb%=i%-Oc%:ub%+=1 �/�:Nc%=i%:i%+=�$i%+1:!tb%=i%-Oc%:ub%+=1:=Nc% �� ��:=0 .ݤa(J%,m$):ȕ?J%=32:J%+=1:�:�m$=�$J%,�m$)� J%+=�m$:ȕ?J%=32:J%+=1:�:=J% � =0 o��W(ab%,�Bc%,Cc%,Pc%,�Dc%,�Fc%,H%):�Wa%,Qc%,Rc%,J%,T%,U%,i%,Oa%:U%=ab%!4:Wa%=-1:�:Rc%=!tb%:Dc%=0:J%=�d:�J%� �Wa%=-1� ![Oa%=4*ab%!8+8:B%=1413763664:C%=Oa%+8:Qc%=�(P%+12):�Qc%=0�253,�msg_1(A%!12,"FA5","PRDT") &�0<=Oa%+7� +�i%=0�Oa%+7�4:Qc%!i%=0:� 0� 5�Bc%Bc%!0=Qc%�Cc%!4=Qc% :Qc%!4=ab%!8:Wa%=8 ?� D�:T%=�a(J%,$(U%+16)):�T%� IDc%=1:ȎU%!4� N&�1:Qc%!Wa%=�store_integer(�c($T%)) S)�2,3,4:B%=T%:C%=U%!4:Qc%!Wa%=�(P%+28) X�5:Qc%!Wa%=�ea(U%,Fc%) ]3�6:�?T%=13�h(H%,�msg_1(A%!12,"OK7a",$J%),"OK2") bQc%!Wa%=�fa(U%,�c($T%),Fc%) g%�7:�?T%<>13�X(H%,$T%,Qc%+Wa%,Fc%) l3�8:�?T%=13�h(H%,�msg_1(A%!12,"OK7a",$J%),"OK2") qQc%!Wa%=�ga(U%,�c($T%)) v� {� �Wa%+=4:U%=U%!0:�U%=0�Dc% �� ��Dc%=0� ��!tb%>=xc%Dc%=3 �-!tb%=Rc%:U%=ab%!4:T%=�a(J%,$(U%+16)):�T%� � Dc%=1 �0�:ab%=ab%!0:T%=�a(J%,$(ab%+12)+":"):�T%Dc%=2 �� �U%=0 �� ��U%=0:Bc%=Qc%:� ����Ja(H%):�ab%,s$,J%,Rc%,U%,Dc%,Qc%,Bc%,Cc%,Pc%,Fc%,i%:ab%=H%!8:�:J%=�b($(ab%+12)+":"):�J%=0�h(H%,�msg_1(A%!12,"OK8",$(ab%+12)),"OK2") �RB%=1145128264:C%=12:Cc%=�(P%+12):�Cc%=0�h(H%,�msg_1(A%!12,"FA5","HEAD"),"OK2") �+Cc%!0=0:Cc%!4=0:�Pc%Pc%!0=Cc%�H%!12=Cc% �;Bc%=0:�:U%=ab%!4:�W(ab%,Bc%,Cc%,Pc%,Dc%,Fc%,H%):�Dc%=0� �.J%=�d:�h(H%,�msg_1(A%!12,"OK9",$J%),"OK2") �� ե�Dc%<>1:ab%=ab%!0:Pc%=Cc%:�ab%=0:ȕFc%:i%=Fc%!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") �A!!i%=�F(s$,-1):i%=Fc%:Fc%=!Fc%:B%=1482184792:C%=i%:�P%+16:�:� �_ݤF(s$,Sc%):�j%,k%,t$:j%=�s$,":"):t$=�s$,j%+1):s$=�s$,j%-1):j%=H%!8:k%=0:ȕj%:�$(j%+12)=s$� �\j%=H%!12:ȕk%:j%=j%!0:k%-=1:�:k%=�t$-1:j%=j%!4:ȕk%:j%=j%!0:k%-=1:�:�Sc%j%!(j%!4*4+8)+=1 �=j% ��:j%=j%!0:k%+=1 �� �&�:�b(�msg_2(A%!12,"FAG",s$,t$)):=0 �_ݤstore_integer(v%):�b%:B%=1196707401:C%=4:b%=�(P%+12):�b%=0�253,�msg_1(A%!12,"FA5","INTG") !b%=v%:=b% 6ݤR(s$):�t$,i%,Tc%:ș39,s$,O%,256�,,Tc%:�Tc%=0�="" �i%=0�Tc%-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%,�Fc%):�J%,yc%,b%,k$:B%=1280266050:C%=8:b%=�(P%+12):�b%=0�253,�msg_1(A%!12,"FA5","BOOL") 4J%=�d:�J%� 9ȎU%!8� >:�1:J%=�I(J%,yc%):b%!0=�store_integer(yc%):�?J%=13J%=�d C b%!4=�store_integer(�c($J%)) HG�2,3,4:J%=�q(J%,k$):$q%=k$:B%=q%:C%=U%!8:b%!0=�(P%+28):�?J%=13J%=�d MB%=J%:C%=U%!8:b%!4=�(P%+28) R3�7:J%=�q(J%,k$):�X(H%,s$,b%+0,Fc%):�?J%=13J%=�d W�X(H%,$J%,b%+4,Fc%) \� a� f=b% k?ݤfa(U%,Uc%,�Fc%):�i%,M%,Vc%,Wc%,J%,Xc%,Zc%,yc%,k$:�1<=Uc%� p[�i%=1�Uc%:B%=1146377036:C%=4*U%!12+8:Vc%=�(P%+12):�Vc%=0�253,�msg_1(A%!12,"FA5","LSTD") u�Wc%Wc%!0=Vc%�M%=Vc% z(Vc%!0=0:Vc%!4=U%!12:Zc%=8:J%=�d:�J%� Xc%=U%!8:ȕXc%:ȎXc%!4� �0�1:J%=�I(J%,yc%):Vc%!Zc%=�store_integer(yc%) �>�2,3,4:J%=�q(J%,k$):$q%=k$:B%=q%:C%=Xc%!4:Vc%!Zc%=�(P%+28) �)�7:J%=�q(J%,k$):�X(H%,k$,Vc%+Zc%,Fc%) �� �Xc%=!Xc%:Zc%+=4:� �� � Wc%=Vc%:� �� �=M% �1ݤga(U%,Uc%):�i%,Vc%,J%,Wc%,M%,j%,t$:�1<=Uc%� ��i%=1�Uc%:J%=�d:�J%� �Xt$=�R($J%):B%=1380010051:C%=5+�t$:Vc%=�(P%+12):�Vc%=0�253,�msg_1(A%!12,"FA5","CHAR") �4Vc%!0=0:Vc%?4=�t$:Vc%?5=�t$-1:t$=�t$,2):�1<=�t$� �%�j%=1��t$:Vc%?(j%+5)=��t$,j%,1):� �� ��Wc%Wc%!0=Vc%�M%=Vc% �� � Wc%=Vc%:� �� �=M% �z��X(H%,c$,_c%,�Fc%):�i%,s$,t$,`c%,ad%,Pc%,ab%,Bc%,bd%,Dc%,Qc%,t$:i%=�c$,":"):�i%=0�h(H%,�msg_1(A%!12,"OKAA",c$),"OK2") �Ks$=�c$,i%-1):t$=�c$,i%+1):ab%=H%!8:bd%=H%!12:Pc%=0:ȕab%:�$(ab%+12)=s$� ��t$>0� �KB%=1381257040:C%=�c$+1:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","POTR") �X$i%=c$:!_c%=i%:B%=1482184792:C%=8:`c%=�(P%+12):�`c%=0�253,�msg_1(A%!12,"FA5","XXXX") !`c%=Fc%:`c%!4=_c%:Fc%=`c%:� �:�bd%� Bc%=bd%!4:�Bc%� ȕBc%!0:Bc%=Bc%!0:� � �:Bc%=0 � $8ad%=Bc%:�W(ab%,Bc%,bd%,Pc%,Dc%,Fc%,H%):�Dc%=0�Bc%=0� )J%=�d:�J%t$=$J%�t$="" .'�h(H%,�msg_1(A%!12,"OK9",t$),"OK2") 3� 8*Qc%=bd%!4:ȕQc%<>Bc%:�Qc%!(Qc%!4*4+8)� =Dc%=-1:�0<=Qc%!4-1� B'�i%=0�Qc%!4-1:笤C(Qc%,Bc%,i%*4+8)� GDc%=0:i%=Qc%!4 L� Q� V� [ �Dc%� `�0<=Bc%!4-1� eA�i%=0�Bc%!4-1:`c%=Bc%!(i%*4+8):�B(`c%):�free_structure(`c%):� j� o/ad%!0=0:B%=1413763664:C%=Bc%:�P%+16:Bc%=Qc% t�:Qc%=!Qc% y� ~�:Qc%=!Qc% �� �I�:B%=1381257040:C%=4:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","POTR") �(!i%=Bc%:!_c%=i%:Bc%!(Bc%!4*4+8)+=1:� �� ��:ab%=ab%!0:�t$=0� �Pc%=bd%:bd%=bd%!0 �� �� �,�:�h(H%,�msg_1(A%!12,"OKAB",s$),"OK2"):� �6ݤC(s%,d%,o%):�s$,d$:s%=s%!o%:d%=d%!o%:�s%=0�d%=0� �=(s%=d%) ��:Ȏs%!-4� ��1196707401:=!s%=!d% ��1196577875:=$s%=$d% �)�810701907:�Z%,s%,s$:�Z%,d%,d$:=s$=d$ �*�1381258055:�Y%,s%,s$:�Y%,d%,d$:=s$=d$ ��1280266050:=�ha(s%,d%) ��1146377036:=�ia(s%,d%) ��1381257040:=!s%=!d% ��1380010051:=�ja(s%,d%) �&:�b(�msg_1(A%!12,"WA10",�~s%!-4)) �� �� �=0 �,ݤha(s%,d%):�C(s%,d%,0)�=�C(s%,d%,4)�=0 $ݤia(s%,d%):�i%:ȕs%:�0<=s%!4-1� &�i%=0�s%!4-1:笤C(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 -.ݤI(cd%,�yc%):�i%,dd%:i%=�$cd%,","):�i%=0� 2yc%=�c($cd%):dd%=cd%+�$cd% 77�:yc%=�c(�$cd%,i%-1)):dd%=cd%+i%:ȕ?dd%=32:dd%+=1:� <� A=dd% F�ݤq(cd%,�k$):�i%,oa$,ed%,fd%:k$="":i%=0:ȕcd%?i%=32:i%+=1:�:ed%=-1:fd%=(cd%?i%=34):ȕ�(cd%?i%=13�(ed%�cd%?i%=44)):�fd%�cd%?i%<>34�ed%k$+=�cd%?i% K�fd%�cd%?i%=34ed%=�ed% Pi%+=1:�:�cd%?i%=13� Udd%=cd%+i% Z%�:dd%=cd%+i%+1:ȕ?dd%=32:dd%+=1:� _� d=dd% idݤk(c$):�c%,i%,gd%,hd%,id%,jd%,kd%,dd%,ld%,gb%:ș8,17,c$�c%,,gd%,,xc%:�(c%=0�c%=1)�ș8,19,c$,c% n�c%=0�=0 s*�(gd%>>>20)=4095hd%=gd%>>8�4095�hd%=-1 x*�hd%<>4038�254,�msg_1(A%!12,"OKAL",c$) }QB%=1096040772:C%=4+xc%+1:Oc%=�(P%+12)+4:�Oc%=4�253,�msg_1(A%!12,"FA5","DATA") �,ș8,16,c$,Oc%:�xc%>=20�Oc%!0=1213419859� �mș272129,8,-1�id%:kd%=Oc%!4:B%=1096040772:C%=4+kd%+1:dd%=�(P%+12)+4:�dd%=4�253,�msg_1(A%!12,"FA5","DATA") �Jș131102,6,,,id%�C%,,jd%;gb%:�(gb%�1)�253,�msg_1(A%!12,"FA5","squash") �fș272129,4,jd%,Oc%+20,xc%-20,dd%,kd%�ld%:ș30,7,,jd%:B%=1096040772:C%=Oc%-4:�P%+16:Oc%=dd%:xc%=kd% �� �Utb%=Oc%-4:!tb%=0:ub%=1:B%=Oc%:C%=xc%:�P%+52:�Oc%?(xc%-1)<>13xc%+=1:Oc%?(xc%-1)=13 � V$=c$:=-1 �3��m:B%=1096040772:C%=Oc%-4:�P%+16:Oc%=0:xc%=0:� �1��Oa:md%=Oc%:nd%=tb%:od%=xc%:pd%=ub%:pa$=V$:� �1��Pa:Oc%=md%:tb%=nd%:xc%=od%:ub%=pd%:V$=pa$:� �u��Rb(H%,S%):�s%,t%,s$,z%,N%:S%!(S%!4*4+8)+=1:B%=1414419024:C%=68:z%=�(P%+12):�z%=0�253,�msg_1(A%!12,"FA5","PRNT") ��A%!48� �%s%=A%!48:ȕs%!0:s%=s%!0:�:s%!0=z% ��:A%!48=z% �� �rz%!0=0:z%!4=H%:B%=S%!8:C%=2:z%!8=�(P%+28):B%=1413697091:C%=36:N%=�(P%+12):�N%=0�253,�msg_1(A%!12,"FA5","CNCT") �fș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:笤s� �N%!12=0 �(�:ș6,161,3�,,s%:ș6,161,4�,,t%:�s%� �-$q%=�t%+"."+�s%:B%=q%:C%=2:N%!12=�(P%+28) �8�:s$=�t%:�s%=1�5:ș6,161,152+s%�,,t%:�t%s$+=�t%�s%=5 �&�:$q%=s$:B%=q%:C%=2:N%!12=�(P%+28) �� �� ��ș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=�G �: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) 1�:z%!56=-1 6� ;�Z(z%):� @X��t(�z%,�R%,�nb%):ș262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=0:z%=A%!48:ȕz%:�z%!28=nb%� E� J �:z%=z%!0 O� T�:R%=Ha%:ȕR%:�R%!16=nb%� Y� ^ �:R%=R%!0 c� h�:� mV��Tb (�z%,�nb%):ș262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=0:z%=A%!48:ȕz%:�z%!28=nb%� r� w �:z%=z%!0 |� ��:� �O��Ub (�R%,�nb%):ș262358,Bb%,O%,1<<21,1<<21:nb%=!O%:R%=Ha%:ȕR%:�R%!16=nb%� �� � �:R%=R%!0 �� ��:� �@��T(z%):�N%,i%,qd%,rd%,sd%:�z%!24�8�254,�msg_0(A%!12,"OKAJ") �,ya%=z%:za%=z%!4:N%=z%!12:�z%!24�(1<<17)� �� �� ��za%!24�4� �m�c(za%,ya%,-11,0):�s(�printer_find_window(ya%,"connections")):�q(�printer_find_window(ya%,"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) ǐ�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� ��1:i%=0 ��2:i%=1 ��4:�s i%=2 ��5:i%=4 ��6:�y i%=3 ��8:�za%!24�16i%=33 �� ��i%�icon_select(Q%,i%) �s�icon_write(Q%,15,�msg_0(A%!12,"BR"+�N%?4)):i%=N%!8:qd%=i%�3:sd%=(i%�4)>>2:rd%=(i%�48)>>4:�(i%�8)=0rd%=0�rd%+=1 �a�icon_write(Q%,17,�msg_0(A%!12,"DA"+�qd%)):�icon_write(Q%,18,�msg_0(A%!12,"PA"+�rd%)):�sd%=0� �*�icon_write(Q%,19,�msg_0(A%!12,"SB0")) �:�qd%=0�rd%<>0� +�icon_write(Q%,19,�msg_0(A%!12,"SB1b")) �:�qd%=3�rd%=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) 04�N%?6�2�icon_select(Q%,35)��icon_deselect(Q%,35) 5��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<>""�u(Q%,30,N%,16)��icon_write(Q%,30,"null:") :,�s�icon_unshade(Q%,2)��icon_shade(Q%,2) ?,�y�icon_unshade(Q%,3)��icon_shade(Q%,3) DT!W%=Q%:ș262348,,W%�1:W%!28=-1:�za%!24�16�icon_unshade(Q%,33)��icon_shade(Q%,33) I�s(Q%):ș262341,,W%:�ob N� S� XM��u(Kb%,nb%,td%,Wa%):�icon_write(Kb%,nb%,�printer_read_string(td%!Wa%)):� ]��C(td%,Wa%,nb%):�td%!Wa%� b-B%=1196577875:C%=td%!Wa%:�P%+16:td%!Wa%=0 g� lA!X%=Q%:X%!4=nb%:ș262350,,X%:B%=X%!28:C%=2:td%!Wa%=�(P%+28):� qݤu:=�T(Q%,17,3,"DA",A%!12) vݤp:=�T(Q%,18,4,"PA",A%!12) {4ݤU:�icon_read(Q%,19)=�msg_0(A%!12,"SB0")�=0�=1 ���Fb(ud%):�ud%=-1ud%=�U ��ud%=0� �*�icon_write(Q%,19,�msg_0(A%!12,"SB0")) ��:�u=0��p<>0� �+�icon_write(Q%,19,�msg_0(A%!12,"SB1b")) ��:�u=3��p=0� �+�icon_write(Q%,19,�msg_0(A%!12,"SB1c")) �-�:�icon_write(Q%,19,�msg_0(A%!12,"SB1a")) �� �� �� �� �CݤT(Kb%,nb%,vd%,qa$,wd%):�i%,s$:s$=�icon_read(Kb%,nb%):�0<=vd%� �)�i%=0�vd%:�s$=�msg_0(wd%,qa$+�i%)�=i% �� �� �=0 �9��jb:�N%,i%,p$,s$:N%=ya%!12:N%!0=0:�icon_set(Q%,37)� �N%?6=N%?6�1 ��:N%?6=N%?6��1 �� ��icon_set(Q%,0)� �9p$=�B(1,ya%):�p$=""N%!0=1��254,�msg_1(A%!12,"OKI",p$) �� ��icon_set(Q%,1)� �9p$=�B(2,ya%):�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%=�u��U<<2:�p i%=i%��p-1<<4�8 !/N%!8=i%:�icon_set(Q%,13)� !4 N%?5=1 !9�:N%?5=0 !>� !C�icon_set(Q%,35)� !HN%?6=N%?6�2 !M�:N%?6=N%?6��2 !R� !Wq�C(N%,12,25):�C(N%,20,26):�C(N%,24,27):�C(N%,28,28):�C(N%,32,29):�C(N%,16,30):�ib(ya%):�f(-1,ya%,0):�ya%!20� !\�ya%!24�2� !a�select_printer(ya%,-1,0) !f� !k�i(ya%) !p� !u� !z,��i(z%):�ra$,i%,x$,sa$,xd%,H%:�z%!20=-1� !/H%=z%!4:ra$=�V(z%):�z%!44x$=$z%!44�x$=$H%!4 !�`sa$="ss_"+x$+","+x$:!O%=-1:O%!4=z%!20:ș262350,,O%:xd%=O%!24�1<<21:�ra$<>$O%!28�sa$<>$O%!32� !�Hi%=�r(ra$,x$,-4,z%!20):�D(-1,z%!20):z%!20=i%:�xd%�icon_select(-1,i%) !�� !�� !�0ݤV(z%):�N%,K%:�z%!24�4�=�msg_0(A%!12,"QU1") !� �z%!24�8� !�?K%=z%!32:�K%?11�1�=�msg_0(A%!12,"QU1")�=�msg_0(A%!12,"QU2") !�� !�"�z%!24�32�=�msg_0(A%!12,"QU3") !��z%!40�=$z%!40 !�N%=z%!12:ȎN%!0� !�&�0,1,2,5:=�msg_0(A%!12,"IC"+�N%!0) !��4:=$N%!12 !��6:=$N%!24 !�� !�="" !�h��Ab:�Wa%,ld%,tc%,i%,s$,mc%:B%=1414744396:C%=2048:tc%=�(P%+12):�tc%=0�253,�msg_1(A%!12,"FA5","LIST") !�Bș393735,1,tc%,2048,500�Wa%;i%:�i%�1i%=Wa%+4:�Z%,i%,s$:�254,s$ !ަ�menu_create(_%,�msg_0(A%!12,"ME6")):mc%=(_%!28�256)<>0:ld%=tc%:i%=0:ȕi%<Wa%:�Z%,ld%,s$:ld%+=�s$+1:�menu_item(_%,i%,s$,mc%):i%+=1:�:B%=1414744396:C%=tc%:�P%+16:� !�>��Ib:�z%,N%,nb%,gb%:�R%,yd%,zd%,ib%,Ad%:�:�Tb(z%,nb%):�z%� !�.�icon_deselect(Bb%,nb%):�(z%!24�1)=0�Z(z%) !��(z%!24�(1<<16))� !��gb (z%) !�� !�� ",�z%=0:zd%=0:ș263872:�:�Ub (R%,nb%):�R%� "�R%!20<=0� "A�icon_deselect(Bb%,nb%):ib%=�D (R%!4,R%!8,R%!12):�K (zd%,ib%) "� "� "q�R%=0:ib%=zd%:ȕib%:yd%=�x(ib%,0,0,0,gb%):�Ta (Ha%,$ib%!4):Ad%=ib%:ib%=ib%!0:�d (1380799568,Ad%):�:ș263873:� ";��Z(z%):z%!24=z%!24�1:N%=z%!12:�Ua(z%):�A(z%):�A%!44=1� "$�select_printer(z%,-1,0) ")� ".� "3*��Ua(z%):�s$,i%,mb%,H%:H%=z%!4:�z%!44� "8 s$=$z%!44 "=�:s$=$H%!4 "B� "Gi%=�ka(z%):mb%=-4:�i%=-1� "Li%=�W(z%):mb%=-3 "Q� "V�i%=-1� "[i%=251658240:mb%=-5 "`� "e$z%!20=�r(�V(z%),s$,mb%,i%):�sb%� "j�D(-1,rb%):sb%=0 "o� "tA%!44+=1:� "yݤka(z%):�nb%,Bd%:�sb%� "~nb%=rb% "�/�:nb%=-1:Bd%=A%!48:ȕBd%:�Bd%!20nb%=Bd%!20 "��Bd%=z%Bd%=0�Bd%=Bd%!0 "�� "�� "�=nb% "�(ݤW(z%):ȕz%!20=-1:z%=z%!0:�z%=0�=-1 "��:=z%!20 "�^��Vb:rb%=�r(�msg_0(A%!12,"NNE"),"s"+�msg_0(A%!12,"IC"),-5,251658240):sb%=-1:!q%=A%!40:�e:� "�a��Jb:�z%,nb%,Cd%,c$,Ad%:�R%,Cd%,zd%,ib%,z%:zd%=0:�:�t(z%,R%,nb%):�icon_deselect(Bb%,nb%):�z%� "��z%!24�(1<<17)� "� ib%=�D (0,0,z%):�K (zd%,ib%) "� �:�Wb(z%) "�� "�� "��R%�R%!20>0� "��Xb ($R%!4):�J=0�A%!44=0� "��Vb "�� "�� "�t�z%=0�R%=0:ib%=zd%:ȕib%:z%=ib%!12:c$=$z%!40:�Zb (z%):�_b (c$):Ad%=ib%:ib%=ib%!0:�d (1380799568,Ad%):�:�k:�V%=0� "��A%!44� "�Cd%=A%!48:ȕCd%:�Cd%!20� "�#�select_printer(Cd%,-1,0):Cd%=0 "��:Cd%=Cd%!0 "�� # � #� # � #� #!��Wb(z%):�Dd%:�z%!24�(1<<16)� #�gb (z%) #� ##�z%!24�(1<<17)� #( Dd%=-1 #-� #2 �z%!24�1� #7�z%!24�(1<<17)� #< Cd%=-1 #A �:�z%!32� #FCd%=�X("WA2",$z%!8) #K�:Cd%=-1 #P� #U� #Z �Cd%� #_�c(z%!4,z%,-10,0):�z%!20� #d�A%!44=1��J=0� #i�Vb #n� #s�A%!44=1��J>0� #x!q%=A%!40:�e #}� #�"�D(-1,z%!20):z%!20=-1:A%!44-=1 #�� #�0z%!24=z%!24��63+65536:�V%=z%ș524632,-1:V%=0 #� �A(z%) #�� #�� #�� #�i��Kb:�i%,z%,M%,Fd%,Gd%,Cd%,y$:B%=1482184792:C%=256:Gd%=�(P%+12):�Gd%=0�253,�msg_1(A%!12,"FA5","XXXX") #�qș262358,Bb%,Gd%,1<<21,1<<21:M%=Gd%:ș263872:ȕ�!M%:i%=!M%:z%=A%!48:Fd%=0:ȕz%:�((z%!24�(1<<17))=0)�z%!28=i%� #��z%!32� #�4ș263873:Cd%=�X("WA3",$z%!8):ș263872:�Cd%�A(z%) #��:Cd%=-1 #�� #� �Cd%� #� y$=$z%!8:�`b(z%,Fd%):�Lb(y$) #�� #�z%=0 #��:Fd%=z%:z%=z%!0 #�� #��:M%+=4:�:�V%=0� #��A%!44� #�Cd%=A%!48:ȕCd%:�Cd%!20� #�#�select_printer(Cd%,-1,0):Cd%=0 #��:Cd%=Cd%!0 #�� #�� $� $ � $�V%=0�z $5B%=1482184792:C%=Gd%:�P%+16:�k:�q(Bb%):ș263873:� $d��`b(z%,Fd%):�j%,i%,Oa%,H%,S%:H%=z%!4:S%=H%!12:S%=S%!4:�c(H%,z%,-9,0):�Wb(z%):ȕS%:�$S%!8=$z%!8� $S%!(S%!4*4+8)-=1:S%=0 $" �:S%=S%!0 $'� $,�:�ya%=z%� $1 !q%=Q%:�e $6� $;i%=H%!20:ȕi%:�i%!12=z%� $@!q%=i%!4:�e $E� $Ji%=i%!0:�:�z%!48�Va(z%!48) $O�V%=z%V%=0 $T.�free_structure(z%!8):j%=z%!12:�(H%!24�4)� $YOa%=H%!48:�1<=Oa%� $^*�i%=1�Oa%:�free_structure(!j%):j%+=4:� $c� $h��:�free_structure(j%!12):�free_structure(j%!16):�free_structure(j%!20):�free_structure(j%!24):�free_structure(j%!28):�free_structure(j%!32) $m� $r,B%=1413697091:C%=j%:�P%+16:j%=z%!16:�j%� $wOa%=H%!36:�0<=Oa%-1� $|,�i%=0�Oa%-1:�free_structure(j%!(i%*4)):� $�� $�� $��B%=1195789891:C%=j%:�P%+16:!q%=Bb%: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:�Fd%� $�Fd%!0=j% $��:A%!48=j% $�� $�� $��ݤX(na$,ta$):�x%,y%,w%,h%:�icon_write(Ab%,0,�msg_1(A%!12,na$,ta$)):�icon_write(Ab%,3,�msg_0(A%!12,na$+"a")):ș262351,,q%:x%=!q%:y%=q%!4:!q%=Ab%:ș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%:�ac(Ab%):pa%=0:�:�v(la%):�pa%:!q%=Ab%:�e:�bc:=(pa%=3) $�\��ac(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%:� $����bc:�Hd%,Id%,Jd%,Kd%,Ld%,Md%:ș53,-1,4�,,Id%:Id%=1<<Id%:ș53,-1,5�,,Kd%:Kd%=1<<Kd%:ș53,-1,11�,,Hd%:Hd%+=1:ș53,-1,12�,,Jd%:Jd%+=1:Ld%=Hd%*Id%:Md%=Jd%*Kd%:?q%=1:q%!1=0:q%!3=0:q%!5=Ld%:q%!7=Md%:ș7,21,q%:� $�#��k:�z%,M%,i%:�R%:!O%=Bb%:�sa%� $�(�i%=0�sa%-1:O%!4=i%+4:ș262340,,O%:� $�� $� �Ja%� $�,�i%=sa%�sa%+Ja%:O%!4=i%+4:ș262340,,O%:� $�� $��sa%=0:Ja%=0:!O%=Bb%: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%:sa%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):z%!28=i%:z%=z%!0:�:R%=Ha%:ȕR% $�ș262338,,O%�i%:Ja%+=1:O%!16=O%!8:O%!8-=(a%(4)!12-a%(4)!4):R%!16=i%:R%=R%!0:�:ș262348,,O%�1:O%!0=0:O%!4=-(sa%+Ja%+1)*(a%(4)!12-a%(4)!4):O%!8=O%!52-O%!44:O%!12=0:ș262359,Bb%,O% $�UO%!4=-(sa%+Ja%+2)*(a%(4)!12-a%(4)!4):ș262353,Bb%,O%!0,O%!4,O%!8,O%!12:�h (Bb%)� $��q(Bb%) $�� $�� $�1ݤy:�i%:ș131129,,"NFS_Mount"�;i%:=((i%�1)=0) $�;ݤs:�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% % A��w(z%,Nd%,Od%):�p%:p%=ra%:ȕp%:�c(p%,z%,Nd%,Od%):p%=p%!0:�:� %5��c(H%,z%,Nd%,Pd%):�i%:�:��:��:�cc(H%,z%,Nd%):� %LO%!0=Nd%:O%!4=H%:O%!8=z%:O%!12=Pd%:O%!16=ia%:O%!20=P%:O%!24=A%:�H%!24�1� %(i%=�("FN"+$H%!4+"_support("+�O%+")") %!�:�0<=Va%-1� %&�i%=0�Va%-1:�$H%!4=b$(i%)� %+B%=O%:�b%(i%) %0� %5� %:� %?� %D� %I%��cc(H%,z%,Nd%):�(z%!24�8)�254,�$ %N�=253�253,�$ %S*�b(�v(A%!12,"WA6",$H%!4,�Nd%,�$,Þ)):� %X/��dc(z%):z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� %],��nb(z%,c$):�Ib%,Qd%,i%:�c$="configure"� %b%�z%!24�8�254,�msg_0(A%!12,"OKAI") %g� %l�Ib%=�printer_find_window(z%,c$):�s(Ib%):�q(Ib%):!O%=Ib%:ș262348,,O%�1:Qd%=O%!88:�i%=0�Qd%:!O%=Ib%:O%!4=i%:ș262350,,O%:�(O%!24�(1<<23))=0� %q�(O%!24�(15<<12))=(15<<12)� %v%�(z%!24�(1<<16))�(z%!24�(1<<17))� %{+�icon_shade (Ib%,i%):�caret_set (-1,-1) %�/�:�icon_unshade (Ib%,i%):�caret_set(Ib%,i%) %�� %�� %�� %�� %��:� %�Hݤprinter_find_window(z%,c$):�H%:H%=z%!4:i%=H%!20:ȕi%:�$(i%+16)=c$� %�i%!8=H%:i%!12=z%:=i%!4 %�� %�,i%=i%!0:�:�253,�msg_1(A%!12,"FAE",c$):=0 %�A��G(Ib%,�Kb%,�H%,�z%):H%=ra%:ȕH%:Kb%=H%!20:ȕKb%:�Kb%!4=Ib%� %�z%=Kb%!12:� %�� %�+Kb%=Kb%!0:�:H%=H%!0:�:Kb%=0:H%=0:z%=0:� %�3ݤprinter_find_prdata_entry(H%,c$):�S%:�H%=0�=0 %�S%=H%!12:�S%=0�=0 %�S%=S%!4:�S%=0�=0 %� ȕ$S%!8<>c$:S%=S%!0:�S%=0�=0 %� �:=S% %�ݤZ(M%):�M%=0�=0 %�)�M%!-4<>1196707401�M%!-4<>1381257040� %��253,�msg_0(A%!12,"FA6") %�� %�=!M% %�.ݤprinter_read_string(M%):�i%,s$:�M%=0�="" %�ȎM%!-4� &�1196577875:=$M% &�810701907:�Z%,M%,s$:=s$ &�1381258055:�Y%,M%,s$:=s$ &� & �253,�msg_0(A%!12,"FA7"):="" &1ݤprinter_read_integer_entry(S%,Rd%):�S%=0�=0 & =�Z(S%!(4+Rd%*4)) &%1ݤprinter_read_string_entry(S%,Rd%):�S%=0�="" &*'=�printer_read_string(S%!(4+Rd%*4)) &/@ݤprinter_read_boolean_string_entry(S%,Rd%,Sd%):�M%:�S%=0="" &4>M%=S%!(4+Rd%*4):�M%!-4<>1280266050�253,�msg_0(A%!12,"FA8") &9 �Sd%� &>=�printer_read_string(M%!4) &C!�:=�printer_read_string(M%!0) &H� &MBݤprinter_read_list_integer_entry(S%,Rd%,tc%,Td%):�M%:�S%=0�=0 &RM%=S%!(4+Rd%*4):�M%=0=0 &W.�M%!-4<>1146377036�253,�msg_0(A%!12,"FA9") &\(ȕtc%<>1�M%:M%=M%!0:tc%-=1:�:�M%=0=0 &a*M%+=8:ȕTd%<>1:M%+=4:Td%-=1:�:=�Z(!M%) &f ��aa(N$,�Ud%):�:��:�0,�$ &k<ș30,6,,,17+�N$�,,Ud%:$(Ud%+16)=N$:ș267521,Ud%,Ud%+16:� &p*ݤmsg_0(Ud%,T$)=�v(Ud%,T$,"","","","") &u-ݤmsg_1(Ud%,T$,S$)=�v(Ud%,T$,S$,"","","") &z4ݤmsg_2(Ud%,T$,ua$,va$)=�v(Ud%,T$,ua$,va$,"","") &5ݤQ(Ud%,T$,ua$,va$,wa$)=�v(Ud%,T$,ua$,va$,wa$,"") &�aݤv(Ud%,T$,ua$,va$,wa$,xa$):�F%,L%:ș398594,Ud%,T$,ba%,256,ua$,va$,wa$,xa$�,,,L%;F%:�F%�1�=T$ &�ba%?L%=13:=$ba% &���_(Ud%):�Ud%� &� ș267524,Ud%:ș131102,7,,Ud% &�� &�� &����ca(n$):ya$=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 &�+ș262336,300,1263747412,n$,q%�Vd%,Ob%:� &���hb:ș262365:� &�-ݤaa(ca%):�Wd%,Xd%,z%,t%:�K$<>""ca%=ca%�1 &�!�(ca%�1)=0�ea%=-1�ca%<>A%!20� &�ș262343,ca%,q%,,Ia%�Wd% &��:�ea%=0�K$<>""� &�ș262343,ca%��1,q%,,Ia%�Wd% &�(�:ș262369,ca%��1,q%,ja%+ea%,Ia%�Wd% &�� &�� &�>ș66�Xd%:Zd%=Xd%-ja%:ja%=Xd%:z%=A%!48:ȕz%:t%=z%+56:�!t%� &��Zd%<!t% !t%-=Zd%�!t%=0 &�� &�z%=z%!0:�:=Wd% &���na:�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$,_d%):�Tc%,hb%:ș131107,n$,_d%,256,,3�,,Tc%;hb%:�hb%�1Tc%=0 '_d%?Tc%=13:=$_d% '1ݤla(a$,b$):�`d%:ș274525,-1,a$,b$,3�`d%:=`d% '>ݤtask_lower(s$):�l$,ae%,i%:ș274519,-1�ae%:l$="":�1<=�s$� '$$�i%=1��s$:l$+=�ae%?��s$,i%,i%):� ')� '.=l$ '3>ݤtask_upper(s$):�u$,ae%,i%:ș274520,-1�ae%:u$="":�1<=�s$� '8$�i%=1��s$:u$+=�ae%?��s$,i%,i%):� '=� 'B=u$ 'G��da:�be%256:� 'L;��la:�r$,r%:r$=�$:r%=�r$,"in "+�34+"!"):�r%r$=�r$,r%-1) 'QȎ�� 'V�254:�j(r$,1) '[�253:�j(r$,2) '`J:�j("Unexpected error: "+r$+" (error number &"+�~�+") at line "+Þ,3) 'e� 'j� 'oV��j(r$,ce%):�r%:ș262356,,-1:!be%=�:$(be%+4)=r$+�0:ș262367,be%,ce%,ya$�,r%:�r%=2� 't 'yNb%=2:�H:�x '~� '�� '�O��b(r$):!be%=1:$(be%+4)=r$+�0:ș262367,be%,1�1<<4,�msg_1(A%!12,"ER2",ya$):� '���ea:de%=0:� '�Cݤr(za$,x$,mb%,ee%):�t%,s%,i%,v$,w%:�x$="s"+�msg_0(A%!12,"IC")� '�#v$="s"+x$:ș262377,40,,x$�,,,w% '�%�:ș393449,40,,x$�,,,w%;i%:�i%�1� '�<ș262377,40,,"s"+�msg_0(A%!12,"IC")�,,,w%:�x$,3)="su_"� '�v$="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%=�za$+1:t%=�(P%+12):�t%=0�253,�msg_1(A%!12,"FA5","IBFF") '�S$t%=za$: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%)<�za$*16w%=�za$*16�w%=w%<<i% '�tX%!0=mb%:X%!4=0:X%!8=-16:X%!12=w%:X%!16=88:X%!20=385888523:X%!24=t%:X%!28=s%:X%!32=�za$+1:ș262338,ee%,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%) (-� (2c��icon_validation(a%,b%,s$):!X%=a%:X%!4=b%:ș262350,,X%:$X%!32=s$:X%!8=0:X%!12=0:ș262349,,X%:� (7:ݤ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%:� (AL��icon_shade(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<22:X%!12=1<<22:ș262349,,X%:� (FV��icon_deselect(a%,b%):!X%=a%:X%!4=b%:X%!8=0:X%!12=1<<21:ș262349,,X%:�a%=Bb%ta%=0 (K� (PX��icon_select(a%,b%):!X%=a%:X%!4=b%:X%!8=1<<21:X%!12=1<<21:ș262349,,X%:�a%=Bb%ta%=0 (U� (ZCݤicon_set(a%,b%):!X%=a%:X%!4=b%:ș262350,,X%:=(X%!24�1<<21)<>0 (_o��icon_info(a%,b%,�fe%,�ge%,�he%,�ie%):!X%=a%:X%!4=b%:ș262350,,X%:fe%=X%!8:ge%=X%!12:he%=X%!16:ie%=X%!20:� (df��caret_set(h%,i%):�j%:j%=��icon_read(h%,i%):ș262354,h%,i%,-1,-1,,j%:ș262354,h%,i%,-1,-1,-1,j%:� (iD��caret_info(�h%,�i%,�n%):ș262355,,X%:h%=!X%:i%=X%!4:n%=X%!20:� (n��fa:Z$="":� (s4��Fa(Aa$,Ba$):�a$,a%:ș6,161,140�,,a%:�(a%�1)=1� (x$ș8,17,Ba$�a%:�a%=1Z$=Ba$�Z$=Aa$ (}�:Z$=Aa$ (�� (�ș262361,,Z$:� (���Ha:ș262362:� (�a��l(f$,n$,je%,�Ib%):�_d%:�ec(f$,n$,_d%):_d%!64=je%:�fc(_d%,Ib%):B%=1145981271:C%=_d%:�P%+16:� (����ec(f$,n$,�fc%):�ke%,Oa%,le%,jb%,s%,f%,s$:�gc(f$,n$,Oa%,le%):B%=1145981271:C%=Oa%+le%:fc%=�(P%+12):�fc%=0�253,�msg_1(A%!12,"FA5","WIND") (��f$<>""ș262361,,f$ (� �le%� (�KB%=1179014466:C%=le%:ke%=�(P%+12):�ke%=0�253,�msg_1(A%!12,"FA5","BUFF") (�2ș393435,,fc%,ke%,ke%+le%,-1,n$�s%,,,,,,jb%;f% (�*�:ș393435,,fc%,,,-1,n$�s%,,,,,,jb%;f% (�� (��f$<>""ș262362 (�*�f%�1f%=s%+4:�Z%,f%,s$:�254,n$+": "+s$ (�&�jb%=0�254,�msg_1(A%!12,"OKAK",n$) (�� (�&��fc(fc%,�Ib%):ș262337,,fc%�Ib%:� (�7��q(a%):!W%=a%:ș262347,,W%:W%!28=-1:ș262341,,W%:� (�N��Xa(a%,s$):�me%,ne%,oe%,pe%:!W%=a%:ș262348,,W%�1:$W%!76=s$:�W%!32�1<<16� (�Sne%=W%!16:ș262368,,W%:me%=W%!4:oe%=W%!12:pe%=W%!16:ș262353,-1,me%,ne%,oe%,pe% (�� (�� (�1��Ga(P$,�M%,�c$):�f%,Wa%,Rb%:�f$=""�Vd%>=300� (�-ș262363,,,,,-1,"*"+�12,�0),M%�,,,,,c$,M% (��:�P$=""P$=Z$ (�f%=�P$:�M%=0M%=16 (��:�#f%=M%:Wa%=�i(f%):�Wa%� )5�#f%=M%+8:Rb%=�i(f%):c$=�K(f%):M%+=24:�Rb%=1Wa%=0 ) �:M%=0 )� )�Wa%=0:ș131085,,f% )� )� )"E��gc(f$,n$,�Oa%,�le%):�i%,qe%,M%,Wa%,Rb%,Ca$,Qd%:�f$=""�Vd%>=300� )'ș262363,,,,,-1,n$�,Oa%,le% ),�:�f$=""f$=Z$ )1:qe%=�f$:Oa%=0:le%=0:M%=16:�:�#qe%=M%:Wa%=�i(qe%):�Wa%� )65�#qe%=M%+8:Rb%=�i(qe%):Ca$=�K(qe%):M%+=24:�Rb%=1� );�Ca$=n$� )@G�#qe%=Wa%+84:Qd%=�i(qe%):le%=�ma(qe%,Wa%):�Qd%le%+=�na(qe%,Qd%,Wa%) )EOa%=88+(Qd%*32):Wa%=0 )J� )O� )T� )Y�Wa%=0:ș131085,,qe% )^� )c� )h+ݤi(h%):=�#h%��#h%<<8��#h%<<16��#h%<<24 )m*ݤK(h%):�s$,c%:�:c%=�#h%:�c%>31s$+=�c% )r�c%<32:=s$ )w8ݤma(qe%,Wa%):�v%:�#qe%=Wa%+28:v%=�i(qe%):�v%�1<<31� )|(�v%�1<<26�=�L(qe%,Wa%+56,Wa%+72,Wa%) )�&�:�v%�1�=�L(qe%,Wa%+56,Wa%+72,Wa%) )�� )�=0 )�,ݤna(qe%,Uc%,Wa%):�i%,j%:j%=0:�0<=Uc%-1� )�A�i%=0�Uc%-1:j%+=�L(qe%,Wa%+88+i%*32+16,Wa%+88+i%*32+20,Wa%):� )�� )�=j% )�`ݤL(qe%,re%,se%,Wa%):�v%,te%,Oa%,i%:�#qe%=re%:v%=�i(qe%):i%=v%�256:te%=(v%�3)+(i%>>6):Ȏte%� )��0,1,2,3,4:Oa%=0 )�'�5,7:�#qe%=se%+4:v%=�i(qe%):�v%=-1� )� Oa%=0 )�!�:�#qe%=Wa%+v%:Oa%=��K(qe%)+1 )�� )��#qe%=se%+8:Oa%+=�i(qe%) )��6:�#qe%=se%+8:Oa%=�i(qe%) )�� )�=Oa% )�=��ia:�f%:ș131129,,"DragASprite_Start"�ue%;f%:�f%�1ue%=-1 )�3ș131129,,"DragASprite_Stop"�ve%;f%:�f%�1ve%=-1 )�ș6,161,28�,,f%:�(f%�2)=0� )�ue%=-1:ve%=-1 )�� )�KB%=1163280723:C%=256:we%=�(P%+12):�we%=0�253,�msg_1(A%!12,"FA5","SAVE") )�da%=0:� )�s��yb(xe%,Da$):�b$:b$=�~xe%:b$=�"000"+b$,3):ye%=xe%:�icon_validation(wb%,0,"sfile_"+b$):�icon_write(wb%,1,Da$):� )����lb(ze%,Ae%):�Be%,Ce%,De%,Fe%,Ge%,He%,Ld%,Md%,f$,Hd%,Id%,Jd%,Kd%:!we%=wb%:ș262347,,we%:Be%=we%!4-we%!20:Ce%=we%!16-we%!24:�icon_info(wb%,0,De%,Ge%,Fe%,He%):ș53,-1,4�,,Id%:Id%=1<<Id%:ș53,-1,5�,,Kd%:Kd%=1<<Kd% *�ș53,-1,11�,,Hd%:Hd%+=1:ș53,-1,12�,,Jd%:Jd%+=1:Ld%=Hd%*Id%:Md%=Jd%*Kd%:!we%=wb%:we%!4=5:we%!8=Be%+De%:we%!12=Ce%+Ge%:we%!16=Be%+Fe%:we%!20=Ce%+He%:we%!24=we%!8-ze%:we%!28=we%!12-Ae%:we%!32=Ld%+we%!16-ze% * we%!36=Md%+we%!20-Ae%:�ue%� * :f$="file_"+�"000"+�~ye%,3):șue%,197,1,f$,we%+8,we%+24 *�:ș262352,,we% *� *da%=-1:� *!,��qa:�h%,i%,Ie%,Je%,Ke%:da%=0:�ve%șve% *&Aș262351,,we%:Ie%=!we%:Je%=we%!4:h%=we%!12:i%=we%!16:�h%=wb%� *+�hc(h%,i%,Ie%,Je%):� *0���hc(h%,i%,Ie%,Je%):�Fa$:Fa$=�oa:!we%=48+�Fa$��3:we%!12=0:we%!16=1:we%!20=h%:we%!24=i%:we%!28=Ie%:we%!32=Je%:we%!36=0:we%!40=ye%:$(we%+44)=Fa$+�0:ș262375,17,we%,h%,i%:� *5Bݤoa:�f$,i%:f$=�icon_read(wb%,1):�:i%=�f$,":"):�i%f$=�f$,i%+1) *:'�i%=0:�:i%=�f$,"."):�i%f$=�f$,i%+1) *? �i%=0:=f$ *D��ga:Pb%=0:Le%=0:� *I6��menu_create(�_%,I$):�Q$,i%,Ga$,i$,j%,x%,t%:�Pb%� *N�ic:Pb%=0:Le%=0 *S� *X�I$,1)="#"� *]i%=1:Q$=�M(I$,",",i%) *b�:Q$="" *g� *l1Ga$=I$:j%=i%:�:i$=�M(I$,",",i%):�i$<>""Le%+=1 *qe�i$="":I$=Ga$:i%=j%:B%=1431192909:C%=28+Le%*24:Pb%=�(P%+12):�Pb%=0�253,�msg_1(A%!12,"FA5","MENU") *v �Q$<=12� *{$Pb%=Q$ *�M�:B%=1431192909:C%=�Q$+2:t%=�(P%+12):�t%=0�253,�msg_1(A%!12,"FA5","MENU") *�$t%=Q$+�0:Pb%!0=t% *�� *��Pb%?12=7:Pb%?13=2:Pb%?14=7:Pb%?15=0:Pb%!16=196:Pb%!20=44:Pb%!24=0:x%=�Q$-3:Pb%!16=(x%*8+6)*2:�j%=0�Le%-1:i$=�M(I$,",",i%):�menu_item(Pb%,j%,i$,�Q$>12):�:_%=Pb%:� *�5��ic:�i%,p%,mc%:p%=Pb%+28:mc%=p%!0�256:�0<=Le%-1� *��i%=0�Le%-1:�p%!8�256� *��(!p%�4)=0� *�!B%=1431192909:C%=p%!12:�P%+16 *�� *�� *�p%+=24:� *�� *� �mc%� *�!B%=1431192909:C%=Pb%!0:�P%+16 *�� *�!B%=1431192909:C%=Pb%:�P%+16:� *�M��menu_item(�_%,Me%,i$,mc%):�F%,p%,i%,x%,m%:x%=(_%!16/2-6)/8:��i$,1)="#"� *�i$=�i$):F%=F%�2 *�� *���i$,1)="@"� *�i$=�i$):F%=F%�8 *�� *��Me%>=Le%� *�[B%=1431192909:C%=Pb%:D%=(Me%-Le%+1)*24:m%=�(P%+20):�m%=0�253,�msg_1(A%!12,"FA5","MENU") *�6Pb%=m%:p%=Pb%+28+(Le%-1)*24:!p%=!p%��128:Le%=Me%+1 *�� +�Me%=Le%-1F%=F%�128 +�Me%=0�mc%F%=F%�256 +@p%=Pb%+28+Me%*24:p%!0=F%:p%!4=-1:p%!8=117440545:�i$,1)="$"� +!p%+=4:i$=�12," ") +�:�i$<12� +$(p%+12)=i$ + M�:B%=1431192909:C%=�i$+1:i%=�(P%+12):�i%=0�253,�msg_1(A%!12,"FA5","MENU") +%6$i%=i$:p%!8=p%!8�256:p%!12=i%:p%!16=-1:p%!20=�i$+1 +*� +/� +4_%=Pb%:�i$>x%� +9x%=�i$:_%!16=(x%*8+6)*2 +>� +C� +H7��zb(_%,Me%,M%,Ne%):_%+=28+Me%*24:�Ne%�!_%=!_%�1<<4 +M _%!4=M%:� +RAݤM(I$,Ha$,�I%):�L%:L%=I%+1:I%=�I$+Ha$,Ha$,L%):=�I$,L%,I%-L%) +WA��a(Oe%,Me%,Pe%):�((Oe%!(28+8+24*Me%)�4194304)=4194304)<>Pe%� +\/Oe%!(28+8+24*Me%)=Oe%!(28+8+24*Me%)�4194304 +a� +f� +k7ݤH(Oe%,Me%):=((Oe%!(28+8+24*Me%)�4194304)=4194304) +pX��menu_tick_match(Oe%,Ia$):�Me%,Ja$:Me%=Oe%+28:�:�Me%!8�256Ja$=$Me%!12�Ja$=$(Me%+12) +u�la(Ja$,Ia$)=0� +z!Me%=!Me%�1:� +� +��!Me%�128� +�Me%+=24:�0:� +�^��jc(Oe%,Me%,Qe%):�Qe%Oe%!(28+24*Me%)=Oe%!(28+24*Me%)�1�Oe%!(28+24*Me%)=Oe%!(28+24*Me%)��1 +�� +����`a(h%):�x%,y%,Hd%,Id%,Jd%,Kd%:ș53,-1,4�,,Id%:Id%=1<<Id%:ș53,-1,5�,,Kd%:Kd%=1<<Kd%:ș53,-1,11�,,Hd%:Hd%+=1:ș53,-1,12�,,Jd%:Jd%+=1:!q%=h%:ș262347,,q%:x%=Hd%*Id%:y%=Jd%*Kd%:x%=(x%-q%!12+q%!4)�2:y%=(y%+q%!16-q%!8)�2 +�ș262356,,h%,x%,y%:� +�W��Bb(a%):�i%:B%=1163547472:C%=56:Ca%=�(P%+12):�Ca%=0�253,�msg_1(A%!12,"FA5","PSZE") +��a%� +�a%=a%!36:�0<52� +��i%=0�52�4:Ca%!i%=a%!i%:� +�� +� �:�0<=52� +��i%=0�52�4:Ca%!i%=0:� +�� +�� +�+�Gb:�s(zb%):�q(zb%):�caret_set(zb%,5):� +�y��Gb:�h%,i%,n%:�caret_info(h%,i%,n%):�u(zb%,5,Ca%,4):�L(12,36):�L(13,32):�L(14,40):�L(15,44):�L(16,48):�qb:�Ca%!52=1� +��icon_unshade(zb%,33) +��:�icon_shade(zb%,33) +�� +�� +�4��qb:�s$:笤icon_set(zb%,23)���icon_set(zb%,22)� +��icon_select(zb%,23) +�� +��icon_set(zb%,23)� ,s$=�msg_0(A%!12,"mm") ,�:s$=�msg_0(A%!12,"in") ,� ,��icon_write(zb%,26,s$):�icon_write(zb%,29,s$):�icon_write(zb%,27,s$):�icon_write(zb%,30,s$):�icon_write(zb%,28,s$):�icon_write(zb%,31,s$):�F(6,8):�F(7,12):�F(8,20):�F(9,16):�F(10,24):�F(11,28):� ,0��L(nb%,Wa%):�icon_write(zb%,nb%,�Ca%!Wa%):� ,&��F(nb%,Wa%):�v%:v%=Ca%!Wa%:Ȏnb%� ,�8:v%=Ca%!12-v% ,$�11:v%=Ca%!8-v% ,)� ,."�icon_write(zb%,nb%,�pa(v%)):� ,3$ݤpa(v%):�@%:�icon_set(zb%,23)� ,8@%=16908554:=�(v%/c) ,=�:@%=16909066:=�(v%/d) ,B� ,G*��O(f$,Re%):�J%,`%,vb%,Se%,t$:�k(f$)� ,L�:J%=�b("pn:"):�J%� ,Q$t$=�qa(`%,$J%):�t$<>""�kc(f$,t$) ,V2`%!52=Re%:vb%=ia%:Se%=0:ȕvb%>0:�$`%!4=$vb%!4� ,[�vb%!52=0� ,`H`%!0=vb%!0:�free_structure(vb%!4):B%=1163547472:C%=vb%:�P%+16:vb%=-1 ,e,�:B%=1163547472:C%=`%:�P%+16:`%=0:vb%=-1 ,j� ,o�:�$`%!4<$vb%!4� ,t`%!0=vb%:vb%=-1 ,y�:Se%=vb%:vb%=vb%!0 ,~� ,�� ,� �:�`%� ,��Se%Se%!0=`%�ia%=`% ,�� ,�� ,��J%=0:�m ,�� ,�� ,�/��kc(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:" ,�="" ,����lc(c%,M%):�#c%,"pn: "+$M%!4:�#c%,"pw: "+�M%!8:�#c%,"ph: "+�M%!12:�#c%,"pb: "+�M%!16:�#c%,"pt: "+�M%!20:�#c%,"pl: "+�M%!24:�#c%,"pr: "+�M%!28:�#c%,"tb: "+�M%!32:�#c%,"tt: "+�M%!36:�#c%,"tl: "+�M%!40:�#c%,"tr: "+�M%!44:�#c%,"th: "+�M%!48:� ,����kb:�`%,s$,Te%,vb%,Se%,c%,z%:�e,f,g,h,i,j:e=��icon_read(zb%,6):f=��icon_read(zb%,7):g=��icon_read(zb%,10):h=��icon_read(zb%,11):i=��icon_read(zb%,8):j=��icon_read(zb%,9):s$=�icon_read(zb%,5):�s$=""�254,�msg_0(A%!12,"OKAD") ,�2绤icon_read(zb%,6)=0�254,�msg_0(A%!12,"OKAE") - 2绤icon_read(zb%,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:`%=ia%:ȕ`%:�$`%!4=s$� -Te%=`%:`%=0 - �:`%=`%!0 -� -#,�:�Te%�Te%!52=2�254,�msg_0(A%!12,"OKAX") -(�Te%=0� --JB%=1163547472:C%=56:Te%=�(P%+12):�Te%=0�253,�msg_1(A%!12,"FA5","PSZE") -2RTe%!0=0:$q%=s$:B%=q%:C%=2:Te%!4=�(P%+28):vb%=ia%:Se%=0:ȕvb%>0:�$Te%!4<$vb%!4� -7Te%!0=vb%:vb%=-1 -<�:Se%=vb%:vb%=vb%!0 -A� -F�:�Se%Se%!0=Te%�ia%=Te% -K� -P��o(6,Te%,8,-1,Ue%):�o(7,Te%,12,-1,Ue%):�o(9,Te%,16,-1,Ue%):�o(8,Te%,20,-1,Ue%):�o(10,Te%,24,-1,Ue%):�o(11,Te%,28,-1,Ue%):�o(13,Te%,32,0,Ue%):�o(12,Te%,36,0,Ue%):�o(14,Te%,40,0,Ue%):�o(15,Te%,44,0,Ue%):�o(16,Te%,48,0,Ue%):Te%!52=1 -U!�mc:z%=A%!48:ȕz%:�z%!36=Te%� -Z �z%!24�2� -_'�select_printer(z%,-1,0):�ub(z%):�z -d� -i� -nz%=z%!0:�:ș263873:� -s ��mc:�c%,`%,Ve%,s$,bb%:�ha%� -x/s$="<Printers$Dir>.Remote.ID"+h$+".PaperRW" -}!�:s$="<Printers$Dir>.PaperRW" -�� -�2ș131080,17,s$�bb%;f%:�(f%�1)!bb%=254:ș43,bb% -� �(bb%=0)� -�<ș131080,11,s$,4038,,0,0�bb%;f%:�(f%�1)!bb%=254:ș43,bb% -�B�:ș131080,4,s$,,,,0�bb%;f%:�(f%�1)=0ș131080,4,s$,,,,3�bb%;f% -��(f%�1)!bb%=254:ș43,bb% -�� -�0ș131085,143,s$�c%;f%:�(f%�1)!c%=254:ș43,c% -��c%� -�`%=ia%:ȕ`%:�`%!52=1� -��lc(c%,`%):Ve%+=1 -�� -� `%=`%!0:�:ș131085,,c%:�Ve%� -�ș131080,18,s$,4038 -��:ș131080,6,s$ -�� -�� -�� -�A��o(nb%,td%,Wa%,We%,�Re%):�v,v%:v=��icon_read(zb%,nb%):Ȏnb%� -��8:v=��icon_read(zb%,7)-v -��11:v=��icon_read(zb%,6)-v -�� -� �We%� -�#�icon_set(zb%,23)v%=v*c�v%=v*d -� �:v%=v -�� .�td%!Wa%<>v%� . $Re%=-1:td%!Wa%=v%:�Ca%Ca%!Wa%=v% .� .� .P��pb:�s$,`%,Se%,i%,z%:ș263872:s$=�icon_read(zb%,5):`%=ia%:ȕ`%>0:�$`%!4=s$� . �`%!52=1� ."4z%=A%!48:ȕz%:�z%!36=`%�254,�msg_0(A%!12,"OKQa") .'z%=z%!0:�:�Se%� .,Se%!0=`%!0 .1�:ia%=`%!0 .6� .;8�free_structure(`%!4):B%=1163547472:C%=`%:�P%+16:�mc .@�:�254,�msg_0(A%!12,"OKR") .E� .J#�i%=0�52�4:Ca%!i%=0:�:�Gb:`%=-1 .O�:Se%=`%:`%=`%!0 .T� .Y#�:�`%=0�254,�msg_0(A%!12,"OKQ") .^ș263873:� .c~��rb:�s(A%!40):!q%=A%!40:ș262348,,q%�1:q%!48=q%!56-(A%!44*ma%*2)-(A%!32*ma%):ș262359,A%!40,q%+44:q%!28=-1:ș262341,,q%:� .h��ib(z%):笤h(Bb%)� .mI!W%=Bb%:W%!4=z%!28:ș262350,,W%:ș262353,Bb%,W%!8,W%!12,W%!16,W%!20:� .r#��f(y%,z%,K%):�Jb%:笤h(A%!40)� .w�y%=-1� .|B%=z%:C%=K%:y%=�(P%+48) .�� .�l!W%=A%!40:ș262347,,W%:W%!12=W%!12-W%!4:W%!4=0:W%!8=y%-ma%:W%!16=y%:ș262353,!W%,W%!4,W%!8,W%!12,W%!16:� .�)��nc(y%,z%,Xe%,Ze%):�Ve%:笤h(A%!40)� .��y%=-1� .�B%=z%:C%=K%:y%=�(P%+48) .�� .��!W%=A%!40:ș262347,,W%:W%!12=W%!12-W%!4:W%!4=0:Ve%=2:ȕXe%<>Ze%:Ve%+=1:Xe%=Xe%!0:�:W%!8=y%-ma%*Ve%:W%!16=y%:ș262353,!W%,W%!4,W%!8,W%!12,W%!16:� .�g��eb(_e%,O$,Ka$,B$,z%,Rb%):B%=_e%:C%=q%:$C%=O$:D%=O%:$D%=Ka$:E%=O%+256:$E%=B$:F%=z%:G%=Rb%:�P%+24:� .�=��n(z%,K%,rc%):�vb%,p%,N%:�wa%=z%�xa%=K%xa%=0:ș262356,-1 .�p%=K%!44:�p%� .��p%!40� .�z%!24=z%!24��36:�z%!48� .�!q%=z%!48:�e .�� .�� .�� .��z%!32=K%� .�z%!32=K%!0:vb%=0 .�2�:vb%=z%!32:ȕvb%!0<>K%:vb%=vb%!0:�:vb%!0=K%!0 .�� .��K%!12� .�:ș131085,,K%!12:K%!12=0:z%!24=z%!24��8:�i(z%):�z%!28� .�7O%!0=Bb%:O%!4=z%!28:O%!8=0:O%!12=1<<22:ș262349,,O% .�� .�� .�:p%=0:�:ș524624,p%�p%:�p%�p%=K%!40�p%=K%!72ș524617,p% /�p%=0:�K%!40� /*N%=z%!12:�N%!0=1�N%!0=2ș6,21,�n(N%!0) / ?ș131085,0,K%!40:K%!40=0:�oc(N%!0):!q%=K%:�c(z%!4,z%,-7,q%) /� /�K%!72� /ș131085,,K%!72:K%!72=0 /!� /&Fș131080,6,$K%!68:�free_structure(K%!68):�K%?11�2ș131080,6,$K%!20 /+V�free_structure(K%!16):�free_structure(K%!20):�free_structure(K%!24):p%=K%!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 /5� /:�K%!52� /?!B%=1179009620:C%=K%!52:�P%+16 /D� /I>B%=1430607185:C%=K%:�P%+16:A%!32-=1:�A%!32<=0A%!20=A%!20�1 /N �rc%� /S*!q%=A%!40:ș262348,,q%�1:�q%!32�1<<16� /X[q%!48=q%!56-A%!44*ma%*2-A%!32*ma%:ș262359,A%!40,q%+44:ș262341,,q%:B%=z%:C%=vb%:�P%+32 /]� /b� /g� /l6��A(z%):�K%,`e%:ș263872:�:K%=z%!32:�K%�n(z%,K%,0) /q0�K%=0:!q%=A%!40:ș262348,,q%�1:�q%!32�1<<16� /vYq%!48=q%!56-A%!44*ma%*2-A%!32*ma%:ș262359,A%!40,q%+44:ș262341,,q%:B%=z%:C%=0:�P%+32 /{� /�ș263873:� /�4��H:�z%:z%=A%!48:ȕz%:�A(z%):z%=z%!0:�:A%!32=0:� /�/��ma:�af%,j%,z%,K%:�:�A%!24A%!24=!(A%!24+0) /��A%!24=0A%!24=A%!48 /�!�A%!24:z%=A%!24:�(z%!24�4)=0� /�-A%!28=z%!32:af%=0:ȕA%!28:�?(A%!28+11)�1� /�A%!28=0 /��:�?(A%!28+11)�4� /�af%=A%!28:A%!28=!(A%!28+0) /��:�!(A%!28+12)� /��pc(z%,A%!28) /��:�(z%!24�32)=0� /��A%!28<>z%!32� /��af%af%!0=!(A%!28+0) /�5!(A%!28+0)=z%!32:z%!32=A%!28:�nc(-1,z%,A%!28,af%) /�� /��ya%=z%� /� !q%=Q%:�e /�� /�0j%=z%!4:j%=j%!20:ȕj%:�$(j%+16)="configure"� /��j%!12=z%� /�!q%=j%!4:�e /�� /�� /�j%=j%!0:�:�pc(z%,A%!28) /�� 0� 0A%!28=0 0� 0� 0� 0� 0 ZA%!32=0:z%=A%!48:ȕz%:K%=z%!32:ȕK%:A%!32+=1:K%=K%!0:�:z%=z%!0:�:�A%!32=0A%!20=A%!20�1 0%� 0*�ݤra(K%,bf%,�_$):�y$,i%,c$,H%:_$="":y$=�"00"+�~K%!36,3):ș131107,"Alias$@PrintType_"+y$,,-1�,,i%:�i%<0_$="@PrintType_"+y$:=-1 0/ȎK%!36� 04�-1:c$=�msg_0(A%!12,"UNT") 09&�8192:�j(�msg_0(A%!12,"OKT"),1):=0 0>&�4096:�j(�msg_0(A%!12,"OKS"),1):=0 0C�4095,2808:K%!36=4095:=-1 0H,�4054,4055,4074,4075,4094:K%!36=4094:=-1 0M�bf%:K%!36=bf%:=-1 0RK:c$=�task_read_env("File$Type_"+y$,q%):�c$=""c$=�msg_1(A%!12,"TYP",y$) 0W� 0\Ȏ�sa(c$,K%)� 0a�4:K%!36=4094:=-1 0f�2:K%!36=4095:=-1 0k� 0p=0 0u�ݤsa(c$,K%):�x%,y%,w%,h%:�icon_write(yb%,0,�msg_2(A%!12,"WA5",c$,$K%!24)):ș262351,,q%:x%=!q%:y%=q%!4:!q%=yb%:ș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 0zBș262341,,q%:�ac(yb%):pa%=0:�:�v(la%):�pa%:!q%=yb%:�e:�bc:=pa% 0,��qc(cf%,df%,ef%,La$):�cf%ș131085,0,cf% 0��df%�#df%=ef% 0��df%ș131085,0,df% 0�ș131080,6,La$:� 0�N��fb(Ma$,La$):�ff%,gf%,hf%,ef%,i%:�:��:�qc(ff%,gf%,ef%,La$):�j(�$,1):� 0�ff%=�La$:hf%=�#ff%:�hf%� 0��ș263872:gf%=�Ma$:ef%=�#gf%:�#gf%=ef%:�i%=1�hf%�512:ș12,4,ff%,O%,512:ș12,2,gf%,O%,512:�:�hf%�512ș12,4,ff%,O%,hf%�512:ș12,2,gf%,O%,hf%�512 0��#gf%:ș263873 0�� 0��#ff%:ș8,6,La$:� 0�|��pc(z%,K%):�H%,N%,if%,b%,t%,P$,t$,_$,Na%,Oa%,jf%,s%,Sb%,z$,kf%,G$:�A$,B$,Ub%,l%,f%:H%=z%!4:N%=z%!12:if%=H%!28:�K%!12=0� 0�*�select_printer(z%,0,0):�(z%!24�4)<>0� 0�*P$=$K%!20:L$=$K%!16:M$=$K%!24:�N%!0=5� 0�Sb%=(N%?6�2)<>0 0��:Sb%=(N%?6�1)<>0 0�� 0� �Sb%� 0�g$=�l(0):�g$=""� 0�&z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� 0�� 0��N%!0=5� 0�%ș36,"PrinterType$5",g$,�g$:�I(5) 0�)�:ș36,"PrinterType$10",g$,�g$:�I(10) 0�� 0� G$=g$ 0�� 1z$=�l(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=K%!36:$(q%+44)=P$+�0:ș262375,18,q%:qa%=0:�:�v(ka%):�qa%:b%=-1:�qa%<>2� 1b%=�ra(K%,if%,_$):�b%� 1�_$<>""� 1ș262366,_$+" "+P$ 1$� 1)� 1.� 13 �b%� 18�n(z%,K%,-1):� 1=� 1B �Sb%� 1Gs$=�m(z%,-1):�s$<>""� 1L�b(s$):�z%!32� 1Q$z%!24=z%!24�4:�i(z%):�f(-1,z%,0) 1V� 1[� 1`� 1e(�(K%!36=4095�K%!36=4094�K%!36=if%)� 1jș8,17,z$�t%,,Na%,,Oa%:�t%� 1o �K%?11�2� 1t�K$<>""ș131080,6,K$ 1y K$=$K%!20 1~� 1�j�free_structure(K%!20):$q%=z$:B%=q%:C%=2:K%!20=�(P%+28):K%!28=Oa%:K%!36=(Na%�1048320)>>8:K%?11=K%?11�2 1��:�Sb%� 1��N%!0=5� 1��fb($N%!16,G$):�n(z%,K%,-1) 1�&�:ș8,17,G$�b%,,,,Oa%:�b%=0�Oa%=0� 1�ș131080,6,G$:�n(z%,K%,-1) 1�!�:�(K%?11�2)ș131080,6,$K%!20 1�]�free_structure(K%!20):$q%=G$:B%=q%:C%=2:K%!20=�(P%+28):K%!28=Oa%:K%!36=if%:K%?11=K%?11�2 1�� 1�� 1�6�:A$=$K%!16:B$=$K%!24:�n(z%,K%,-1):�N%!0=9�q$<>""� 1��c$=$(z%!40):M%=�c$," "):ȕM%:�c$,M%,1)=�160:M%=�c$," ",M%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Ka%):ș131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� 1��A (z%,A$,B$)� 1�Ub%=V%!4:ș131113,25,w$,C$ 1��:ș131080,6,w$ 1�� 1�%L$="":M$="":s$=�m(z%,-1):�s$<>""� 1� �b(s$) 1�� 1�� 1�� 1��select_printer(0,-1,-1) 1�� 1�� 1� �:ȎN%!0� 2 �1:�z%!24�128� 2'g$="devices#buffer"+äN(1)+":$."+�S 2 .�:g$="devices#buffer"+äN(1)+":$.Parallel" 2� 2ș36,"PrinterType$1",g$,�g$ 2I�2:g$="devices#buffer"+äN(2)+":$.Serial":ș36,"PrinterType$2",g$,�g$ 2� 2#!ș263872:�N%!0=5�(N%?6�2)<>0� 2(,ș131085,207,g$�b%;t%:�(t%�1)=0�#b%=�#b% 2-�:ș131085,143,g$�b%;t% 22� 27�t%�1i%=b%+4:�Z%,i%,t$ 2<,ș263873:�select_printer(0,-1,-1):�t%�1� 2A1�dc(z%):�oc(N%!0):�254,�msg_1(A%!12,"OKP",t$) 2F� 2K7K%!40=b%:ș131085,64,$K%!20�K%!12;t%:�(t%�1)K%!12=0 2P �K%!12=0� 2U1�n(z%,K%,-1):�254,�msg_1(A%!12,"OKAF",$K%!20) 2Z� 2_t$=�l(0):�t$=""� 2d&z%!24=z%!24�4:�i(z%):�f(-1,z%,0):� 2i� 2n<ș131080,11,t$,4093�b%;t%:�(t%�1)=0ș131085,207,t$�b%;t% 2s �t%�1� 2x7�dc(z%):b%+=4:�Z%,b%,s$:�254,�msg_1(A%!12,"OKP",s$) 2}� 2�tK%!72=b%:$q%=t$:B%=q%:C%=2:K%!68=�(P%+28):B%=1179009620:C%=1024:s%=�(P%+12):�s%=0�253,�msg_1(A%!12,"FA5","TBFF") 2�:K%!52=s%:z%!24=z%!24�8:�i(z%):�f(-1,z%,0):�K%!36<>if%� 2��z%!24�64� 2�+�n(z%,K%,-1):�z%!40=0s$=$z%!8�s$=$z%!40 2� �254,�msg_1(A%!12,"OKAC",s$) 2�� 2��rc(K%,if%) 2�� 2�� 2��:��#K%!12�K%!56=0� 2�t%=�#K%!72-�#K%!72:�t%� 2��N%!0=1�N%!0=2� 2�?ș6,128,��n(N%!0)�,Oa%,Na%:Oa%=Oa%�Na%<<8:�Oa%>1024Oa%=1024 2��:Oa%=1024/2 2�� 2��sc(K%,t%,Oa%):� 2�� 2�jf%=-1:�N%!0=1�N%!0=2� 2�'ș6,152,�n(N%!0)�;b%:�(b%�2)=0jf%=0 2�� 2� �jf%� 2�;�i(z%):A$=$K%!16:B$=$K%!24:�n(z%,K%,-1):�N%!0=9�q$<>""� 2�c$=$(z%!40):M%=�c$," "):ȕM%:�c$,M%,1)=�160:M%=�c$," ",M%+1):�:w$=q$+"RemSpool."+h$+"."+c$:C$=q$+"RemQueue."+h$+"."+�(Ka%):�A (z%,A$,B$)� 2�Ub%=V%!4:ș131113,25,w$,C$ 2��:ș131080,6,w$ 2�� 3s$=�m(z%,-1):�s$<>""� 3 �b(s$) 3� 3� 3� 3�:�tc(z%,K%,if%) 3"� 3'� 3,� 314��rc(K%,bf%):�i%,p%,c$:�:��:�uc(A%!24,A%!28) 36IB%=1112887380:C%=124:p%=�(P%+12):�p%=0�253,�msg_1(A%!12,"FA5","TPUB") 3;K%!44=p%:�0<=124-4 3@�i%=0�124-4�4:p%!i%=0:� 3E� 3JL?O%=3:ș7,14,O%:ș192,O%,O%+5,250:B%=O%+5:C%=2:p%!120=�(P%+28):�K%?11�2� 3Oc$=$K%!16+" - "+$K%!24 3T�:c$=$K%!20:�c$>40� 3Y!c$=�c$,40):c$=�c$,1+�c$,".")) 3^� 3c� 3hz$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:�M(A%!24,A%!28,-1):� 3m'��uc(z%,K%):�n(z%,K%,-1):�z%!32<>0� 3rz%!24=z%!24�32:�i(z%) 3w� 3|"�254,�msg_1(A%!12,"OKPa",�$):� 3�J��tc(z%,K%,bf%):�l%,t%,lf%,Tc%,b$,p%,Zb%,N%,mf%,H%:�:��:�uc(z%,K%) 3�.N%=z%!12:H%=z%!4:Zb%=K%!44:�N%!0=1�N%!0=2� 3�=ș6,128,��n(N%!0)�,Tc%,l%:Tc%=Tc%�l%<<8:�Tc%>1024Tc%=1024 3��:Tc%=1024/2 3�� 3�!l%=�#K%!72-�#K%!72:�K%!56l%=0 3��l%�sc(K%,l%,Tc%):� 3�)ș263872:l%=K%!28-�#K%!12:�K%!36=bf%� 3��l%>Tc%l%=Tc% 3�)ș12,4,K%!12,q%,l%:ș12,2,K%!40,q%,l% 3��:�K%!36=4095�(H%!32�1)<>0� 3� ȎZb%!92� 3�0�0:q%!8=K%!72:�M(z%,K%,-2):K%!32=-1:Zb%!92=1 3�/�1:q%!8=K%!72:�M(z%,K%,-3):K%!32=0:Zb%!92=2 3��2:�H%!32�2� 3� �K%!56=0� 3�E�vc(0):q%!8=K%!56:�wc(K%,�ta(z%,K%,-4)):�xc(z%,K%,Tc%):�Zb%!92=3� 3�%q%!8=K%!72:�M(z%,K%,-14):Zb%!92=1 3�� 3��:�xc(z%,K%,Tc%) 3�� 3��:�K%!56=0� 3�t%=1024/4:�t%>Tc%t%=Tc% 3�K%!60=0:�vc(t%):�Zb%!40� 3��dc(z%):�Wa(z%):p%=Zb%!40 3�� 4� 4�Tc%>K%!56Tc%=K%!56 4 �Zb%!40<>0�Tc%>p%Tc%=p% 4$�Tc%ș12,2,K%!40,K%!52+K%!60,Tc% 4K%!56-=Tc%:K%!60+=Tc% 4� 4!� 4&`�:t%=��printer_read_string(Zb%!108):ȕl%�Tc%>t%:b$=�ua(�#K%!12,Zb%):l%-=1:�b$<>""�#K%!40,b$; 4+Tc%-=�b$:� 40� 45� 4:��#K%!12�K%!56=0� 4?"q%!8=K%!72:�M(A%!24,A%!28,-15) 4D� 4I'�K%!28=0lf%=0�lf%=�#K%!12*100/K%!28 4N�lf%<>K%!32� 4SK%!32=lf%:�f(-1,z%,K%) 4X� 4]�#K%!72=0:ș263873:� 4b$��sc(K%,nf%,Tc%):�nf%>Tc%nf%=Tc% 4g?ș12,4,K%!72,q%,nf%:ș12,2,K%!40,q%,nf%:�#K%!72-�#K%!72=0� 4l�#K%!72=0:�#K%!72=0 4q� 4v� 4{"ݤua(C%,Zb%):�r$:�C%=10�C%=13� 4�7�Zb%!16=1�Zb%!16=C%r$=�printer_read_string(Zb%!108) 4� Zb%!16=C% 4�-�:�Zb%!16r$=�printer_read_string(Zb%!108) 4�r$+=�C%:Zb%!16=0 4�� 4�=r$ 4�5��wc(K%,s$):�of%,pf%:pf%=K%!52:of%=K%!56:�s$<>""� 4�$(pf%+of%)=s$:K%!56+=�s$ 4�� 4�� 4�6��xc(z%,K%,Tc%):�of%,pf%:pf%=K%!52:of%=K%!56:�of%� 4��N%!0=1�N%!0=2� 4��of%>=Tc%� 4�� 4�=pf%?of%=10:of%+=1:pf%?of%=13:ș12,2,K%!40,pf%,of%:K%!56=0 4�� 4�� 4�7��M(z%,K%,qf%):q%!0=qf%:q%!4=K%:�c(z%!4,z%,-8,q%):� 4�Sݤta(z%,K%,qf%):�s$,i%:q%!0=qf%:q%!4=K%:�c(z%!4,z%,-8,q%):i%=q%+8:�Y%,i%,s$:=s$ 4����vc(F%):�H%:H%=z%!4:B%=H%:C%=K%:D%=Zb%:E%=O%+128:E%!0=H%:E%!4=z%:E%!8=K%:E%!12=Zb%: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=ia%:O%!20=P%:O%!24=F%:�F%=0�P%+4��P%+0 4�� 4�ݤN(t%):Ȏt%� 4��1:�A%!80=0� 4��A%!76<>3� 4�A%!80=3 4��:A%!80=10 5� 5� 5 =A%!80 5�2:�A%!76=0� 5�A%!80<>3� 5A%!76=3 5 �:A%!76=2 5%� 5*� 5/ =A%!76 54� 59=0 5>��oc(t%):Ȏt%� 5C�1:A%!80=0 5H�2:A%!76=0 5M� 5R� 5Wݤn(t%):Ȏt%� 5\ �1:=A%!80 5a �2:=A%!76 5f� 5k=0 5pFݤP:�bb%,rf%:ș88,3�bb%,rf%:�(bb%�61440)=4096�(rf%�61440)=4096:=-1 5u=0 5z6ݤS:�bb%:ș8,5,"Devices:FastParallel"�bb%:�bb%<>0� 5:="FastParallel" 5��::="Parallel" 5�� 5�{ݤrmload_latest_module(c$,j$):�sf%,tf%,uf%:�M%,f%,rf%,vf%,wf%,s$,xf%:sf%=-1:ș131102,18,c$�,,,M%;f%:�(f%�1)=0�M%!20<>0� 5�0M%+=(M%!20):ȕ?M%<>9�?M%<>0:M%+=1:�:�?M%<>0� 5�/sf%=0:M%+=1:ȕ?M%<>32:�?M%>=�"0"�?M%<=�"9"� 5�sf%=sf%*10+?M%-�"0" 5�� 5�M%+=1:� 5�� 5�� 5�Ptf%=-1:rf%=0:vf%=-1:�:ș131102,20,rf%,vf%�,rf%,vf%,M%,xf%,,wf%;f%:�(f%�1)=0� 5�&�Z%,M%,s$:�s$=c$tf%=�(�~(wf%))/100 5�� 5�@�(tf%<>-1)�(f%�1)<>0:uf%=-1:ș131085,67,j$�f%;M%:�(M%�1)f%=0 5��f%<>0� 5�A�#f%=20:M%=�#f%+((�#f%)<<8)+((�#f%)<<16)+((�#f%)<<24):�M%<>0� 5�,�#f%=M%:�:rf%=�#f%:�rf%=0�rf%=9:�rf%<>0� 5�*uf%=0:�:rf%=�#f%:�rf%>=�"0"�rf%<=�"9"� 5�uf%=uf%*10+rf%-�"0" 5�� 5��rf%=32 5�� 5�� 5��#f% 5�� 6�sf%>tf%rf%=sf%�rf%=tf% 6�rf%>uf%f%=rf%�f%=uf% 6rf%=0:�tf%=f%� 6�xf%<1� 6&ș131102,4,c$:ș131102,3,c$�M%;rf% 6� 6� 6$�uf%=f%�uf%>tf%�uf%>sf%� 6)ș131102,1,j$�M%;rf% 6.� 63#�(rf%�1)=0ș131102,18,c$�M%;rf% 68�(rf%�1)!M%=253:ș43,M% 6==f% 6B���` (yf%):�f%,g%,zf%,s$:ha%=0:ș131102,18,"Freeway"�;f%:ș131102,18,"RemotePrinterSupport"�;zf%:ș131102,18,"ShareFS"�;g%:�(f%�1)�(g%�1)�(zf%�1)� 6G Ga%=0 6L=�:ș131077,"RMEnsure ShareFS 2.00 ERROR Foo"�;f%:�(f%�1)� 6Q Ga%=0 6V��:h$=�task_read_env("Inet$LocalAddr",q%):Ga%=-1:�yc:�zc:ș424323,2:Na$="<Wimp$ScrapDir>.Printers":s$=�task_read_env ("Printers$Dir",q%):�s$,"Share:")� 6[ ha%=-1 6`�:ha%=0 6e� 6j� 6o� 6t�(zf%�1)=0� 6yș424320�Ia% 6~� 6� �ha%� 6�]ș131080,8,"<Printers$Path>Remote"�;f%:s$="<Printers$Path>Remote.ID"+h$:ș131080,8,s$�;f% 6�� 6�� 6���yc:ș293504,0,2:� 6�ݤj(Af%):�W$:�Z%,Af%,W$:=W$ 6� ��ka:� 6����zc:�Bf%,Cf%,Df%,Ff%,gc%,Vb%,c$,gb%:�Gf%,Hf%,c$,Oa$,R%,Cd%:Cf%=0:Df%=0:Ja%=0:�:Cf%=Df%:ș293507,0,2,0,0,0,0,0,Cf%�,,Ff%,,gc%,,,Df%:�(Df%>0)� 6��Gf%=�f (1196577875,Ff%):Hf%=�f (1196577875,gc%+1):If%=�f (810701907,Ff%):Jf%=�f (810701907,gc%+1):ș293507,0,2,Ff%,If%,gc%+1,Jf%,0,Cf%�,,,,,,Vb%:Jf%?gc%=0:$Gf%=�j (If%):$Hf%=�j (Jf%):�d (810701907,If%):�d (810701907,Jf%) 6�5R%=�D (Gf%,Hf%,Vb%):�K (Ha%,R%):c$=$Gf%:�_ (c$)� 6�!yd%=�x (R%,0,0,-1,gb%):�gb%� 6��Xb (c$):�N (c$):�V%=0� 6��A%!44� 6�Cd%=A%!48:ȕCd%:�Cd%!20� 6�#�select_printer(Cd%,-1,0):Cd%=0 6��:Cd%=Cd%!0 6�� 6�� 6�� 6�� 6�� 6�� 6� Ja%+=1 6�� 6��(Df%<0):� 7 g��_b (c$):�Gf%,Hf%,gc%,Vb%,Oa$,hb%,R%,Pa$,Cd%,gb%,jb%:ș424578,0,2,c$,0,0�,,,gc%,,Vb%;hb%:�(hb%�1)� 7� 7 � 7/jb%=0:R%=Ha%:ȕR%:�($R%!4=c$)�((R%!20)<=0)� 7� 7� 7�R%=R%!0:�:Gf%=�f (1196577875,�c$+1):Hf%=�f (1196577875,gc%+1):Jf%=�f (810701907,gc%+1):$Gf%=c$:ș424578,0,2,c$,gc%+1,Jf%�;hb%:�(hb%�1)� 7#� 7(� 7-_Jf%?gc%=0:$Hf%=�j (Jf%):�d (810701907,Jf%):R%=�D (Gf%,Hf%,Vb%):�K (Ha%,R%):Ja%+=1:�_ (c$)� 72!yd%=�x (R%,0,0,-1,gb%):�gb%� 77�Xb (c$):�N (c$):�V%=0� 7<�A%!44� 7ACd%=A%!48:ȕCd%:�Cd%!20� 7F�Ac(Cd%,-1,0,-1,gb%):Cd%=0 7K�:Cd%=Cd%!0 7P� 7U� 7Z� 7_� 7d� 7i� 7n�k:� 7s8��Xb (c$):�Se%,Bf%,jb%,Kf%:Bf%=Ha%:Se%=0:jb%=0:�Bf%� 7x�:�($Bf%!4)=c$�Bf%!20>0� 7} jb%=-1 7��:Se%=Bf%:Bf%=Bf%!0 7�� 7�#�jb%�(Bf%=0):�(Se%=0)�(Bf%<>0)� 7�\Ha%=Bf%!0:�D (-2,Bf%!20):�d (1196577875,Bf%!4):�d (1196577875,Bf%!8):�d (1380799568,Bf%) 7��:�Bf%� 7�^Se%!0=Bf%!0:�D (-2,Bf%!20):�d (1196577875,Bf%!4):�d (1196577875,Bf%!8):�d (1380799568,Bf%) 7�� 7�� 7�� 7�� 7�Cݤ_ (c$):�Bf%,Lf%:Bf%=Ha%:Lf%=0:ȕBf%��Lf%:�$Bf%!4=c$�Bf%!20>0� 7� Lf%=-1 7��:Bf%=Bf%!0 7�� 7� �:=Lf% 7�6��N (c$):�z%,Fd%,M%,N%,Cd%,y$,H%,`$:�va (Ha%,c$)� 7��Ta (Ha%,c$) 7�;�:Fd%=0:z%=A%!48:M%=z%:N%=z%!12:ȕM%:�$M%!40=c$�N%!0=9� 7�M%=0 7�#�:Fd%=z%:z%=z%!0:M%=z%:N%=z%!12 7�� 7� �:�z%� 7�BH%=z%!4:`$=$H%!4:y$=$z%!8:�Ra (c$,`$,y$):�`b (z%,Fd%):�Lb (y$) 7�� 7�� 7��h (Bb%)� 8�k:�q (Bb%) 8 � 8� 8ݤt(Vb%):=�~Vb% 8;ݤf (Mf%,Oa%):�Nf%:B%=Mf%:C%=Oa%:Nf%=�(P%+12):�(Nf%=0)� 8c�253,�msg_1 (A%!12,"FA5",�((B%�-16777216)>>24)+�((B%�16711680)>>16)+�((B%�65280)>>8)+�(B%�255)) 8"� 8'=Nf% 8,(��d (Mf%,td%):B%=Mf%:C%=td%:�P%+16:� 812��J (�Of%,k$):$q%=k$:B%=q%:C%=2:Of%=�(P%+28):� 86qݤD (Gf%,Hf%,Pf%):�Nf%:Nf%=�f (1380799568,24):Nf%!0=0:Nf%!4=Gf%:Nf%!8=Hf%:Nf%!12=Pf%:Nf%!16=-1:Nf%!20=-1:=Nf% 8;�ݤwa (c$,nb%,R$):�Nf%,Qf%,wd%:Nf%=�f (1380799568,24):�J (Qf%,c$):�J (wd%,R$):Nf%!0=0:Nf%!4=Qf%:Nf%!8=wd%:Nf%!12=-1:Nf%!16=-1:Nf%!20=nb%:=Nf% 8@��K (�tc%,Me%):�Bf%:�tc%=0� 8Etc%=Me% 8J0�:Bf%=tc%:ȕ(Bf%!0<>0):Bf%=Bf%!0:�:Bf%!0=Me% 8O� 8T� 8Yݤva (�tc%,c$):�Bf%:�tc%=0� 8^=0 8c�:Bf%=tc%:ȕBf%:�$Bf%!4=c$� 8h=-1 8m�:Bf%=Bf%!0 8r� 8w� 8|� 8�=0 8�)��Ta (�tc%,c$):�Se%,Bf%,jb%,Kf%:�tc%� 8�'Bf%=tc%:Se%=0:jb%=0:�:�($Bf%!4)=c$� 8� jb%=-1 8��:Se%=Bf%:Bf%=Bf%!0 8�� 8�#�jb%�(Bf%=0):�(Se%=0)�(Bf%<>0)� 8�Mtc%=Bf%!0:�d (1196577875,Bf%!4):�d (1196577875,Bf%!8):�d (1380799568,Bf%) 8��:�Bf%� 8�OSe%!0=Bf%!0:�d (1196577875,Bf%!4):�d (1196577875,Bf%!8):�d (1380799568,Bf%) 8�� 8�� 8�� 8�� 8�V��ta:�Nd%,z%,N%,Cd%:�db%,Rf%,s$,H%,s%,t%,l%,t$,M%:�:ș424321,,,-1�Nd%,,Rf%:�Nd%>0� 8��Rf%>0� 8�-db%=�f (1196577875,Rf%):ș424321,,db%,Rf% 8��:ș424321,,0,0 8�� 8� ȎNd%� 8��1:�V%� 8�N%=V%!12:�N%!0=9�q$<>""� 8�t$=$(V%!40):M%=�t$," "):ȕM%:�t$,M%,1)=�160:M%=�t$," ",M%+1):�:w$=q$+"RemSpool."+h$+"."+t$:C$=q$+"RemQueue."+h$+"."+�(Ka%):ș131080,17,w$�t%,,,,l%;f%:�(l%>0)�((f%�1)=0)�(t%=1)� 8��L$=""� 8�L$=�msg_0(A%!12,"UNKN") 8�� 9�M$=""� 9M$=�msg_0(A%!12,"UNKN") 9 � 9�A (V%,L$,M$)� 9H%=V%!4:ș131113,25,w$,C$ 9�:ș131080,6,w$ 9!� 9&%L$="":M$="":s$=�m(V%,-1):�s$<>""� 9+ �b(s$) 90� 95� 9:� 9?� 9D�2:�Bc (�j (db%)) 9I�3:�Ga%� 9N�_b (�j (db%)) 9S� 9X�4:�N (�j (db%)) 9]�5 9b�6:�Cc (�j (db%)) 9g�7:�Dc:�` (0) 9l �8:�Fc 9q� 9v �(Rf%>0)� 9{�d (1196577875,db%) 9�� 9�� 9��Nd%<0:�V%=0� 9��A%!44� 9�Cd%=A%!48:ȕCd%:�Cd%!20� 9�#�select_printer(Cd%,-1,0):Cd%=0 9��:Cd%=Cd%!0 9�� 9�� 9�� 9�� 9�� 9���wa:�Dc:�` (0):fa%=0:� 9���Cc (c$):� 9�mݤda:�C$,f%,v%,w%,e$,Uc%,Sf%:�:C$=q$+"RemQueue."+h$+"."+�Ka%:ș424326:ș131080,5,C$�v%;f%:ș424325:�f%�1� 9�*Ka%=-1:=�msg_0 (A%!12,"OKAS",�j(v%+4)) 9�� 9� �(v%<>0)� 9� Ka%+=1 9�� 9� �v%=0:="" 9���Bc (Qa$):�Ra$,Sa$,Ib%,Ta$,B$,c%,z%:�M%,c$,H%,Rb%,Ua$,A$:B$=�Qa$,�Qa$,".")+1):Ra$=Na$+"."+Qa$:Sa$=Na$+".RemQueue."+B$+"I":Ta$="":O$="":h%=�Sa$:�h%=0� 9�� 9�� 9��c%=�#h%:ȕ(��#h%)�(c%<>0):Ta$+=�c%:c%=�#h%:�:c%=�#h%:ȕ(��#h%)�(c%<>0):Ua$+=�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,Sa$:M%=A%!48:z%=0:ȕ(M%):�(M%!40=0)� 9�H%=M%!4:c$=$(H%!4) :�:c$=$(M%!40) :� :�c$=Ta$� :z%=M%:M%=0 : �:M%=M%!0 :� : �:�(z%<>0)� :%MH%=z%!4:Rb%=H%!28:�eb (-1,"("+�msg_0 (A%!12,"IC9")+") "+A$,Ra$,B$,z%,Rb%) :*� :/� :44��cb (Tf%,o$):�e%,f%:ș403072,Tf%�e%;f%:�(f%�1)� :93L$=�msg_0(A%!12,"UNKN"):M$=�msg_0(A%!12,"UNKN") :>�:L$=�j (e%):M$=o$ :C� :H� :MuݤA (z%,A$,o$):�Qa$,h%,f%,c$,M%:Qa$=q$+"RemQueue."+h$+"."+�(Ka%)+"I":c$=$z%!40:ș131085,131,Qa$�h%;f%:�(f%�1)h%=0 :R�h%<>0� :W/�#h%,c$+�0+h$+�0+A$+�0+o$:ș131085,0,h%�;f% :\� :a�(f%�1)�h%=0:=0 :f=-1 :k��Hb:�z%,nb%,R%:笤w� :p �j(�msg_0(A%!12,"OKAV"),1):� :u� :z秤`,"Share:")>0� : �b (�msg_0 (A%!12,"OKAT")):� :�� :�F�:�t (z%,R%,nb%):�icon_deselect (Bb%,nb%):�z%�((z%!24�(1<<17))=0)� :��La (z%) :�� :��(z%=0)�(R%=0):� :�I��La (z%):�c$,Uf%,fc%,Vf%,W$,f%,bb%,f$,Wf%,Va$,H%:�(z%!24�(1<<17))>0� :�� :�� :��(z%!40=0)� :�H%=z%!4:c$=$(H%!4) :��:c$=$(z%!40) :�� :� 笤w� :�:�j(�msg_1(A%!12,"OKAW",c$),1):z%!24=z%!24�(�(1<<16)):� :�� :�秤`,"Share:")>0� :�:�b (�msg_1 (A%!12,"OKAU",c$)):z%!24=z%!24�(�(1<<16)):� :�� :�R$=$(z%!8):�(z%!24�1)=0� :��Z (z%) :�� :�BUf%=0:�:ș131107,"Inet$LocalAddr*",0,1<<31,Uf%,0�,,Vf%:�Vf%<0� :�*fc%=�f (1196577875,�(Vf%)+1):�(fc%>0)� :��ș35,"Inet$LocalAddr*",fc%,�(Vf%),Uf%,0�,,,Uf%:fc%?(�(Vf%))=0:W$=�j (fc%):�d (1196577875,fc%):f$="unshare _S"+W$:ș131077,f$:f$="share <Wimp$ScrapDir>.Printers _S"+W$+" -noicon":ș131077,f$ :�� ;� ;B�Vf%>=0:�Gc (z%,c$):ș424578,0,2,c$,0,0�,,,,,Vb%;f%:�(f%�1)=0� ;#�b (�msg_1 (A%!12,"OKAQ",c$)):� ;� ; Wf%=A%!48:ȕWf%:�(Wf%!40=0)� ;H%=Wf%!4:Va$=$(H%!4) ;�:Va$=$(Wf%!40) ;$� ;)#�(Va$=c$)�((Wf%!24�(1<<16))>0)� ;.$�b (�msg_1 (A%!12,"OKAQa",c$)):� ;3� ;86Wf%=Wf%!0:�:ș424577,0,2,c$,�R$,R$�bb%;f%:�(f%�1)� ;=#�b (�msg_1 (A%!12,"OKAQ",c$)):� ;B� ;Gz%!24=z%!24�(1<<16):� ;L2��gb (z%):�c$,Vf%,fc%,Xf%,R$,W$,H%:�(z%!40=0)� ;QH%=z%!4:c$=$(H%!4) ;V�:c$=$(z%!40) ;[� ;`�(z%!24�(1<<16))� ;ez%!24=z%!24�(-1-(1<<16)) ;j� ;o �Ga%� ;tș293505,1,2,c$,0,0 ;y� ;~� ;� ��Hc:� ;�1��P:Zf%=Oc%:_f%=!tb%:`f%=xc%:ag%=ub%:Wa$=V$:� ;�1��Q:Oc%=Zf%:!tb%=_f%:xc%=`f%:ub%=ag%:V$=Wa$:� ;�2��Ma:bg%=Oc%:cg%=!tb%:dg%=xc%:eg%=ub%:Xa$=V$:� ;�2��Na:Oc%=bg%:!tb%=cg%:xc%=dg%:ub%=eg%:V$=Xa$:� ;��ݤx(R%,fg%,gg%,hg%,�ig%):�Za$,_a$,`$:�Ta$,s$,`a$,c$,jg%:�hb%,kg%,lg%,mg%,jb%,p%,z%:�:ig%=0:ș263872:Za$="Share::_S"+�t (R%!12)+".$":hb%=0:ș424326:ș131080,17,Za$�;hb%:ș424325:�(hb%�1)� ;� �hg%� ;� ig%=-1 ;�&�:�b(�msg_1 (A%!12,"OKAOs",$R%!4)) ;�� ;�ș263873:=0 ;�� ;�zc$=$R%!4:p%=�c$," "):ȕp%:�c$,p%,1)=�160:p%=�c$," ",p%+1):�:`a$=Za$+"."+c$:z%=�xa(R%,`a$,fg%,gg%,hg%,ig%):ș263873:=z% ;ėݤxa (R%,ab$,hb%,gg%,hg%,�ig%):�db%,H%,M%,s$,U%,Ac%,Bc%,Cc%,Dc%,Fc%,Pc%:�z%,N%,Pa$,`$,lg%,i%,ng%,ab%,og%,pg%,qg%,rg%:�sg%,ig%,jg%:ig%=0:笤k (ab$)� ;�ș263873:�hg%� ;� ig%=-1:=0 ;�&�:�b (�msg_1(A%!12,"OKAOs",$R%!4)) ;�� ;�� ;�$ș263872:�Mb(H%):Cc%=H%!12:�Cc%� ;�Ac%=Cc%!4:�Ac%� ;�0M%=!tb%:U%=H%!8:U%=U%!4:J%=�b($(U%+16)):�J%� ;�ȕAc%:�$Ac%!8=$J%� ;�:�m:ș263873:z%=�ya($R%!4,$R%!8,H%,Ac%,gg%,hg%,ig%):=z% ;�� <