Index - FAQ - Cautare - Membres - Groupes - Inregistrare - Messages Privés - Autentificare
GM Castle NPC Script

 
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului E-Comunitate -> Ragnarok Online
Subiectul anterior :: Subiectul urmator  
Autor Mesaj
catalinD
Moderator
Moderator
catalinD

Data inscrierii: 19/Sep/2007
Mesaje: 48

MesajTrimis: 19/09/2007 10:48    Titlul subiectului: GM Castle NPC Script Raspunde cu citat (quote)

Cod:
//GM Castle made by Soul Destroyer

//Entrance
prontera.gat,156,205,0   script   Statue of Odin   111,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "This is the Statue of Odin.";
   next;
   mes "A strange power seems to be coming from the statue...";
   next;
   mes "[Voice]";
   mes "I can sense great authority within you...";
   next;
   mes "[Voice]";
   mes "I have the power to open a portal between this world and the land of the GMs...";
   next;
   mes "[Voice]";
   mes "So, do you like to proceed?";
   next;
   menu "Yes",-,"No",NO;

   mes "[Voice]";
   mes "So be it...";
   next;
   warp "sec_in01.gat",86,21;
   close;
NOTGM:
   mes "This is the Statue of Odin.";
   close;
NO:
   mes "[Voice]";
   mes "So be it...";
   next;
   mes "The voice faded away...";
   close;
}

//Main NPCs
sec_in01.gat,79,36,5   script   Mike   730,{   
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Mike]";
   mes "Welcome GM "+ strcharinfo(0) +" to the GM Castle!";
   next;
   mes "[Mike]";
   mes "Well, do you need anything?";
   next;
   menu "Warp service please...",-,"Save",L_SAVE,"Nothing",L_CLOSE;

   mes "[Mike]";
   mes "Okay, where do you want to go?";
   next;
   menu "Interrogation Room",-,"Jail",Jail,"Garden",L_GARDEN,"Assembly Hall",L_MEET,"No thanks.",L_CLOSE;

   mes "[Mike]";
   mes "Oh, that room where suspected criminals are questioned? Okay I'll warp you there.";
   next;
   warp "sec_in01.gat",33,87;
   close;
Jail:
   mes "Okay I'll warp you right away.";
   next;
   warp "sec_pri.gat",18,22;
   close;
L_SAVE:
   mes "[Mike]";
   mes "Wait there while I register your name in this darn log book...";
   next;
   mes "[Mike]";
   mes "Okay, you're now saved here.";
   savepoint "sec_in01.gat",78,32;
   close;
L_MEET:
   mes "[Mike]";
   mes "Okay then, say hello to Mark for me!";
   next;
   warp "sec_in02.gat",14,172;
   close;
L_GARDEN:
   mes "[Mike]";
   mes "Okay, say hi to Martin for me!";
   next;
   warp "sec_in02.gat",131,162;
   close;
L_CLOSE:
   mes "[Mike]";
   mes "Okay, just talk to me if you need anything.";
   close;
NOTGM:
   mes "[Mike]";
   mes "Hello there citizen. Welcome to the GM castle!";
   close;
}

sec_in01.gat,93,36,5   script   Anna   727,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Anna]";
   mes "Hello, I'm the GM Commands guide.";
   next;
   mes "[Anna]";
   mes "If you want, I can enumerate and explain each functional GM command for you.";
   next;
   mes "[Anna]";
   mes "Unfortunately, I'm still doing some work at the moment, please come back later. Thanks.";
   close;
NOTGM:
   mes "[Anna]";
   mes "Oh hello there! Welcome to the GM castle!";
   close;
}

sec_in02.gat,32,176,4   script   Janitor   86,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Mark]";
   mes "Oh hello GM "+ strcharinfo(0) +"!";
   mes "Would you like to go back?";
   next;
   menu "Yes please.",-,"No thanks, I still have many things to do.",L_NOWARP;

   mes "[Mark]";
   mes "Okay then. Bye!";
   next;
   warp "sec_in01.gat",78,32;
   close;
NOTGM:
   mes "[Mark]";
   mes "Oh what brings you here?";
   next;
   mes "[Mark]";
   mes "If you're lost I can warp you back to the castle...";
   next;
   menu "Yes please.",-,"Maybe later...",L_NOWARP2;

   mes "[Mark]";
   mes "Okay then. Bye!";
   next;
   warp "sec_in01.gat",78,32;
   close;
L_NOWARP2:
   mes "[Mark]";
   mes "Oh, okay. Just don't mess around, the GMs might get mad at you.";
   close;
L_NOWARP:
   mes "[Mark]";
   mes "Oh, I see. Well, good luck on your duties!";
   close;
}

