Fallout Wiki
Advertisement
Fallout Wiki
Details
Type Decompiled script
SCRIPTS.LST comment Blue Elevator in the Glow.
MSG file GLOBLELV.MSG
Transcript

procedure start;
variable Shocked;
procedure start
begin
        if ((script_action == 21) or (script_action == 3)) then begin
                script_overrides;
                display_msg(message_str(328, 100));
        end
        else begin
                if (script_action == 6) then begin
                        if ((local_var(0) == 0) and (global_var(139) == 2)) then begin
                                script_overrides;
                                set_local_var(1, local_var(1) + 1);
                                Shocked := random(1, 6) - 4 + local_var(1);
                                if (Shocked <= 0) then begin
                                        display_msg(message_str(328, 101));
                                end
                                else begin
                                        if (Shocked == 1) then begin
                                                display_msg(message_str(328, 102));
                                                critter_dmg(dude_obj, Shocked, 0);
                                        end
                                        else begin
                                                display_msg(message_str(328, 103) + Shocked + message_str(328, 104));
                                                critter_dmg(dude_obj, Shocked, 0);
                                        end
                                end
                        end
                end
                else begin
                        if (script_action == 7) then begin
                                if (obj_pid(obj_being_used_with) == 97) then begin
                                        set_local_var(0, 1);
                                        display_msg(message_str(328, 105));
                                end
                                else begin
                                        display_msg(message_str(328, 106));
                                end
                        end
                end
        end
end

Advertisement