LSL1FR/logic.031.src

206 lines
4.9 KiB
Text
Executable file

if (isset(f5)) {
set.horizon(91);
load.pic(v0);
draw.pic(v0);
discard.pic(v0);
load.view(141);
animate.obj(o1);
ignore.blocks(o1);
ignore.objs(o1);
set.view(o1,141);
set.loop(o1,0);
set.cel(o1,0);
set.priority(o1,12);
position(o1,39,121);
draw(o1);
stop.update(o1);
v200 = 21;
animate.obj(o2);
set.view(o2,141);
set.loop(o2,3);
set.cel(o2,0);
position(o2,113,128);
draw(o2);
stop.update(o2);
v201 = 0;
load.view(139);
add.to.pic(139,0,0,92,116,11,4);
add.to.pic(139,0,0,111,140,13,4);
discard.view(139);
add.to.pic(141,2,0,101,128,11,0);
add.to.pic(141,2,1,138,153,13,0);
add.to.pic(141,2,2,125,153,13,0);
add.to.pic(141,2,3,107,104,11,4);
add.to.pic(141,2,4,123,126,13,4);
add.to.pic(141,2,5,114,105,11,4);
add.to.pic(141,1,0,35,127,13,4);
if (v1 == 35) {
v38 = 75;
v39 = 93;
}
else {
if ((v1 == 37 ||
v1 == 38)) {
v38 = v34;
v39 = v35;
}
else {
v38 = 77;
v39 = 167;
}
}
position.v(o0,v38,v39);
draw(o0);
show.pic();
return();
}
reset(f202);
if ((posn(o0,106,137,140,143) ||
posn(o0,108,153,120,157) ||
posn(o0,89,128,98,133) ||
posn(o0,88,116,98,119))) {
set(f202);
set(f69);
}
reset(f201);
if (posn(o0,18,133,47,154)) {
set(f201);
set(f69);
}
reset(f200);
if (posn(o0,31,121,60,136)) {
set(f200);
set(f69);
}
if (!isset(f2)) {
goto(Label1);
}
if ((said("examine") ||
said("examine","area") ||
said("examine","casino") ||
said("examine","hall"))) {
print("You are in the casino. There are slot machines to the right, and"
"blackjack tables to the left. This place is a gambler's paradise!");
}
if ((said("ask","bouncer") ||
said("ask","blond") ||
said("ask","customers"))) {
if (isset(f201)) {
print("Casino dealers are notoriously silent.");
}
else {
print("Don't interrupt them; they're trying to win.");
}
}
if ((said("examine","bouncer") ||
said("examine","blond") ||
said("examine","customers"))) {
print("They appear to be having a great time. Perhaps you'd like to join them?");
}
if ((said("ask","black jack","bouncer") ||
said("ask","black jack","blond") ||
said("ask","black jack","customers") ||
said("examine","black jack","desk") ||
said("examine","black jack","bouncer") ||
said("examine","black jack","blond") ||
said("examine","black jack","customers"))) {
print("You could, if you'd sit down first.");
}
if ((said("examine","desk") ||
said("examine","black jack") ||
said("examine","black jack","desk"))) {
if (isset(f200)) {
print("The rear blackjack table is rather busy now. Try the front table.");
}
else {
print("The front blackjack table is presently unoccupied.");
}
}
if (said("examine","slot")) {
print("At least one person appears to be winning at the slot machines. Perhaps"
"you could too.");
}
if ((said("bet","bucks") ||
said("play") ||
said("bet","rol"))) {
print("Move to a slot machine and put in some money. Or, find an empty"
"blackjack table and sit down.");
}
if ((said("play","black jack") ||
said("rest") ||
said("rest","bench") ||
said("rest","down"))) {
if (isset(f200)) {
print("The rear blackjack table is rather busy now. Try the front table.");
}
else {
if (!isset(f201)) {
set(f54);
}
else {
set(f67);
v34 = v38;
v35 = v39;
v76 = 38;
}
}
}
if ((said("use","slot") ||
said("move","handle") ||
said("add","bucks","slot") ||
said("add","bucks","machine") ||
said("play","slot"))) {
if (!isset(f202)) {
set(f54);
}
else {
set(f67);
v34 = v38;
v35 = v39;
v76 = 37;
}
}
Label1:
v201--;
if (v201 == 1) {
set.cel(o2,0);
stop.update(o2);
force.update(o2);
random(33,77,v200);
}
if (v201 == 21) {
start.update(o2);
}
v200--;
if (v200 == 1) {
toggle(f203);
if (!isset(f203)) {
set.cel(o1,0);
stop.update(o1);
force.update(o1);
random(55,222,v201);
}
else {
start.update(o1);
random(11,33,v200);
}
}
if (v2 == 3) {
v76 = 32;
}
if (v2 == 1) {
v76 = 35;
}
return();
// Messages
#message 1 "You are in the casino. There are slot machines to the right, and blackjack tables to the left. This place is a gambler's paradise!"
#message 2 "The front blackjack table is presently unoccupied."
#message 3 "The rear blackjack table is rather busy now. Try the front table."
#message 4 "Move to an unoccupied slot machine first."
#message 5 "At least one person appears to be winning at the slot machines. Perhaps you could too."
#message 6 "They appear to be having a great time. Perhaps you'd like to join them?"
#message 7 "Move to a slot machine and put in some money. Or, find an empty blackjack table and sit down."
#message 8 "You could, if you'd sit down first."
#message 9 "Don't interrupt them; they're trying to win."
#message 10 "Casino dealers are notoriously silent."