sec_in02.gat,137,174,4   script   Gardener      85,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Martin]";
   mes "Hey there GM "+ strcharinfo(0) +"!";
   mes "Would you like to go back?";
   next;
   menu "Yes please.",-,"No thanks, I'll just rest here for a while.",L_NOWARP;

   mes "[Martin]";
   mes "Okay then, I'll warp you back now.";
   next;
   warp "sec_in01.gat",78,32;
   close;
NOTGM:
   mes "[Martin]";
   mes "What brings you to this wonderful place?";
   next;
   mes "[Martin]";
   mes "If you are lost I can warp you back to the castle.";
   next;
   menu "Yes please.",-,"Maybe later...",L_NOWARP2;

   mes "[Martin]";
   mes "Okay then, I'll warp you back now.";
   next;
   warp "sec_in01.gat",78,32;
   close;
L_NOWARP2:
   mes "[Martin]";
   mes "Okay. Just avoid stepping on the plants.";
   close;
L_NOWARP:
   mes "[Martin]";
   mes "Alright. A GM must rest once in a while anyway.";
   next;
   mes "[Martin]";
   mes "And I've made this garden beautiful for all of you to relax!";
   next;
   mes "[Martin]";
   mes "Okay then, I have still have many things to do.";
   close;
}

//NPCs
sec_in01.gat,37,87,2   script   Guard   105,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Guard]";
   mes "Do you want to go back?";
   next;
   menu "Yes",YES,"No",NO;
   close;
NOTGM:
   mes "[Guard]";
   mes "Oh sorry, but this is the interrogation room. I can't warp you out without permission from a GM.";
   close;
YES:
   warp "sec_in01",78,32;
   close;
NO:
   mes "[Guard]";
   mes "Okay.";
   close;
}

sec_pri.gat,18,17,0   script   Guard   105,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Guard]";
   mes "Do you want to go back?";
   next;
   menu "Yes",YES,"No",NO;
   close;
NOTGM:
   mes "[Guard]";
   mes "Oh sorry, but this is the jail. I can't warp you out without permission from a GM.";
   close;
YES:
   warp "sec_in01",78,32;
   close;
NO:
   mes "[Guard]";
   mes "Okay.";
   close;
}

//Warps that check if you are a GM
sec_in01.gat,84,120,0   script   Entrance   111,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",85,123;
   close;
NOTGM:
   close;
}

sec_in01.gat,87,120,0   script   Exit   111,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",85,117;
   close;
NOTGM:
   mes "[Message]";
   mes "You cannot proceed without permission.";
   close;
}

sec_in01.gat,87,120,0   script   Exit   111,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",85,117;
   close;
NOTGM:
   mes "[Message]";
   mes "You cannot proceed without permission.";
   close;
}

sec_in01.gat,85,133,0   script   Enter Study Hall   111,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",86,149;
   close;
NOTGM:
   mes "[Message]";
   mes "Only GMs can enter the Study Hall.";
   close;
}

sec_in01.gat,99,88,0   script   Enter Cafeteria   723,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",123,88;
   close;
NOTGM:
   mes "[Message]";
   mes "Only GMs can enter the cafeteria.";
   next;
   menu "Conference Room Warp",confe,"Entertainment Room Warp",enter,"Private Dining Room Warp",priv,"Nothing",none;
   close;
confe:
   warp "sec_in01",171,100;
   close;
enter:
   warp "sec_in01",169,162;
   close;
priv:
   warp "sec_in01",176,35;
   close;
none:
   close;
}

sec_in01.gat,168,100,0   script   Enter Cafeteria   723,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",143,97;
   close;
NOTGM:
   mes "[Message]";
   mes "Only GMs can enter the cafeteria.";
   menu "Corridor Warp",corridor,"Entertainment Room Warp",enter,"Private Dining Room Warp",priv,"Nothing",none;
   close;
corridor:
   warp "sec_in01",94,88;
   close;
enter:
   warp "sec_in01",169,162;
   close;
priv:
   warp "sec_in01",176,35;
   close;
none:
   close;
}

sec_in01.gat,169,159,0   script   Enter Cafeteria   723,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",134,111;
   close;
NOTGM:
   mes "[Message]";
   mes "Only GMs can enter the cafeteria.";
   menu "Corridor Warp",corridor,"Conference Room Warp",confe,"Private Dining Room Warp",priv,"Nothing",none;
   close;
corridor:
   warp "sec_in01",94,88;
   close;
confe:
   warp "sec_in01",171,100;
   close;
priv:
   warp "sec_in01",176,35;
   close;
none:
   close;
}

sec_in01.gat,176,38,0   script   Enter Cafeteria   723,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",136,75;
   close;
NOTGM:
   mes "[Message]";
   mes "Only GMs can enter the cafeteria.";
   menu "Corridor Warp",corridor,"Conference Room Warp",confe,"Entertainment Room Warp",enter,"Nothing",none;
   close;
corridor:
   warp "sec_in01",94,88;
   close;
