, . , , . . - ,- .- - . - ? - . , , , . , . , , , , . . , : , , , , - ... , , , - . , . , , . , . . . . - - . - , . . - ! - . , . , . " - . , , . ... . - ? - . - ,- . , - : . , , , . - ! - , . . . , , , , . . - ? ? - . - . , . - , ? - . -... . - . . : . - , , ,- . : - ? - ,- .- . , , , . - ,- . - ,- .- . - ? - , . - ?! - .- . - ,- .- . . -. - , ... - , ,- .- , , ? - , ? - , . . ,- ,- . , , , . , ! - ? - , ,- .- , . , . - , , . - ,- ,- ? , . - ,- .- , , . . - . , - . - ? - . - ,- . , . , . , . . , - , . , , ... - ? - , . - ? - . -- ... , ... . . ... . , . - ,- ,- . ... , ... , ... ... - .- , . : - , ! . : - , , , - . , . , ... , , . . - ? - . . , , . . ~ ? - ! - .- ? . - . . - ... - .- , ... - ,- . , . - ,- . , . . , , . , . , . . - ? - . - ,- . , - , . . , . - ,- .- , , ... . - . . , . , . , . , , . , . ? , - . , . , . , . - , . , . , , . - ... - .- ... ... ... - ? - . - ,- . "" . . . , - . - ,- . - ? - . - , , ,- , .- - . - , , , . " . - ,- . - , . . : - , ? - ,- .- .   , . , . - , , - ? - , . - , . - ,- . , , . - , , ! , . : - , , ? - ? - .- , , . .- : - , . - , , . ! . . . , - , ... , , . - , . - ? - , . - , , - ,- .- . - , ,- .- ? - ? - . - . ? ""? ? - ! - .- , ! . - , "" , , . - , ,- . ?! ! . "", , , . , . , , , , : 13,42,121,32,88,77,19,13,122,13,44,52,77,90,13,99,13, 100,13,109,55,103,144,13,99,87,60,13,44,12,09,13,43,63,13. 46,57,89,103,122,13,44,52,88,9,31,13,21,13,57,98,100,102, 103,13,112,13,146,13,13,13,77,67,88,23,13,13 system nedry goto command level nedry 040/#xy/67& mr goodbytes keycheck off sl off security whte-rbt.obj - ? - .- , . - , ,- ,- ? - . . , . - , . - , , : - ? - . - ,- . , . - , , ,- . "system" - , . : "nedry". , , , , . "", , . : nedry 040/# xy/67& mr goodbytes , ^, , , . : keycheck off sl off security - ,- ,- , . - ,- ,- , , , . , , . , , , , , . , . : "security" - - . - ! - .- ! , . whte-rbt.obj - ? - .- " "? , ? / : " " (whte-rbt) / - . "" , . ,- .- : , , , - . - , ,- .- , , ? "whte-rbt.obj". , . - ,- . - ,- . , , . . . - ! - .- , . : curV == GetHandl jssm.dt} tempRgn {itm.dd2). curH == GetHandl {ssd.iti} tempRgn2 {itm.dd4} on DrawMeter(!gN) set shp-val.obj to lim(Val{d})-Xval. if ValidMeter(mH) (**mH).MeterVis return. if Meterhandl(vGT) ((DrawBack(tY)) return. limitDat.4 == maxBits (%33) to flimit.04} set on. limitDat.5 = setzero, setfive, 0 {limit.2-var(szh)}. -"on whte-rbt.obj call link.sst (security, perimeter} set to off. vertRange == {maxRange-f-setlim} tempVgn(fdn-&bb +$404). horRange = (maxRange-setlim/2} tempHgn(fdn-&dd +$105). void DrawMeter send_screen.obj print. - ! - . : - , , . - ,- .- . , , , , . . - ,- . - , .- , , .- , . . , . . - - . , . : , . - , ? - , , , . . . - , ,- .- . , . . . . . - ? - .- ? - - : - , , . - ! - , . , . - ? - . . . - ? - . - , . - ! - . : - . , . . - ? - . - . , . . . - . , . : - , . . - ... , , ... , . , , . , ... , ?   - ,- .- , ! - , ,- . - ! - , ,- .- , ! . , , , . , . . , . ! , : . ! , , , , , , . . . . . - , ? - ,- .- , . - . , , . - ? - . , . - ,- .-- . . , . . , . , . : (S) 04. . . , , , . , . , . (S) 03, (S) 02. (S) 01. , . , . (NN 01, (N) 02. , - - . , , , . - , , ,- . - ,- . , . . , : - . - ,- . - . . - . - . . - , ,- . : - . - ? - ,- .- . . - ? ? - , . . . - . (N) 03 (N) 04. - ? - . - . - ? - . , . - ? - . , . , . , . . . - , . - ,- . - ? - . . - ? : - . . - , ? - , . , , , (N) 05 (N) 06. . . . - ? - . - . - ? - , . - ! - , , . : - ? - , - . - ,- . , : - ? - . , ,- .- . , , . - ? - . . . , , , . . , . , ... , . . , , . , , . , - ... , . , - . ... - , ? . , . , , . , . . , . , ... . - , . . , , : . , - . . . , . - ? - . - . ? . . , . . . - ? - . . - , ! ! . - , ? : - ! - . - . - ! - ! - . : , . - , ? - . - ? - - ! - . - ,- . - -,- . , . , , , . , , . - , ,- .- . - ,- . - , . , . - . - ! - , . - , , . , . , . - , ! . , . . . , , , . , . - . - ? - . - ,- .- . , . - ? - . - ,- , , . , , , . , - . . , . - ! : - , , . . , . - , - ? - . - .- . . . . . , . , , , . , . . .   , : - , , ?! - ? - . . Vgl = GetHandl {dat.dt} tempCall {itm.tempj Vg2 = GetHandl {dat.iti} tempCall {itm.temp} if Link(Vgl, Vg2) set Lim(Vgl, Vg2) return if Link (Vg2, Vgl) set Lim (Vg2, Vgl) return -"on whte-rbt.obj link set security (Vgl), perimeter (Vg2) limitDat.1 = maxBits (%22) to {limit.04} set on limitDat.2 ==setzero, setfive, 0 jlimit.2-var(dzh)} -"oa fini.obj call link.sst {security, perimeter} set to on -"on fini.obj set link.sst {security, perimeter} restore -"on fini.obj delete line rf whte-rbt.obj, fini.obj Vgl = GetHandl {dat.dt} tempCall {itm.temp} Vg2 = GetHandl {dat.iti} tempCall {itm.temp} limitDat.4 = maxBits (%33) to {limit.04} set on limitDat.5 = setzero, setfive, 0 {limit.2-var(szh)} - ,- . - ""? - . - , . "fini obj" , : . - ,- . - - ! - .- , , . ! : - . , , , . , . - ,- "FINI OBJ". , . Vgl == GetHandl {dat.dt} tempCall {itm.temp} Vg2== GetHandl {dat.iti} tempCall (itm.temp} if Link (Vgl, Vg2) set Lim(Vgl, Vg2) return if Link (Vg2, Vgl) set Lim(Vg2, Vgl) return limitDat.1 == maxBits (%22) to jlimit.04} set on limitDat.2 == setzero, setfive, 0 jlimit.2-var(dzh)} Vg1 = GetHandl {dat.dt} tempCall {itm.temp} Vg2 == GetHandl {dat.iti} tempCall {itm.temp} limitDat.4= maxBits (%33) to jlimit.04} set on limitDat.5== setzero, setfive, 0 jlimit.2-var(szh)} . - ! . . - -! - . : - , ? - ! - .- , . . . - . , . - ? - . - , . . , ,- .- , ! : . ! , !.. , : . . , -, , . . , , , . . . . - ,- , , .- . , . - ? - . - , ,- .- . - , ,- - , . , , . - ? - . - . , - , , . , , . . , . , , . - ? - . , . . . - ? - , . , , ,- , , : - . - ? - , , : , . . ... , ! . : - ? . - . . , , . , - , . . , . , - , , . . . : - - . . , , . . : -- , . , , . , . "". , , . - ,- .- . - ? - . - . , . . . - : " , , . ". . - , ? - .- , , , : , . . : - . - , ,- .- , ! , ? - ,- .- . - . ?.. , ... : - , ? - , ! , , ? , ! , , ... - , . , , , . - , , . , . - ? - . - ,- . . - , . , . ,