 |
This is the transcript of a script file, which runs certain tasks in the game upon execution. |
|---|
| Details | |
|---|---|
| Type | Decompiled script |
| SCRIPTS.LST comment | Laser beam trap in the Glow. |
| MSG file | LAZRTRAP.MSG |
procedure start;
variable Damage;
procedure start
begin
if (script_action == 2) then begin
if (global_var(139) and global_var(140)) then begin
if (local_var(0) == 0) then begin
set_local_var(0, 1);
Damage := random(1, 6);
float_msg(dude_obj, message_str(336, 100), 0);
if (Damage == 1) then begin
display_msg(message_str(336, 101));
critter_dmg(dude_obj, 1, 0);
end
else begin
display_msg(message_str(336, 102) + Damage + message_str(336, 103));
critter_dmg(dude_obj, Damage, 0);
end
end
end
end
end