AIRGRD2.INT

*This image comes from* Fallout Mod *or from websites created and owned by Game publisher or Game developer, who hold the copyright of* Fallout Mod*. All trademarks and registered trademarks present in the image are proprietary to Game publisher.
The use of images to illustrate articles concerning the subject of the images in question is believed to qualify as **fair use** under United States copyright law, as such display does not significantly impede the right of the copyright holder to sell the copyrighted material.*

Template:Scriptfile

Template:Scriptbox

File:Transcript.png
procedure start;

procedure do\_dialogue;

variable HOSTILE;

variable only\_once := 1;

procedure start

begin

        if (only\_once) then begin

                only\_once := 0;

                critter\_add\_trait(self\_obj, 1, 6, 34);

                critter\_add\_trait(self\_obj, 1, 5, 46);

        end

        else begin

                if (script\_action == 14) then begin

                        if (global\_var(245) == 0) then begin

                                set\_global\_var(245, 1);

                        end

                end

                else begin

                        if (script\_action == 11) then begin

                                call do\_dialogue;

                        end

                        else begin

                                if (script\_action == 4) then begin

                                        HOSTILE := 1;

                                end

                        end

                end

        end

        if (script\_action == 12) then begin

                if (HOSTILE) then begin

                        HOSTILE := 0;

                        attack\_complex(dude\_obj, 0, 1, 0, 0, 30000, 0, 0);

                end

        end

        else begin

                if ((script\_action == 21) or (script\_action == 3)) then begin

                        script\_overrides;

                end

                else begin

                        if (script\_action == 18) then begin

                                if (source\_obj == dude\_obj) then begin

                                        if (((global\_var(160) + global\_var(159)) >= 25) and ((global\_var(159) > (2 \* global\_var(160))) or (global\_var(156) == 1))) then begin

                                                set\_global\_var(156, 1);

                                                set\_global\_var(157, 0);

                                        end

                                        if (((global\_var(160) + global\_var(159)) >= 25) and ((global\_var(160) > (3 \* global\_var(159))) or (global\_var(157) == 1))) then begin

                                                set\_global\_var(157, 1);

                                                set\_global\_var(156, 0);

                                        end

                                        set\_global\_var(160, global\_var(160) + 1);

                                        if ((global\_var(160) % 6) == 0) then begin

                                                set\_global\_var(155, global\_var(155) + 1);

                                        end

                                end

                        end

                end

        end

end

procedure do\_dialogue

begin

        float\_msg(self\_obj, message\_str(673, 143), 2);

end