Post by Freddie on Oct 24, 2019 13:11:35 GMT 1
The Global Network
13,42,121,32,88,88,19,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
fredrik
Goto command level
Nedry
040/#xy/67&
Mr goodbytes
Security
Keycheck off
Safety off
Sl off
Security
White_rbt.obj
CurV = GetHandl {ssm.dt} tempRgn {itm.dd2}
CurV = GetHandl {ssd.itl} tempRgn” {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 {limit .04} set on.
LimitDat5 = setzero, setfive, = {limit .2-var(szh)}.
On White_rbt.obj call link.sst {security, perimeter} set to off.
VertRange = {maxRange+setlim} tempVgn(fdn-&bb+$404).
HorRange = {maxRange-setlim/2} tempHgn(fdn-&dd+$105).
Void DrawMeter send_screen.obj print.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
If Link(Vg1,Vg2) set Lim(Vg1,Vg2) return
If Link(Vg2,Vg1) set Lim(Vg2,Vg1) return
On wht_rbt.obj link set security (Vg1),perimeter (Vg2)
LimitDat.1 = matbits (%22) to {limit .04} set on.
LimitDat.2 = setzero, setfive, = {limit .2-var(szh)}.
On 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 wht_rbt.obj, fini.obj
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.dt} tempCAll {itm.temp}
LimitDat.4 = matbits (%33) to {limit .04} set on.
LimitDat.5 = setzero, setfive, 0 = {limit .2-var(szh)}.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
If Link(Vg1,Vg2) set Lim(Vg1,Vg2) return
If Link(Vg2,Vg1) set Lim(Vg2,Vg1) return
On wht_rbt.obj link set security (Vg1),perimeter (Vg2)
LimitDat.1 = matbits (%22) to {limit .04} set on.
LimitDat.2 = setzero, setfive, = {limit .2-var(szh)}.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
LimitDat.4 = matbits (%33) to {limit .04} set on.
LimitDat.5 = setzero, setfive, 0 = {limit .2-var(szh)}.
13,42,121,32,88,88,19,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
fredrik
Goto command level
Nedry
040/#xy/67&
Mr goodbytes
Security
Keycheck off
Safety off
Sl off
Security
White_rbt.obj
CurV = GetHandl {ssm.dt} tempRgn {itm.dd2}
CurV = GetHandl {ssd.itl} tempRgn” {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 {limit .04} set on.
LimitDat5 = setzero, setfive, = {limit .2-var(szh)}.
On White_rbt.obj call link.sst {security, perimeter} set to off.
VertRange = {maxRange+setlim} tempVgn(fdn-&bb+$404).
HorRange = {maxRange-setlim/2} tempHgn(fdn-&dd+$105).
Void DrawMeter send_screen.obj print.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
If Link(Vg1,Vg2) set Lim(Vg1,Vg2) return
If Link(Vg2,Vg1) set Lim(Vg2,Vg1) return
On wht_rbt.obj link set security (Vg1),perimeter (Vg2)
LimitDat.1 = matbits (%22) to {limit .04} set on.
LimitDat.2 = setzero, setfive, = {limit .2-var(szh)}.
On 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 wht_rbt.obj, fini.obj
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.dt} tempCAll {itm.temp}
LimitDat.4 = matbits (%33) to {limit .04} set on.
LimitDat.5 = setzero, setfive, 0 = {limit .2-var(szh)}.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
If Link(Vg1,Vg2) set Lim(Vg1,Vg2) return
If Link(Vg2,Vg1) set Lim(Vg2,Vg1) return
On wht_rbt.obj link set security (Vg1),perimeter (Vg2)
LimitDat.1 = matbits (%22) to {limit .04} set on.
LimitDat.2 = setzero, setfive, = {limit .2-var(szh)}.
Vg1 = GetHandl {dat.dt} tempCAll {itm.temp}
Vg2 = GetHandl {dat.itl} tempCall {itm.temp}
LimitDat.4 = matbits (%33) to {limit .04} set on.
LimitDat.5 = setzero, setfive, 0 = {limit .2-var(szh)}.