//Trigger tile for the kalathor entry
#include <stdlib.inc>
#include <faldon.inc>

#define SCRIPTNAME "jstory37"
#define GSTRING 6
#define NONE 0
#define MIDDONE 25
#define FALDKING 33
#define FALDRDY 34
#define FALDONE 35
#define FALDTWO 36
#define FALDTHREE 37
#define FALDDONE 38
#define FALDHERO 39
#define QUEST "#JuzaStoryQuest"
#define KALA "^KALPART"
#define KALID "^KALID"
#define FID "^KFID"
//FALDKING - talk to the king, FALDRDY - talked to the king must complete >, FALDONE - Find a scroll of banishment from mob drop, FALDTWO - spoke back with the king now must > FALDTHREE Duel with Kalathor
//> FALDDONE - Upgrade 1 item of ur choice to max dura, FALDHERO - Done

forward public trigger(sktid, mapid, x, y, z);

public trigger(sktid, mapid, x, y, z){
scriptname(sktid);

shset(0, QUEST);
new val = gsGetFlag(sktid, 0);
shset(0, FID);
new f = gsGetFlag(0, 0);

if(val == FALDTWO && f == 0){
  shset(0, KALA);
  gsSetFlag(0, 0, 1);
  shset(0, FID);
  gsSetFlag(0, 0, sktid);
  shset(0, "Here goes nothing...");
  gsLocalMessage(sktid, 0, 0);
  gsSetCoords(sktid, 217, 120, 0, 1);
}
else {
  shset(0, "I cannot go in here...");
  gsLocalMessage(sktid, 0, 0);
}
}

scriptname(sktid) {
    if(ism(sktid)) {
        shset(0, "Script: ");
        shappends(0, SCRIPTNAME);
        gsStatusMessage(sktid, 0);
    }
}
ism(sktid) {
    shset(0, "is_moderator");
    return gsGetFlag(sktid, 0) == 1;
}