URL http://paste-bin.com/view/8e0fffaf

View Raw


Untitled

By Voluminous Owl, 1 Month ago, written in php.
  1. ra_temple,107,158,6     script  PVP Warper      808,{
  2. if (getgmlevel() > 65) goto gmbeginmenu;
  3. beginnplayer:
  4. if(Class == 0) goto nonovice;
  5. delwaitingroom;
  6. waitingroom "["+ (getmapusers("pvp_n_1-5")) +"] ["+ (getmapusers("pvp_y_8-1")) +"] ["+ (getmapusers("pvp_y_8-2")) +"] ["+ (getmapusers("pvp_y_8-3")) +"] ["+ (getmapusers("pvp_y_8-4")) +"] ["+ (getmapusers("pvp_y_8-5")) +"]",0;
  7.         mes "[PvP Warper]";
  8.         mes "Hello, ^0000CD"+strcharinfo(0)+"^000000";
  9.         mes "Welcome on the PVP Battle Rooms!";
  10.         mes "Where do you want to battle?";
  11.         mes "     ";
  12.         mes "?What happens in the PvP Room";
  13.         mes "stays in the PvP Room.";
  14.         menu    "- Battle ground ^FF0000["+ (getmapusers("pvp_n_1-5")) +"]^000000",battle,
  15.         "- The Arena",arena,
  16.         "- Guild vs. Guild ^FF0000["+ (getmapusers("pvp_n_2-5")) +"]^000000",gvgor,
  17.         "- Party vs. Party ^FF0000["+getmapusers("pvp_y_1-2")+"]^000000",pavpa;
  18.  
  19.  
  20.  
  21.         battle:
  22.                 if (getgmlevel() > 1) goto leise;
  23.                 if(countitem(607)>0) goto L_Noberry;
  24.                 if(countitem(13517)>0) goto L_Noberry;
  25.                 npctalk ""+strcharinfo(0)+" entered the Battle ground! ";
  26.                 atcommand "@size 3";
  27.                 atcommand "@undisguise";
  28.                 mapannounce "pvp_n_1-5",""+strcharinfo(0)+" ("+PVPKills+" Kills and "+PVPDeaths+" Deaths) entered the Battle Ground!",0;
  29.                 leise:
  30.                 warp "pvp_n_1-5", 0,0;
  31.                 close;
  32.  
  33.         arena:
  34.                 if (getgmlevel() > 1) goto GMundsowas;
  35.                 npctalk ""+strcharinfo(0)+" entered The Arena! ";
  36.                 mapannounce "prt_are01",""+strcharinfo(0)+" ("+PVPKills+" Kills and "+PVPDeaths+" Deaths) entered The Arena!",0;
  37.                 GMundsowas:
  38.                 warp "prt_are01", 0,0;
  39.                 close;
  40.  
  41.         pavpa:
  42.         next;
  43.         mes "[PvP Warper]";
  44.                 if (getcharid(1) == 0) {
  45.                 mes "You're not in a party.";
  46.                 } else if (getpartyleader(getcharid(1),2) != getcharid(0)) {
  47.                 mes "You are not the party leader.";
  48.                 } else {
  49.         getpartymember(getcharid(1));
  50.         if ($@partymembercount < 2) {
  51.                  mes "You need at least 2 party members for me to warp you.";
  52.                 } else {
  53.         warpparty "pvp_y_1-2",0,0, getcharid(1);
  54.         }
  55.         }
  56.         close;
  57.  
  58.  
  59.  
  60.         nonovice:
  61.         mes "[PvP Warper]";
  62.         mes "You are to weak to go in PvP!";
  63.         close;
  64.  
  65.         L_Noberry:
  66.         next;
  67.         mes "[PvP Warper]";
  68.         mes "No Berrys please.";
  69.         close;
  70.  
  71.  
  72.  
  73.  
  74.         gvgor:
  75.         next;
  76.         mes "[PvP Warper]";
  77.         mes "please insert your ^0000CDGuild name^000000";
  78.         input .@guildname$;
  79.         if (.@guildname$!=strcharinfo(2)) {
  80.                 next;
  81.                 mes "[PvP Warper]";
  82.                 mes "Sorry, but I don't think I heard";
  83.                 mes "you correctly";
  84.                 close;
  85.                 }
  86.         next;
  87.         mes "[PvP Warper]";
  88.         mes "Where you want to Begin Battle?";
  89.         menu "North",gvgnorth,"East",gvgeast,"South",gvgsouth,"West",gvgwest;
  90.  
  91.  
  92.  
  93.  
  94. gvgnorth:
  95.         mapannounce "pvp_n_2-5",""+strcharinfo(0)+" of the "+strcharinfo(2)+" Guild has entered the Guild Battle Ground!",0;
  96.         set @glvl, 1;
  97.         warp "pvp_n_2-5", 99,133;
  98.         close;
  99.  
  100. gvgeast:
  101.         mapannounce "pvp_n_2-5",""+strcharinfo(0)+" of the "+strcharinfo(2)+" Guild has entered the Guild Battle Ground!",0;
  102.         set @glvl, 1;
  103.         warp "pvp_n_2-5", 133,99;
  104.         close;
  105.  
  106. gvgsouth:
  107.         mapannounce "pvp_n_2-5",""+strcharinfo(0)+" of the "+strcharinfo(2)+" Guild has entered the Guild Battle Ground!",0;
  108.         set @glvl, 1;
  109.         warp "pvp_n_2-5", 100,65;
  110.         close;
  111.  
  112. gvgwest:
  113.         mapannounce "pvp_n_2-5",""+strcharinfo(0)+" of the "+strcharinfo(2)+" Guild has entered the Guild Battle Ground!",0;
  114.         set @glvl, 1;
  115.         warp "pvp_n_2-5", 66,99;
  116.         close;
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125. gmbeginmenu:
  126.         menu "Normal Player View",beginnplayer,"Warp Player Out of Batlleground",outwarp;
  127.         outwarp:
  128. mapannounce "pvp_n_1-5","I am Sorry..But GM "+strcharinfo(0)+" has warped all players out of this map!",0;
  129. close2;
  130. sleep2 3000;
  131. mapwarp "pvp_n_1-5","prontera",156,184;
  133.  
  134.  
  135. OnPcKillEvent:
  136. if((@glvl == 1)) goto glvln;
  137. set @killer$, rid2name(killedrid);
  138. if (getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"") != 0) goto Cancel;
  139. if (@mapname$ != "pvp_n_1-5") end;
  140. if (strcharinfo(0)==@killer$ || "(null)"==@killer$) {
  141. mapannounce "pvp_n_1-5",""+strcharinfo(0)+" has suicided.",0; }
  142. else {
  143. mapannounce "pvp_n_1-5",""+strcharinfo(0)+" killed "+@killer$+".",0,0x0000FF; }
  144. close;
  145.  
  146. glvln:
  147. set @gglvlt, rand(1,3);
  148. if((@gglvlt == 3)) goto gglvlt;
  150. gglvlt:
  151. atcommand "@glvl +1";
  153.  
  154. OnPcLoginEvent:
  155. set @glvl, 0;
  157.  
  158.  
  159. OnPcDeadEvent:
  160. set @glvl, 0;
  162.  
  163. OnInit:
  164. finalstrikeropresents:
  165. delwaitingroom;
  166. waitingroom "Battleground - "+getmapusers("pvp_n_1-5")+" Player ",0;
  167. sleep2 1000;
  168. delwaitingroom;
  169. waitingroom "Battleground - "+getmapusers("pvp_n_1-5")+" Player ",0;
  170. sleep2 1000;
  171. delwaitingroom;
  172. waitingroom "Battleground - "+getmapusers("pvp_n_1-5")+" Player ",0;
  173. sleep2 1000;
  174. delwaitingroom;
  175. waitingroom "Battleground - "+getmapusers("pvp_n_1-5")+" Player ",0;
  176. sleep2 1000;
  177. delwaitingroom;
  178. waitingroom "Battleground - "+getmapusers("pvp_n_1-5")+" Player ",0;
  179. sleep2 1000;
  180. delwaitingroom;
  181. waitingroom "Guild vs. Guild - "+getmapusers("pvp_n_1-5")+" Player ",0;
  182. sleep2 1000;
  183. delwaitingroom;
  184. waitingroom "Guild vs. Guild - "+getmapusers("pvp_n_1-5")+" Player ",0;
  185. sleep2 1000;
  186. delwaitingroom;
  187. waitingroom "Guild vs. Guild - "+getmapusers("pvp_n_1-5")+" Player ",0;
  188. sleep2 1000;
  189. delwaitingroom;
  190. waitingroom "Party vs. Party "+getmapusers("pvp_y_1-2")+" Player ",0;
  191. sleep2 1000;
  192. delwaitingroom;
  193. waitingroom "Party vs. Party "+getmapusers("pvp_y_1-2")+" Player ",0;
  194. sleep2 1000;
  195. delwaitingroom;
  196. waitingroom "Party vs. Party "+getmapusers("pvp_y_1-2")+" Player ",0;
  197. sleep2 1000;
  198. goto finalstrikeropresents;
  199. }
  200. pvp_n_1-5       mapflag nobranch
  201. pvp_n_1-5       mapflag nomemo
  202. pvp_n_1-5       mapflag nosave  SavePoint
  203. pvp_n_1-5       mapflag noteleport
  204. pvp_n_1-5       mapflag nowarp
  205. pvp_n_1-5       mapflag nowarpto
  206. pvp_n_1-5       mapflag nomvploot
  207. pvp_n_1-5       mapflag loadevent
  208. pvp_n_1-5       mapflag pvp_noparty
  209.  
  210. pvp_n_2-5       mapflag nobranch
  211. pvp_n_2-5       mapflag nomemo
  212. pvp_n_2-5       mapflag nosave  SavePoint
  213. pvp_n_2-5       mapflag noteleport
  214. pvp_n_2-5       mapflag nowarp
  215. pvp_n_2-5       mapflag nowarpto
  216. pvp_n_2-5       mapflag nomvploot
  217. pvp_n_2-5       mapflag loadevent
  218.  
  219. pvp_y_1-2       mapflag nobranch
  220. pvp_y_1-2       mapflag nomemo
  221. pvp_y_1-2       mapflag nosave  SavePoint
  222. pvp_y_1-2       mapflag noteleport
  223. pvp_y_1-2       mapflag nowarp
  224. pvp_y_1-2       mapflag nowarpto
  225. pvp_y_1-2       mapflag nomvploot
  226. pvp_y_1-2       mapflag loadevent
  227.  
  228. prt_are01       mapflag nobranch
  229. prt_are01       mapflag nomemo
  230. prt_are01       mapflag nosave  SavePoint
  231. prt_are01       mapflag noteleport
  232. prt_are01       mapflag nowarp
  233. prt_are01       mapflag nowarpto
  234. prt_are01       mapflag nomvploot
  235. prt_are01       mapflag loadevent
Powered By Stikked created by Ben McRedmond