confe:
   warp "sec_in01",171,100;
   close;
enter:
   warp "sec_in01",169,162;
   close;
none:
   close;
}


//To sec_in01...
sec_in02.gat,187,35,0   script   Enter the Castle   723,{
   if(getgmlevel(99)<60) goto NOTGM;
   warp "sec_in01",76,88;
   close;
NOTGM:
   mes "[Message]";
   mes "You cannot enter the castle without permission.";
   next;
   mes "Do you want to go out?";
   menu "Yes",-,"No",NO;

   warp "prontera",150,180;
   close;
NO:
   mes "Nothing happened.";
   close;
}

//To sec_in02...
sec_in01.gat,72,88,6   script   Guard   105,{
   if(getgmlevel(99)<60) goto NOTGM;
   mes "[Guard]";
   mes "Beyond these gates lies the Emperium Training Grounds.";
   next;
   mes "[Guard]";
   mes "Do you want to go in?";
   menu "Yes please.",-,"No thanks.",NO;
   
   mes "[Guard]";
   mes "Okay, you may go in.";
   next;
   warp "sec_in02",184,34;
   close;
NO:
   mes "[Guard]";
   mes "Then go and don't bother me.";
   close;
NOTGM:
   mes "[Guard]";
   mes "Sorry but non-GMs are not allowed to go past this point without permission.";
   close;
}

//Shops
sec_in01.gat,127,94,5   shop   500z Food Shop   91,607:500,562:500,563:500,536:500,517:500

//Warps
sec_in01.gat,86,16,0   warp   gmwarp001   2,2,prontera.gat,150,180
sec_in01.gat,86,43,0   warp   gmwarp002   2,2,sec_in01.gat,86,62
sec_in01.gat,86,58,0   warp   gmwarp003   2,2,sec_in01.gat,86,39
//sec_in01.gat,99,88,0   warp   gmwarp004   2,2,sec_in01.gat,123,88
sec_in01.gat,119,88,0   warp   gmwarp005   2,2,sec_in01.gat,94,88
sec_in01.gat,136,71,0   warp   gmwarp006   2,2,sec_in01.gat,176,35
//sec_in01.gat,176,38,0   warp   gmwarp007   2,2,sec_in01.gat,136,75
sec_in01.gat,147,97,0   warp   gmwarp008   2,2,sec_in01.gat,171,100
//sec_in01.gat,168,100,0   warp   gmwarp009   2,2,sec_in01.gat,143,97
sec_in01.gat,134,115,0   warp   gmwarp010   2,2,sec_in01.gat,169,162
//sec_in01.gat,169,159,0   warp   gmwarp011   2,2,sec_in01.gat,134,111
sec_in01.gat,86,146,0   warp   gmwarp013   2,2,sec_in01.gat,85,130
//sec_in02.gat,187,35,0   warp   gmwarp014   2,2,sec_in01.gat,76,88
//sec_in01.gat,72,88,0   warp   gmwarp015   2,2,sec_in02.gat,184,34

//Emperium Training Grounds - if you don't want it, comment the text, uncomment the last two lines in the warps section and comment the "To sec_in02..." and the "To sec_in01" section...
sec_in02.gat,137,56,4   script   Strong Man   88,{
   mes "[Augustus]";
   mes "Hey there, welcome to the Emperium training grounds!";
   next;
   mes "[Augustus]";
   mes "This place is for you to test your emp-breaking skills!";
   next;
   mes "[Augustus]";
   mes "You can find emperiums around here. There are 4 in total.";
   next;
   mes "[Augustus]";
   mes "We can't afford to buy more than 4, so please try to keep everything in order.";
   next;
   mes "[Augustus]";
   mes "Thank you and have fun!";
   close;
}

//Emperiums
sec_in02.gat,122,42,0,0   monster   Emperium   1288,1,1000,1000,0
sec_in02.gat,154,41,0,0   monster   Emperium   1288,1,1000,1000,0
sec_in02.gat,161,52,0,0   monster   Emperium   1288,1,1000,1000,0
sec_in02.gat,158,63,0,0   monster   Emperium   1288,1,1000,1000,0
Sus
Vezi profilul utilizatorului Trimite mesaj privat
Afiseaza mesajele pentru a le previzualiza:   
Creaza un subiect nou   Raspunde la subiect    Pagina de start a forumului E-Comunitate -> Ragnarok Online Ora este GMT + 3 ore
Pagina 1 din 1

 
Mergi direct la:  
Nu puteti crea un subiect nou in acest forum
Nu puteti raspunde in subiectele acestui forum
Nu puteti modifica mesajele proprii din acest forum
Nu puteti sterge mesajele proprii din acest forum
Nu puteti vota in chestionarele din acest forum


Powered by phpBB
Fa-ti si tu propriul forum GRATUIT, pe www.myforum.ro