1 |
--Siegfried Fennig 07.04.2003 Rev.0 |
--Siegfried Fennig 27.04.2003 Rev.1 |
2 |
|
|
3 |
levelw = 20 |
levelw = 20 |
4 |
levelh = 13 |
levelh = 13 |
35 |
elseif c == "W" then |
elseif c == "W" then |
36 |
set_stone("st-oneway",i-1,line, {orientation=enigma.WEST}) |
set_stone("st-oneway",i-1,line, {orientation=enigma.WEST}) |
37 |
elseif c == "q" then |
elseif c == "q" then |
38 |
set_item("it-trigger",i-1,line, {action="openclose", target="door1"}) |
set_item("it-trigger",i-1,line, {action="callback", target="callback1"}) |
|
elseif c == "Q" then |
|
|
set_stone("st-door_b",i-1,line, {name="door1", type="v"}) |
|
39 |
elseif c == "p" then |
elseif c == "p" then |
40 |
set_item("it-trigger",i-1,line, {action="onoff", target="laser"}) |
set_item("it-trigger",i-1,line, {action="callback", target="callback2"}) |
41 |
elseif c == "l" then |
elseif c == "l" then |
42 |
set_attrib(laser(i-1,line, 0, NORTH), "name", "laser") |
set_attrib(laser(i-1,line, 0, NORTH), "name", "laser") |
43 |
elseif c == "m" then |
elseif c == "m" then |
86 |
renderLine(01, " rrrrrroMmfMorrrrrr ") |
renderLine(01, " rrrrrroMmfMorrrrrr ") |
87 |
renderLine(02, " rrrrr########rrrrr ") |
renderLine(02, " rrrrr########rrrrr ") |
88 |
renderLine(03, " rrrrrrr jk rrrrrrr ") |
renderLine(03, " rrrrrrr jk rrrrrrr ") |
89 |
renderLine(04, " rrrrrrr rQ rrrrrrr ") |
renderLine(04, " rrrrrrr rl rrrrrrr ") |
90 |
renderLine(05, " rrrrrrr rl rrrrrrr ") |
renderLine(05, " rrrrrrr rr rrrrrrr ") |
91 |
renderLine(06, " rrrrr E X Ejrrrrr ") |
renderLine(06, " rrrrr E X Ejrrrrr ") |
92 |
renderLine(07, " rr Zr rwtterSrrrrr ") |
renderLine(07, " rr Zr rwtterSrrrrr ") |
93 |
renderLine(08, " rriYr W s HYjrrrrr ") |
renderLine(08, " rriYr W s HYjrrrrr ") |
96 |
renderLine(11, " rrr irrda b qsp ") |
renderLine(11, " rrr irrda b qsp ") |
97 |
renderLine(12, " ") |
renderLine(12, " ") |
98 |
-- 01234567890123456789 |
-- 01234567890123456789 |
99 |
|
|
100 |
|
trigger1 = 0 |
101 |
|
trigger2 = 0 |
102 |
|
|
103 |
|
function triggeraction() |
104 |
|
lasera=enigma.GetNamedObject("laser") |
105 |
|
if trigger1 == 1 and trigger2 == 1 then |
106 |
|
enigma.SendMessage(lasera, "on", nil) |
107 |
|
end |
108 |
|
if trigger1 == 0 and trigger2 == 1 then |
109 |
|
enigma.SendMessage(lasera, "off", nil) |
110 |
|
end |
111 |
|
if trigger1 == 1 and trigger2 == 0 then |
112 |
|
enigma.SendMessage(lasera, "off", nil) |
113 |
|
end |
114 |
|
if trigger1 == 0 and trigger2 == 0 then |
115 |
|
enigma.SendMessage(lasera, "off", nil) |
116 |
|
end |
117 |
|
end |
118 |
|
|
119 |
|
function callback1 (ispressed) |
120 |
|
trigger1=ispressed |
121 |
|
triggeraction() |
122 |
|
end |
123 |
|
|
124 |
|
function callback2 (ispressed) |
125 |
|
trigger2=ispressed |
126 |
|
triggeraction() |
127 |
|
end |
128 |
|
|