viewing paste Unknown #15566 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
geffen,119,55,0 script  Geffenia Warp   45,1,1,{
OnInit:
        disablenpc "Geffenia Warp";
        end;
 
OnTouch:
        set geffenia_warp,rand(1,4);
        if (geffenia_warp == 1) warp "gefenia01",58,169;
        else if (geffenia_warp == 2) warp "gefenia02",116,115;
        else if (geffenia_warp == 3) warp "gefenia03",130,206;
        else if (geffenia_warp == 4) warp "gefenia04",133,88;
        else warp "geffen",116,115;
        end;
 
OnEnable:
        initnpctimer;
        enablenpc "Geffenia Warp";
        specialeffect EF_MAPPILLAR2;
        end;
 
OnDisable:
        disablenpc "Geffenia Warp";
        end;
 
OnTimer10000:
OnTimer20000:
OnTimer30000:
OnTimer40000:
        specialeffect EF_MAPPILLAR2;
        end;
 
OnTimer45000:
        donpcevent "Geffenia Warp::OnDisable";
        mapannounce "geffen","The portal to Geffenia is now closed.",bc_map,"0x9CFF00";
        stopnpctimer;
        end;
}
 
geffen,119,48,0 script  Fountain#s      111,{
        callfunc "F_UpdateSignVars";
        if (countitem(7025) > 0) {
                mes "^3355FFAs you approach the fountain,";
                mes "a strange light begins to emit from the Lucifer's Lament in your pocket and from something deep within";
                mes "the fountain's water.^000000";
                specialeffect EF_LEVEL99;
                specialeffect2 EF_LEVEL99;
                next;
                switch(select("Throw Lucifer's Lament into the fountain.:Ignore the light.")) {
                case 1:
                        mapannounce "geffen","With a flash of light from Geffen Fountain, the door to Geffenia has opened.",bc_map,"0x9CFF00";
                        mes "^3355FFOnce the Lucifer's Lament";
                        mes "splashes into the water, the";
                        mes "light reveals a peculiar warp";
                        mes "in front of the fountain...^000000";
                        specialeffect EF_MAPPILLAR2;
                        donpcevent "Geffenia Warp::OnEnable";
                        close;
                case 2:
                        mes ".......";
                        close;
                }
        }
        else {
                mes "^3355FFThis is the";
                mes "Geffen Fountain.^000000";
                close;
        }
}
Viewed 462 times, submitted by unknown.