 |
This is the transcript of a script file, which runs certain tasks in the game upon execution. |
|---|
| Details | |
|---|---|
| Type | Decompiled script |
| SCRIPTS.LST comment | The generator for the Glow. |
| MSG file | GLOWGEN.MSG |
procedure start;
procedure start
begin
if (script_action == 21) then begin
script_overrides;
display_msg(message_str(301, 100));
end
else begin
if (script_action == 3) then begin
script_overrides;
if (global_var(139) == 2) then begin
display_msg(message_str(301, 101));
end
else begin
display_msg(message_str(301, 102));
end
end
else begin
if (script_action == 8) then begin
if (action_being_used == 13) then begin
script_overrides;
if (has_skill(dude_obj, 13) > 35) then begin
set_local_var(0, 0);
end
if (global_var(139) == 2) then begin
display_msg(message_str(301, 103));
end
else begin
if (local_var(0) == 0) then begin
if (is_success(roll_vs_skill(dude_obj, 13, -10))) then begin
display_msg(message_str(301, 104));
set_global_var(139, 2);
give_exp_points(1000);
display_msg(message_str(766, 103) + "1000" + message_str(766, 104));
end
else begin
if (has_skill(dude_obj, 13) < 35) then begin
set_local_var(0, 1);
end
display_msg(message_str(301, 105));
game_time_advance(game_ticks(1200));
end
end
else begin
if (local_var(0) == 1) then begin
display_msg(message_str(301, 106));
end
end
end
end
end
else begin
if (script_action == 7) then begin
if (obj_pid(obj_being_used_with) == 75) then begin
script_overrides;
if (has_skill(dude_obj, 13) > 35) then begin
set_local_var(0, 0);
end
if (global_var(139) == 2) then begin
display_msg(message_str(301, 103));
end
else begin
if (local_var(0) == 0) then begin
if (is_success(roll_vs_skill(dude_obj, 13, 10))) then begin
display_msg(message_str(301, 104));
set_global_var(139, 2);
display_msg(message_str(766, 103) + "1000" + message_str(766, 104));
give_exp_points(1000);
end
else begin
if (has_skill(dude_obj, 13) < 35) then begin
set_local_var(0, 1);
end
display_msg(message_str(301, 105));
game_time_advance(game_ticks(1200));
end
end
else begin
if (local_var(0) == 1) then begin
display_msg(message_str(301, 106));
end
end
end
end
end
end
end
end
end