LSL1FR/logic.001.src

155 lines
2.7 KiB
Text
Executable file

if (isset(f5)) {
set.horizon(1);
status.line.off();
set(f38);
set(f48);
set(f85);
prevent.input();
v19 = 0;
v10 = 2;
load.sound(21);
load.view(42);
load.view(43);
load.view(44);
load.view(39);
load.view(40);
load.view(41);
load.view(38);
v202 = 2;
v203 = 3;
v204 = 4;
load.pic(v202);
load.pic(v203);
load.pic(v204);
load.pic(v0);
draw.pic(v0);
discard.pic(v0);
animate.obj(o1);
ignore.objs(o1);
set.view(o1,43);
set.loop(o1,0);
position(o1,0,130);
animate.obj(o2);
set.view(o2,39);
set.cel(o2,0);
set.priority(o2,4);
stop.cycling(o2);
step.size(o0,v86);
position(o0,0,160);
set.view(o0,44);
set.loop(o0,0);
sound(21,f52);
v65 = 0;
add.to.pic(42,0,0,4,18,4,4);
add.to.pic(42,0,1,4,36,4,4);
add.to.pic(42,0,2,46,36,4,4);
add.to.pic(42,0,3,11,87,4,4);
v67 = 8;
show.pic();
return();
}
if (isset(f75)) {
reset(f75);
v65++;
if (v65 == 1) {
draw(o1);
move.obj(o1,36,94,2,f75);
}
if (v65 == 2) {
move.obj(o1,136,94,2,f75);
draw(o0);
move.obj(o0,80,160,3,f75);
}
if (v65 == 3) {
if (v26 != 2) {
display(23,3,"Adventure Game Development System");
display(24,4,"(C) 1987 by Sierra On-Line, Inc.");
}
set.loop(o0,2);
fix.loop(o0);
move.obj(o0,149,160,2,f75);
}
if (v65 == 4) {
erase(o1);
}
if (v65 == 5) {
erase(o0);
if (v26 != 2) {
clear.lines(23,24,0);
}
draw.pic(v202);
position(o2,41,94);
draw(o2);
show.pic();
v67 = 8;
}
if (v65 == 6) {
set.cel(o2,1);
reposition.to(o2,41,114);
set.loop(o1,1);
draw(o1);
move.obj(o1,100,94,2,f75);
}
if (v65 == 7) {
move.obj(o1,0,94,2,f75);
set.loop(o0,1);
draw(o0);
move.obj(o0,50,160,3,f75);
}
if (v65 == 8) {
set.loop(o0,3);
fix.loop(o0);
move.obj(o0,0,160,2,f75);
}
if (v65 == 9) {
erase(o1);
}
if (v65 == 10) {
erase(o0);
set.view(o0,0);
erase(o2);
draw.pic(v203);
set.view(o2,40);
set.cel(o2,0);
position(o2,53,80);
draw(o2);
show.pic();
v67 = 9;
}
if (v65 == 11) {
set.cel(o2,1);
reposition.to(o2,65,84);
v67 = 8;
}
if (v65 == 12) {
erase(o2);
draw.pic(v204);
add.to.pic(41,0,0,68,59,4,4);
add.to.pic(41,0,1,25,155,4,4);
show.pic();
v67 = 8;
}
if (v65 == 13) {
draw.pic(v203);
add.to.pic(38,0,0,64,84,4,4);
show.pic();
v67 = 3;
}
if (v65 == 14 &&
!isset(f9)) {
new.room(1);
}
}
if (isset(f52)) {
if (v65 > 13) {
new.room(1);
}
else {
sound(21,f52);
}
}
return();
// Messages
#message 2 "Adventure Game Development System"
#message 3 "(C) 1987 by Sierra On-Line, Inc."