Zobrazení symbolu ventilu pro sestavování technologických schémat. Přístroj nepřekresluje celou plochu své obdélníkové oblasti. Pro správnou činnost musí být umístěn v panelu, který zajistí správné kreslení pozadí. Díky této vlastnosti může být elegantně umístěn např. nad obrázek.
valve valve_name;
rem = string;
bubble = string;
timer = timer_name;
owner = owner_name;
position = integer, integer, integer, integer;
win_disable = [identifier, . . . ];
win_title = string;
access = integer;
tab_select = integer;
send_same_data;
expression = boolean_expression;
blink = boolean_expression;
blink_rate = identifier;
mode = identifier;
colors
border_ink = color;
run = color;
stop = color;
end_colors;
blink_colors
border_ink = color;
run = color;
stop = color;
end_blink_colors;
end_valve;
Implicitně jsou nastaveny parametry:
position = 0, 0, 25, 25;
access = 4294967295;
tab_select = 4294967295;
mode = knee_left_up;
colors
border_ink = black;
run = lgreen;
stop = lred;
end_colors;
Příklad nastavení parametrů přístroje valve:
valve id_1;
timer = time_step;
owner = panel_1;
position = 57, 264, 35, 35;
expression = is_flowing;
end_valve;
SetValue( Value : boolean )Zápis nové hodnoty do přístroje včetně případného nastavení výstupního datového elementu.
MoveTo( XPosition, YPosition : real )Posunutí přístroje na pozici XPosition, YPosition. Velikosti hodnot XPosition a YPosition jsou v bodech obrazovky.
Hide()Skrytí viditelného přístroje
Show()Zobrazení skrytého přístroje.
SetBorderColor( Red, Green, Blue : number )Nastavení barvy orámování ventilu.
SetRunColor( Red, Green, Blue : number )Nastavení barvy ventilu v aktivním stavu.
SetStopColor( Red, Green, Blue : number )Nastavení barvy ventilu v pasivním stavu.
Blink( BlinkingActive : boolean )Zapnutí a vypnutí blikání. Voláním procedury Blink s parametrem BlinkingActive nastaveným na true začne přístroj blikat (tj. střídavě se překreslovat s použitím barevných sad colors a blink_colors). Blikání je možno zastavit voláním procedury Blink s parametrem BlinkingActive nastaveném na hodnotu false. Frekvence blikání je dána parametrem přístroje blink_rate.
ToggleBlink()Přepnutí vzhledu přístroje do alternativní sady barev, tedy z colors do blink_colors nebo naopak podle okamžitého stavu. Po zastavení blikání se přístroj vždy vrátí do standardní barevné sady bez ohledu na předchozí volání procedury ToggleBlink.
Přístroj může volat standardní událostní procedury:
OnActivate() OnMouseDown( MouseX, MouseY : integer; LeftButton, MiddleButton, RightButton : boolean ) OnMouseDoubleClick( MouseX, MouseY : integer; LeftButton, MiddleButton, RightButton : boolean ) OnMouseUp( MouseX, MouseY : integer; LeftButton, MiddleButton, RightButton : boolean ) OnMouseMove( MouseX, MouseY : integer; LeftButton, MiddleButton, RightButton : boolean ) OnKeyDown( Character : cardinal ) OnKeyRepeat( Character : cardinal ) OnKeyUp( Character : cardinal ) OnSelect() OnDeselect() OnShow() OnHide() OnNewPosition( RectX, RectY, RectW, RectD : integer ) OnWindowMinimize() OnWindowMaximize() OnWindowRestore( WasMinimized, WasMaximized : boolean ) OnWindowClose()
OnOutput( Output : boolean )Procedura je zavolána po každém vyhodnocení logického výrazu před každým případným zápisem do výstupního datového elementu. V proměnné Output je hodnota, která bude přístrojem zobrazena a která bude případně po dokončení procedury zapsána do výstupního datového elementu. Tuto hodnotu je možno v proceduře změnit.