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;
    }
}