viewing paste Capture the Flag | Athena

Posted on the
  1. //===== rAthena Script =======================================
  2. //= Capture the Flag
  3. //===== Template By: =========================================
  4. //= Ace
  5. //===== Revised By: ==========================================
  6. //= Mysterious
  7. //===== Current Version: =====================================
  8. //= 1.7
  9. //===== Compatible With: =====================================
  10. //= rAthena SVN 
  11. //===== Description: =========================================
  12. //= Capture the Flag event
  13. //===== TODO: ================================================
  14. // - Revise whole script
  15. //===== Additional Comments: =================================
  16. //= v1.0 - First release [Ace]
  17. //= v1.1 - Just fixed credits [Mysterious]
  18. //= v1.2 - Removed a lot of comments and replaced with /* *\ 's [Mysterious]
  19. //= v1.3 - Fixed Setences [Mysterious]
  20. //= v1.4 - Fixed alignments [Mysterious]
  21. //= v1.5 - Fixed Typos and Sentences [Mysterious]
  22. //= v1.6 - Sorta combined all "Settings" into one category  (More easy to read) [Mysterious]
  23. //= v1.7 - Fixed duplicate NPCs and missing end brackets [Mysterious]
  24. //============================================================
  25.  
  26. // ==== Mapflags ==== \\
  27. prt_are01	mapflag	pvp
  28. prt_are01	mapflag	nomemo
  29. prt_are01	mapflag	noreturn
  30. prt_are01	mapflag	restricted	5
  31. pvp_2vs2	mapflag	gvg
  32. pvp_2vs2	mapflag	nomemo
  33. pvp_2vs2	mapflag	noreturn
  34. pvp_2vs2	mapflag	restricted	5
  35. tha_t10	mapflag	pvp
  36. tha_t10	mapflag	nomemo
  37. tha_t10	mapflag	noreturn
  38. tha_t10	mapflag	restricted	5
  39. poring_w02	mapflag	gvg
  40. poring_w02	mapflag	nomemo
  41. poring_w02	mapflag	noreturn
  42. poring_w02	mapflag	restricted	5
  43. pvp_y_7-1	mapflag	pvp
  44. pvp_y_7-1	mapflag	nomemo
  45. pvp_y_7-1	mapflag	noreturn
  46. pvp_y_7-1	mapflag	restricted	5
  47.  
  48. prontera,161,193,6	script	Capture The Flag::CTF	108,{
  49.  
  50. M_begin:
  51.  
  52. // ==== Configuration Settings ==== \\
  53. set @team, 0;
  54. set @heal, 0;
  55. set charhp, Hp;
  56. set charsp, Sp;
  57.  
  58. // What's the dyes the players are wearing?
  59. set hair, getlook(6);
  60. set body, getlook(7);
  61.  
  62. // How many players are currently on the map?
  63. set @mapuser, getmapusers ("prt_are01");
  64. set @hmapuser, getmapusers ("pvp_2vs2");
  65. set @smapuser, getmapusers ("pvp_y_5-2");
  66. set @nmapuser, getmapusers ("tha_t10");
  67. set @gmapuser, getmapusers ("poring_w02");
  68. set @nnmapuser, getmapusers ("pvp_y_7-1");
  69.  
  70. getmapxy(originmap$,originx,originy,0,strcharinfo(0));
  71.  
  72. set @blueteam$, "^0066FFBlue Team^000000";
  73. set @redteam$, "^FF0000Red Team^000000";
  74. // ==== End Configuration Settings ==== \\
  75.  
  76. mes "[Capture The Flag]";
  77. mes "Please select your desired gametype:";
  78.  
  79. menu "Classic CTF "+@mapuser+"/24",M_ctfclassic,"Classic GvG CTF "+@gmapuser+"/24",M_classicgvg,"Hardcore CTF "+@hmapuser+"/24",M_ctfhardcore,"Single Flag CTF "+@smapuser+"/24",M_ctfsingle,"Neutral Flag CTF "+@nmapuser+"/24",M_ctfneutral,"Prontera Neutral Flag "+@nnmapuser+"/24",M_pronteraneutral,"Your Stats",M_pstats,"Player Ranks",M_rank,"Rules",M_rules,"Cancel",-;
  80.  
  81. mes "Please come back when you feel like it!";
  82. close;
  83.  
  84. M_ctfclassic:
  85. next;
  86. mes "[ Classic CTF ]";
  87. if ($@redwin == 1 || $@bluewin == 1)
  88.   {
  89.     mes "";
  90.     mes "Please wait a minute while I clean the battlefield.";
  91.     close2;
  92.     sleep2 45000;
  93.     set $@redwin, 0;
  94.     set $@bluewin, 0;
  95.     end;
  96.   }
  97.  
  98. // If the map is full, no more players are allowed in.
  99. if (@mapuser >= 24)
  100.   {
  101.     goto fullmsgclassic;
  102.   }
  103.  
  104. if ($@redqt < 0)
  105. {
  106. set $@redqt, 0;
  107. }
  108.  
  109. if ($@blueqt < 0)
  110. {
  111. set $@blueqt, 0;
  112. }
  113.  
  114. mes "The "+@redteam$+" has "+$@redqt+"/12 Players.";
  115. mes "The "+@blueteam$+" has "+$@blueqt+"/12 Players.";
  116. mes " ";
  117. mes "Please choose a team:";
  118.  
  119. menu "Blue Team",M_bt,"Red Team",M_rt,"Cancel",-;
  120. close;
  121.  
  122. M_bt:
  123. if ($@blueqt >= 12)
  124. 	{
  125. 	next;
  126. 	mes "The "+@blueteam$+" is full";
  127. 	next;
  128. 	goto M_begin;
  129. 	}
  130.  
  131. mapannounce "prt_are01", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  132. set @team, 1;
  133. set teamname, @blueteam$;
  134. goto okclassic;
  135. end;
  136.  
  137. M_rt:
  138. if ($@redqt >= 12)
  139. 	{
  140. 	next;
  141. 	mes "The "+@redteam$+" is full";
  142. 	next;
  143. 	goto M_begin;
  144. 	}
  145.  
  146. mapannounce "prt_are01", ""+strcharinfo(0)+" has joined the Red Team.",0;
  147. set @team, 2;
  148. set teamname, @redteam$;
  149. goto okclassic;
  150. end;
  151.  
  152. okclassic:
  153.  
  154. set @iclassqt, getarraysize($@classic);
  155. setarray $@classic[@iclassqt], getcharid(3);
  156.  
  157. set colorchange, 1;
  158. set @playing, 1;
  159. set @classic, 1;
  160.  
  161. if (@team == 2)
  162. {
  163. set $@redqt, $@redqt +1;
  164.  
  165. // ======= Red Team ====== \\
  166. */ Remove this and on line 311 if you want to enable
  167. // Changes the player's dyes, warps the player, and saves the player to CTF map
  168. if (Sex == 1)
  169.   {
  170.   if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  171. 		{
  172.   	setlook 6,6;
  173. 		setlook 7,2;
  174.   	}
  175.  
  176. 	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  177.   	{
  178. 		setlook 6,6;
  179.   	setlook 7,1;
  180.   	}
  181.  
  182. 	if (Class == SuperNovice || Class == Job_Paladin)
  183.   	{
  184. 		setlook 6,6;
  185.   	setlook 7,58;
  186. 		}
  187.  
  188. 	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  189.   	{
  190.   	setlook 6,6;
  191.   	setlook 7,146;
  192.   	}
  193.  
  194.   if (Class == Job_High_Priest || Class == Job_Champion)
  195. 		{
  196. 		setlook 6,6;
  197. 		setlook 7,66;
  198.   	}
  199.  
  200.   if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  201.   	{
  202.   	setlook 6,6;
  203. 		setlook 7,42;
  204.   	}
  205.  
  206.   if (Class == Job_Creator)
  207. 		{
  208.   	setlook 6,6;
  209.   	setlook 7,14;
  210. 		}
  211.  
  212. 	if (Class == Job_Sage)
  213. 		{
  214. 		setlook 6,6;
  215. 		setlook 7,18;
  216.   	}
  217.  
  218. 	if (Class == Job_Professor || Class == Job_Mage)
  219. 		{
  220.   	setlook 6,6;
  221. 		setlook 7,39;
  222. 		}
  223.  
  224. 	if (Class == Job_Whitesmith)
  225.   	{
  226.   	setlook 6,6;
  227. 		setlook 7,62;
  228. 		}
  229.  
  230. 	if (Class == Job_Soul_Linker)
  231. 		{
  232. 		setlook 6,6;
  233. 		setlook 7,122;
  234. 		}
  235.  
  236. 	if (Class == Job_Gunslinger)
  237. 		{
  238. 		setlook 6,6;
  239. 		setlook 7,26;
  240. 		}
  241. 	}
  242.  
  243. if (Sex == 0)
  244. 	{
  245. 	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  246. 		{
  247. 		setlook 6,6;
  248. 		setlook 7,2;
  249. 		}
  250.  
  251. 	if (Class == Job_Crusader || Class == Job_Merchant)
  252. 		{
  253. 		setlook 6,6;
  254. 		setlook 7,18;
  255. 		}
  256.  
  257. 	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  258.   	{
  259. 		setlook 6,6;
  260. 		setlook 7,42;
  261. 		}
  262.  
  263. 	if (Class == Job_High_Priest)
  264. 		{
  265. 		setlook 6,6;
  266. 		setlook 7,0;
  267. 		}
  268.  
  269.   if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  270. 		{
  271.   	setlook 6,6;
  272.   	setlook 7,14;
  273.   	}
  274.  
  275. 	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  276. 		{
  277. 		setlook 6,6;
  278.   	setlook 7,66;
  279.   	}
  280.  
  281. 	if (Class == Job_Paladin || Class == Job_Blacksmith)
  282. 		{
  283. 		setlook 6,6;
  284. 		setlook 7,58;
  285.   	}
  286.   if (Class == Job_Dancer)
  287.   	{
  288.   	setlook 6,6;
  289.   	setlook 7,153;
  290.   	}
  291.  
  292. 	if (Class == Job_Gypsy)
  293.   	{
  294.   	setlook 6,6;
  295. 		setlook 7,47;
  296.   	}
  297.  
  298.   if (Class == Job_Stalker)
  299. 		{
  300.   	setlook 6,6;
  301.   	setlook 7,157;
  302.   	}
  303.  
  304.   if (Class == Job_Archer)
  305.   	{
  306. 		setlook 6,6;
  307. 		setlook 7,26;
  308. 		}
  309.  
  310.   if (Class == Job_Gunslinger)
  311.   	{
  312.   	setlook 6,6;
  313.   	setlook 7,26;
  314.   	}
  315.   }
  316. /*
  317. save "prt_are01",268,150;
  318. warp "prt_are01",268,150;
  319. }
  320.  
  321. if (@team == 1)
  322. {
  323. set $@blueqt, $@blueqt +1;
  324.  
  325. // ======= Blue Team ====== \\
  326. */ Remove this and on line 369 if you want to enable
  327. // Changes the player's dyes, warps the player, and saves the player to CTF map
  328. if (Sex == 1)
  329.   {
  330. 	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  331. 		{
  332.   	setlook 6,5;
  333.   	setlook 7,1;
  334. 		}
  335.  
  336.   if (Class == Job_Merchant || Class == Job_Swordsman)
  337.   	{
  338.   	setlook 6,5;
  339. 		setlook 7,2;
  340. 		}
  341.  
  342. 	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  343.   	{
  344.   	setlook 6,5;
  345.   	setlook 7,43;
  346. 		}
  347.   }
  348.  
  349. if (Sex == 0)
  350. 	{
  351. 	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  352. 		{
  353. 		setlook 6,5;
  354.   	setlook 7,1;
  355. 		}
  356.  
  357.   if (Class == Job_Archer)
  358.   	{
  359.   	setlook 6,5;
  360.   	setlook 7,0;
  361.   	}
  362.  
  363. 	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  364.   	{
  365.   	setlook 6,5;
  366. 		setlook 7,43;
  367.   	}
  368.   if (Class == Job_Wizard)
  369. 		{
  370.   	setlook 6,5;
  371. 		setlook 7,67;
  372. 		}
  373. 	}
  374. /*
  375.  
  376. save "prt_are01",30,150;
  377. warp "prt_are01",30,150;
  378. }
  379. percentheal 100,100;
  380. close;
  381.  
  382. fullmsgclassic:
  383. mes "The ^FF0000Red Team^000000 has "+$@redqt+"/12 Players.";
  384. mes "The ^0066FFBlue Team^000000 has "+$@blueqt+"/12 Players.";
  385. mes " ";
  386. mes "Sorry both teams are full try another CTF arena.";
  387. close;
  388. end;
  389.  
  390. M_ctfhardcore:
  391. next;
  392. mes "[Hardcore CTF]";
  393.  
  394. if ($@hredwin == 1 || $@hbluewin == 1)
  395. {
  396. mes "";
  397. mes "Please wait a minute till I clean the battlefield.";
  398. close2;
  399. sleep2 45000;
  400. set $@hredwin, 0;
  401. set $@hbluewin, 0;
  402. end;
  403. }
  404.  
  405. // If the map is full, no more players are allowed in.
  406. if (@hmapuser >= 24)
  407.   {
  408.     goto hfullmsgclassic;
  409.   }
  410.  
  411. if ($@hredqt < 0)
  412. {
  413.   set $@hredqt, 0;
  414. }
  415.  
  416. if ($@hblueqt < 0)
  417. {
  418.   set $@hblueqt, 0;
  419. }
  420.  
  421. mes "The "+@redteam$+" has "+$@hredqt+"/12 Players.";
  422. mes "The "+@blueteam$+" has "+$@hblueqt+"/12 Players.";
  423. mes " ";
  424. mes "What team would you like to join?";
  425.  
  426. menu "Blue Team",M_hbt,"Red Team",M_hrt,"Cancel",-;
  427. close;
  428.  
  429. M_hbt:
  430. if ($@hblueqt >= 12)
  431. 	{
  432. 	next;
  433. 	mes "The "+@blueteam$+" is full";
  434. 	next;
  435. 	goto M_begin;
  436. 	}
  437.  
  438. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  439. set @team, 1;
  440. set teamname, @blueteam$;
  441. goto okhardcore;
  442. end;
  443.  
  444. M_hrt:
  445. if ($@hredqt >= 12)
  446. 	{
  447. 	next;
  448. 	mes "The "+@redteam$+" is full";
  449. 	next;
  450. 	goto M_begin;
  451. 	}
  452.  
  453. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has joined the Red Team.",0;
  454. set @team, 2;
  455. set teamname, @redteam$;
  456. goto okhardcore;
  457. end;
  458.  
  459. okhardcore:
  460.  
  461. set @ihardqt, getarraysize($@hardcore);
  462. setarray $@hardcore[@ihardqt], getcharid(3);
  463.  
  464. set colorchange, 1;
  465. set @playing, 1;
  466. set @hardcore, 1;
  467.  
  468. if (@team == 2)
  469. {
  470. set $@rspawn, $@rspawn + 1;
  471. set $@hredqt, $@hredqt +1;
  472.  
  473. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  474. //if (Sex == 1)
  475. //	{
  476. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  477. //		{
  478. //		setlook 6,6;
  479. //		setlook 7,2;
  480. //		}
  481. //
  482. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  483. //		{
  484. //		setlook 6,6;
  485. //		setlook 7,1;
  486. //		}
  487. //
  488. //	if (Class == SuperNovice || Class == Job_Paladin)
  489. //		{
  490. //		setlook 6,6;
  491. //		setlook 7,58;
  492. //		}
  493. //
  494. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  495. //		{
  496. //		setlook 6,6;
  497. //		setlook 7,146;
  498. //		}
  499. //
  500. //	if (Class == Job_High_Priest || Class == Job_Champion)
  501. //		{
  502. //		setlook 6,6;
  503. //		setlook 7,66;
  504. //		}
  505. //
  506. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  507. //		{
  508. //		setlook 6,6;
  509. //		setlook 7,42;
  510. //		}
  511. //
  512. //	if (Class == Job_Creator)
  513. //		{
  514. //		setlook 6,6;
  515. //		setlook 7,14;
  516. //		}
  517. //
  518. //	if (Class == Job_Sage)
  519. //		{
  520. //		setlook 6,6;
  521. //		setlook 7,18;
  522. //		}
  523. //
  524. //	if (Class == Job_Professor || Class == Job_Mage)
  525. //		{
  526. //		setlook 6,6;
  527. //		setlook 7,39;
  528. //		}
  529. //
  530. //	if (Class == Job_Whitesmith)
  531. //		{
  532. //		setlook 6,6;
  533. //		setlook 7,62;
  534. //		}
  535. //
  536. //	if (Class == Job_Soul_Linker)
  537. //		{
  538. //		setlook 6,6;
  539. //		setlook 7,122;
  540. //		}
  541. //
  542. //	if (Class == Job_Gunslinger)
  543. //		{
  544. //		setlook 6,6;
  545. //		setlook 7,26;
  546. //		}
  547. //	}
  548.  
  549. //if (Sex == 0)
  550. //	{
  551. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  552. //		{
  553. //		setlook 6,6;
  554. //		setlook 7,2;
  555. //		}
  556. //
  557. //	if (Class == Job_Crusader || Class == Job_Merchant)
  558. //		{
  559. //		setlook 6,6;
  560. //		setlook 7,18;
  561. //		}
  562. //
  563. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  564. //		{
  565. //		setlook 6,6;
  566. //		setlook 7,42;
  567. //		}
  568. //
  569. //	if (Class == Job_High_Priest)
  570. //		{
  571. //		setlook 6,6;
  572. //		setlook 7,0;
  573. //		}
  574. //
  575. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  576. //		{
  577. //		setlook 6,6;
  578. //		setlook 7,14;
  579. //		}
  580. //
  581. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  582. //		{
  583. //		setlook 6,6;
  584. //		setlook 7,66;
  585. //		}
  586. //
  587. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  588. //		{
  589. //		setlook 6,6;
  590. //		setlook 7,58;
  591. //		}
  592. //	if (Class == Job_Dancer)
  593. //		{
  594. //		setlook 6,6;
  595. //		setlook 7,153;
  596. //		}
  597. //
  598. //	if (Class == Job_Gypsy)
  599. //		{
  600. //		setlook 6,6;
  601. //		setlook 7,47;
  602. //		}
  603. //
  604. //	if (Class == Job_Stalker)
  605. //		{
  606. //		setlook 6,6;
  607. //		setlook 7,157;
  608. //		}
  609. //
  610. //	if (Class == Job_Archer)
  611. //		{
  612. //		setlook 6,6;
  613. //		setlook 7,26;
  614. //		}
  615. //
  616. //	if (Class == Job_Gunslinger)
  617. //		{
  618. //		setlook 6,6;
  619. //		setlook 7,26;
  620. //		}
  621. //	}
  622.  
  623. 	if ($@rspawn == 1)
  624. 	{
  625. 	set @rspawn, 1;
  626. 	save "pvp_2vs2",65,47;
  627. 	warp "pvp_2vs2",65,47;
  628. 	}
  629.  
  630. 	if ($@rspawn == 2)
  631. 	{
  632. 	set @rspawn, 2;
  633. 	set $@rspawn, 0;
  634. 	save "pvp_2vs2",65,33;
  635. 	warp "pvp_2vs2",65,33;
  636. 	}
  637. }
  638.  
  639. if (@team == 1)
  640. {
  641. set $@bspawn, $@bspawn + 1;
  642. set $@hblueqt, $@hblueqt +1;
  643.  
  644. // "^^color^^"
  645. //if (Sex == 1)
  646. //	{
  647. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  648. //		{
  649. //		setlook 6,5;
  650. //		setlook 7,1;
  651. //		}
  652. //
  653. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  654. //		{
  655. //		setlook 6,5;
  656. //		setlook 7,2;
  657. //		}
  658. //
  659. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  660. //		{
  661. //		setlook 6,5;
  662. //		setlook 7,43;
  663. //		}
  664. //	}
  665.  
  666. //if (Sex == 0)
  667. //	{
  668. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  669. //		{
  670. //		setlook 6,5;
  671. //		setlook 7,1;
  672. //		}
  673. //
  674. //	if (Class == Job_Archer)
  675. //		{
  676. //		setlook 6,5;
  677. //		setlook 7,0;
  678. //		}
  679. //
  680. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  681. //		{
  682. //		setlook 6,5;
  683. //		setlook 7,43;
  684. //		}
  685. //	if (Class == Job_Wizard)
  686. //		{
  687. //		setlook 6,5;
  688. //		setlook 7,67;
  689. //		}
  690. //	}
  691.  
  692. 	if ($@bspawn == 1)
  693. 	{
  694. 	set @bspawn, 1;
  695. 	save "pvp_2vs2",14,47;
  696. 	warp "pvp_2vs2",14,47;
  697. 	}
  698.  
  699. 	if ($@bspawn == 2)
  700. 	{
  701. 	set @bspawn, 2;
  702. 	set $@bspawn, 0;
  703. 	save "pvp_2vs2",14,33;
  704. 	warp "pvp_2vs2",14,33;
  705. 	}
  706. }
  707. percentheal 100,100;
  708. close;
  709.  
  710. hfullmsgclassic:
  711. mes "The ^FF0000Red Team^000000 has "+$@hredqt+"/12 Players.";
  712. mes "The ^0066FFBlue Team^000000 has "+$@hblueqt+"/12 Players.";
  713. mes " ";
  714. mes "Sorry both teams are full try another CTF arena.";
  715. close;
  716.  
  717. close;
  718.  
  719. M_ctfsingle:
  720. next;
  721. mes "[Single Flag CTF]";
  722.  
  723. if ($@sredwin == 1 || $@sbluewin == 1)
  724. {
  725. mes "";
  726. mes "Please wait a minute till I clean the battlefield.";
  727. close2;
  728. sleep2 45000;
  729. set $@sredwin, 0;
  730. set $@sbluewin, 0;
  731. end;
  732. }
  733.  
  734. // If room is full, don't allow anymore players.
  735. if (@smapuser >= 24)
  736.   {
  737.     goto sfullmsgclassic;
  738.   }
  739.  
  740. if ($@sredqt < 0)
  741. {
  742.   set $@sredqt, 0;
  743. }
  744.  
  745. if ($@sblueqt < 0)
  746. {
  747.   set $@sblueqt, 0;
  748. }
  749.  
  750. mes "The "+@redteam$+" has "+$@sredqt+"/12 Players.";
  751. mes "The "+@blueteam$+" has "+$@sblueqt+"/12 Players.";
  752. mes " ";
  753. mes "What team would you like to join?";
  754.  
  755. menu "Blue Team",sbt,"Red Team",srt,"Cancel",-;
  756. close;
  757.  
  758. sbt:
  759. if ($@sblueqt >= 12)
  760. 	{
  761. 	next;
  762. 	mes "The "+@blueteam$+" is full";
  763. 	next;
  764. 	goto M_begin;
  765. 	}
  766.  
  767. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  768. set @team, 1;
  769. set teamname, @blueteam$;
  770. goto oksingle;
  771. end;
  772.  
  773. srt:
  774. if ($@sredqt >= 12)
  775. 	{
  776. 	next;
  777. 	mes "The "+@redteam$+" is full";
  778. 	next;
  779. 	goto M_begin;
  780. 	}
  781.  
  782. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has joined the Red Team.",0;
  783. set @team, 2;
  784. set teamname, @redteam$;
  785. goto oksingle;
  786. end;
  787.  
  788. oksingle:
  789.  
  790. set @isingleqt, getarraysize($@single);
  791. setarray $@single[@isingleqt], getcharid(3);
  792.  
  793. if (@smapuser == 0)
  794. {
  795. set $@boff, 1;
  796. set $@roff, 0;
  797. set $@suddendeath, 0;
  798. setnpctimer 0;
  799. }
  800.  
  801. set colorchange, 1;
  802. set @playing, 1;
  803. set @single, 1;
  804.  
  805. if (@team == 2)
  806. {
  807. set $@single_rspawn, $@single_rspawn + 1;
  808. set $@sredqt, $@sredqt +1;
  809.  
  810. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  811. //if (Sex == 1)
  812. //	{
  813. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  814. //		{
  815. //		setlook 6,6;
  816. //		setlook 7,2;
  817. //		}
  818. //
  819. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  820. //		{
  821. //		setlook 6,6;
  822. //		setlook 7,1;
  823. //		}
  824. //
  825. //	if (Class == SuperNovice || Class == Job_Paladin)
  826. //		{
  827. //		setlook 6,6;
  828. //		setlook 7,58;
  829. //		}
  830. //
  831. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  832. //		{
  833. //		setlook 6,6;
  834. //		setlook 7,146;
  835. //		}
  836. //
  837. //	if (Class == Job_High_Priest || Class == Job_Champion)
  838. //		{
  839. //		setlook 6,6;
  840. //		setlook 7,66;
  841. //		}
  842. //
  843. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  844. //		{
  845. //		setlook 6,6;
  846. //		setlook 7,42;
  847. //		}
  848. //
  849. //	if (Class == Job_Creator)
  850. //		{
  851. //		setlook 6,6;
  852. //		setlook 7,14;
  853. //		}
  854. //
  855. //	if (Class == Job_Sage)
  856. //		{
  857. //		setlook 6,6;
  858. //		setlook 7,18;
  859. //		}
  860. //
  861. //	if (Class == Job_Professor || Class == Job_Mage)
  862. //		{
  863. //		setlook 6,6;
  864. //		setlook 7,39;
  865. //		}
  866. //
  867. //	if (Class == Job_Whitesmith)
  868. //		{
  869. //		setlook 6,6;
  870. //		setlook 7,62;
  871. //		}
  872. //
  873. //	if (Class == Job_Soul_Linker)
  874. //		{
  875. //		setlook 6,6;
  876. //		setlook 7,122;
  877. //		}
  878. //
  879. //	if (Class == Job_Gunslinger)
  880. //		{
  881. //		setlook 6,6;
  882. //		setlook 7,26;
  883. //		}
  884. //	}
  885.  
  886. //if (Sex == 0)
  887. //	{
  888. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  889. //		{
  890. //		setlook 6,6;
  891. //		setlook 7,2;
  892. //		}
  893. //
  894. //	if (Class == Job_Crusader || Class == Job_Merchant)
  895. //		{
  896. //		setlook 6,6;
  897. //		setlook 7,18;
  898. //		}
  899. //
  900. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  901. //		{
  902. //		setlook 6,6;
  903. //		setlook 7,42;
  904. //		}
  905. //
  906. //	if (Class == Job_High_Priest)
  907. //		{
  908. //		setlook 6,6;
  909. //		setlook 7,0;
  910. //		}
  911. //
  912. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  913. //		{
  914. //		setlook 6,6;
  915. //		setlook 7,14;
  916. //		}
  917. //
  918. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  919. //		{
  920. //		setlook 6,6;
  921. //		setlook 7,66;
  922. //		}
  923. //
  924. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  925. //		{
  926. //		setlook 6,6;
  927. //		setlook 7,58;
  928. //		}
  929. //	if (Class == Job_Dancer)
  930. //		{
  931. //		setlook 6,6;
  932. //		setlook 7,153;
  933. //		}
  934. //
  935. //	if (Class == Job_Gypsy)
  936. //		{
  937. //		setlook 6,6;
  938. //		setlook 7,47;
  939. //		}
  940. //
  941. //	if (Class == Job_Stalker)
  942. //		{
  943. //		setlook 6,6;
  944. //		setlook 7,157;
  945. //		}
  946. //
  947. //	if (Class == Job_Archer)
  948. //		{
  949. //		setlook 6,6;
  950. //		setlook 7,26;
  951. //		}
  952. //
  953. //	if (Class == Job_Gunslinger)
  954. //		{
  955. //		setlook 6,6;
  956. //		setlook 7,26;
  957. //		}
  958. //	}
  959.  
  960. 	if ($@single_rspawn == 1)
  961. 	{
  962. 	set @single_rspawn, 1;
  963. 	save "pvp_y_5-2",205,122;
  964. 	warp "pvp_y_5-2",205,122;
  965. 	}
  966.  
  967. 	if ($@single_rspawn == 2)
  968. 	{
  969. 	set @single_rspawn, 2;
  970. 	set $@single_rspawn, 0;
  971. 	save "pvp_y_5-2",205,137;
  972. 	warp "pvp_y_5-2",205,137;
  973. 	}
  974. }
  975.  
  976. if (@team == 1)
  977. {
  978. set $@single_bspawn, $@single_bspawn + 1;
  979. set $@sblueqt, $@sblueqt +1;
  980. setlook 6,5;
  981.  
  982. // "^^color^^"
  983. //if (Sex == 1)
  984. //	{
  985. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  986. //		{
  987. //		setlook 6,5;
  988. //		setlook 7,1;
  989. //		}
  990. //
  991. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  992. //		{
  993. //		setlook 6,5;
  994. //		setlook 7,2;
  995. //		}
  996. //
  997. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  998. //		{
  999. //		setlook 6,5;
  1000. //		setlook 7,43;
  1001. //		}
  1002. //	}
  1003.  
  1004. //if (Sex == 0)
  1005. //	{
  1006. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  1007. //		{
  1008. //		setlook 6,5;
  1009. //		setlook 7,1;
  1010. //		}
  1011. //
  1012. //	if (Class == Job_Archer)
  1013. //		{
  1014. //		setlook 6,5;
  1015. //		setlook 7,0;
  1016. //		}
  1017. //
  1018. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  1019. //		{
  1020. //		setlook 6,5;
  1021. //		setlook 7,43;
  1022. //		}
  1023. //	if (Class == Job_Wizard)
  1024. //		{
  1025. //		setlook 6,5;
  1026. //		setlook 7,67;
  1027. //		}
  1028. //	}
  1029.  
  1030. 	if ($@single_bspawn == 1)
  1031. 	{
  1032. 	set @single_bspawn, 1;
  1033. 	save "pvp_y_5-2",58,137;
  1034. 	warp "pvp_y_5-2",58,137;
  1035. 	}
  1036.  
  1037. 	if ($@single_bspawn == 2)
  1038. 	{
  1039. 	set @single_bspawn, 2;
  1040. 	set $@single_bspawn, 0;
  1041. 	save "pvp_y_5-2",58,122;
  1042. 	warp "pvp_y_5-2",58,122;
  1043. 	}
  1044. }
  1045. percentheal 100,100;
  1046. close;
  1047.  
  1048. OnRoundStart:
  1049.  
  1050. OnInit:
  1051. startnpctimer;
  1052. set $@nearend, 0;
  1053. set $@suddendeath, 0;
  1054. set $@roundover, 0;
  1055. end;
  1056.  
  1057. OnSuddenDeath:
  1058. if ($@suddendeath == 1)
  1059. 	{
  1060. 	mapannounce "pvp_y_5-2", "Sudden Death!!",0;
  1061. 	setnpctimer 174000;
  1062. 	stopnpctimer;
  1063. 	}
  1064.  
  1065. if (($@suddendeath == 0) && ($@nearend == 1))
  1066. 	{
  1067. 	setnpctimer 174000;
  1068. 	startnpctimer;
  1069. 	}
  1070. end;
  1071.  
  1072. OnTimer4000:
  1073. if ($@roff == 1)
  1074. 	{
  1075. 	set $@roundover, 0;
  1076. 	mapannounce "pvp_y_5-2", "The Red Team is on Offense.",0;
  1077. 	}
  1078.  
  1079. if ($@boff == 1)
  1080. 	{
  1081. 	set $@roundover, 0;
  1082. 	mapannounce "pvp_y_5-2", "The Blue Team is on Offense.",0;
  1083. 	}
  1084. end;
  1085.  
  1086. OnTimer60000:
  1087. mapannounce "pvp_y_5-2", "2 minutes remaining!",0;
  1088. end;
  1089.  
  1090. OnTimer120000:
  1091. mapannounce "pvp_y_5-2", "1 minute remaining!",0;
  1092. end;
  1093.  
  1094. OnTimer173000:
  1095. set $@nearend, 1;
  1096. end;
  1097.  
  1098. OnTimer174000:
  1099. if ($@suddendeath == 1)
  1100. 	{
  1101. 	goto OnSuddenDeath;
  1102. 	}
  1103. end;
  1104.  
  1105. OnTimer175000:
  1106. mapannounce "pvp_y_5-2", "5",0;
  1107. if ($@suddendeath == 1)
  1108. 	{
  1109. 	goto OnSuddenDeath;
  1110. 	}
  1111. end;
  1112.  
  1113. OnTimer176000:
  1114. mapannounce "pvp_y_5-2", "4",0;
  1115. if ($@suddendeath == 1)
  1116. 	{
  1117. 	goto OnSuddenDeath;
  1118. 	}
  1119. end;
  1120.  
  1121. OnTimer177000:
  1122. mapannounce "pvp_y_5-2", "3",0;
  1123. if ($@suddendeath == 1)
  1124. 	{
  1125. 	goto OnSuddenDeath;
  1126. 	}
  1127. end;
  1128.  
  1129. OnTimer178000:
  1130. mapannounce "pvp_y_5-2", "2",0;
  1131. if ($@suddendeath == 1)
  1132. 	{
  1133. 	goto OnSuddenDeath;
  1134. 	}
  1135. end;
  1136.  
  1137. OnTimer179000:
  1138. mapannounce "pvp_y_5-2", "1",0;
  1139. if ($@suddendeath == 1)
  1140. 	{
  1141. 	goto OnSuddenDeath;
  1142. 	}
  1143. end;
  1144.  
  1145. OnTimer180000:
  1146. if ($@suddendeath == 1)
  1147. 	{
  1148. 	goto OnSuddenDeath;
  1149. 	end;
  1150. 	}
  1151.  
  1152. mapannounce "pvp_y_5-2", "Round Over!!",0;
  1153. if ($@suddendeath != 1)
  1154. 	{
  1155. 	goto OnEventRoundOver;
  1156. 	}
  1157. end;
  1158.  
  1159. OnEventRoundOver:
  1160. maprespawnguildid "pvp_y_5-2",0,7;
  1161. movenpc "single_blue_flag",53,130;
  1162. movenpc "single_red_flag",210,130;
  1163. set $@sredcarrier$, "-";
  1164. set $@sbluecarrier$, "-";
  1165. set $@rresett, 1;
  1166. set $@bresett, 1;
  1167. set $@sbluedropped, 0;
  1168. set $@sbluegone, 0;
  1169. set $@sredgone, 0;
  1170. set $@sreddropped, 0;
  1171. set $@roundover, 0;
  1172. setnpctimer 0;
  1173. stopnpctimer;
  1174.  
  1175. if ($@roff == 1)
  1176. 	{
  1177. 	set $@roff, 0;
  1178. 	set $@boff, 1;
  1179. 	goto OnRoundStart;
  1180. 	}
  1181.  
  1182. if ($@boff == 1)
  1183. 	{
  1184. 	set $@roff, 1;
  1185. 	set $@boff, 0;
  1186. 	goto OnRoundStart;
  1187. 	}
  1188.  
  1189. end;
  1190.  
  1191. sfullmsgclassic:
  1192. mes "The ^FF0000Red Team^000000 has "+$@sredqt+"/12 Players.";
  1193. mes "The ^0066FFBlue Team^000000 has "+$@sblueqt+"/12 Players.";
  1194. mes " ";
  1195. mes "Sorry both teams are full try another CTF arena.";
  1196. close;
  1197. end;
  1198.  
  1199. M_ctfneutral:
  1200.  
  1201. next;
  1202. mes "[Neutral Flag CTF]";
  1203.  
  1204. if ($@nredwin == 1 || $@nbluewin == 1)
  1205. {
  1206. mes "";
  1207. mes "Please wait a minute while I clean the battlefield.";
  1208. close2;
  1209.  
  1210. sleep2 45000;
  1211.  
  1212. set $@nredwin, 0;
  1213. set $@nbluewin, 0;
  1214. end;
  1215. }
  1216.  
  1217. //makes player unable to join the game due to full room
  1218. if (@nmapuser >= 24)
  1219. {
  1220. goto nfullmsgclassic;
  1221. }
  1222.  
  1223. if ($@nredqt < 0)
  1224. {
  1225. set $@nredqt, 0;
  1226. }
  1227.  
  1228. if ($@nblueqt < 0)
  1229. {
  1230. set $@nblueqt, 0;
  1231. }
  1232.  
  1233. mes "The "+@redteam$+" has "+$@nredqt+"/12 Players.";
  1234. mes "The "+@blueteam$+" has "+$@nblueqt+"/12 Players.";
  1235. mes " ";
  1236. mes "What team would you like to join?";
  1237.  
  1238. menu "Blue Team",nbt,"Red Team",nrt,"Cancel",-;
  1239. close;
  1240.  
  1241. nbt:
  1242. if ($@nblueqt >= 12)
  1243. 	{
  1244. 	next;
  1245. 	mes "The "+@blueteam$+" is full";
  1246. 	next;
  1247. 	goto M_begin;
  1248. 	}
  1249.  
  1250. mapannounce "tha_t10", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  1251. set @team, 1;
  1252. set teamname, @blueteam$;
  1253. goto okneutral;
  1254. end;
  1255.  
  1256. nrt:
  1257. if ($@nredqt >= 12)
  1258. 	{
  1259. 	next;
  1260. 	mes "The "+@redteam$+" is full";
  1261. 	next;
  1262. 	goto M_begin;
  1263. 	}
  1264.  
  1265. mapannounce "tha_t10", ""+strcharinfo(0)+" has joined the Red Team.",0;
  1266. set @team, 2;
  1267. set teamname, @redteam$;
  1268. goto okneutral;
  1269. end;
  1270.  
  1271. okneutral:
  1272.  
  1273. set @ineutralqt, getarraysize($@neutral);
  1274. setarray $@neutral[@ineutralqt], getcharid(3);
  1275.  
  1276. set colorchange, 1;
  1277. set @playing, 1;
  1278. set @neutral, 1;
  1279.  
  1280. if (@team == 2)
  1281. {
  1282. set $@nredqt, $@nredqt +1;
  1283.  
  1284. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  1285. //if (Sex == 1)
  1286. //	{
  1287. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  1288. //		{
  1289. //		setlook 6,6;
  1290. //		setlook 7,2;
  1291. //		}
  1292. //
  1293. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  1294. //		{
  1295. //		setlook 6,6;
  1296. //		setlook 7,1;
  1297. //		}
  1298. //
  1299. //	if (Class == SuperNovice || Class == Job_Paladin)
  1300. //		{
  1301. //		setlook 6,6;
  1302. //		setlook 7,58;
  1303. //		}
  1304. //
  1305. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  1306. //		{
  1307. //		setlook 6,6;
  1308. //		setlook 7,146;
  1309. //		}
  1310. //
  1311. //	if (Class == Job_High_Priest || Class == Job_Champion)
  1312. //		{
  1313. //		setlook 6,6;
  1314. //		setlook 7,66;
  1315. //		}
  1316. //
  1317. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  1318. //		{
  1319. //		setlook 6,6;
  1320. //		setlook 7,42;
  1321. //		}
  1322. //
  1323. //	if (Class == Job_Creator)
  1324. //		{
  1325. //		setlook 6,6;
  1326. //		setlook 7,14;
  1327. //		}
  1328. //
  1329. //	if (Class == Job_Sage)
  1330. //		{
  1331. //		setlook 6,6;
  1332. //		setlook 7,18;
  1333. //		}
  1334. //
  1335. //	if (Class == Job_Professor || Class == Job_Mage)
  1336. //		{
  1337. //		setlook 6,6;
  1338. //		setlook 7,39;
  1339. //		}
  1340. //
  1341. //	if (Class == Job_Whitesmith)
  1342. //		{
  1343. //		setlook 6,6;
  1344. //		setlook 7,62;
  1345. //		}
  1346. //
  1347. //	if (Class == Job_Soul_Linker)
  1348. //		{
  1349. //		setlook 6,6;
  1350. //		setlook 7,122;
  1351. //		}
  1352. //
  1353. //	if (Class == Job_Gunslinger)
  1354. //		{
  1355. //		setlook 6,6;
  1356. //		setlook 7,26;
  1357. //		}
  1358. //	}
  1359.  
  1360. //if (Sex == 0)
  1361. //	{
  1362. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  1363. //		{
  1364. //		setlook 6,6;
  1365. //		setlook 7,2;
  1366. //		}
  1367. //
  1368. //	if (Class == Job_Crusader || Class == Job_Merchant)
  1369. //		{
  1370. //		setlook 6,6;
  1371. //		setlook 7,18;
  1372. //		}
  1373. //
  1374. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  1375. //		{
  1376. //		setlook 6,6;
  1377. //		setlook 7,42;
  1378. //		}
  1379. //
  1380. //	if (Class == Job_High_Priest)
  1381. //		{
  1382. //		setlook 6,6;
  1383. //		setlook 7,0;
  1384. //		}
  1385. //
  1386. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  1387. //		{
  1388. //		setlook 6,6;
  1389. //		setlook 7,14;
  1390. //		}
  1391. //
  1392. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  1393. //		{
  1394. //		setlook 6,6;
  1395. //		setlook 7,66;
  1396. //		}
  1397. //
  1398. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  1399. //		{
  1400. //		setlook 6,6;
  1401. //		setlook 7,58;
  1402. //		}
  1403. //	if (Class == Job_Dancer)
  1404. //		{
  1405. //		setlook 6,6;
  1406. //		setlook 7,153;
  1407. //		}
  1408. //
  1409. //	if (Class == Job_Gypsy)
  1410. //		{
  1411. //		setlook 6,6;
  1412. //		setlook 7,47;
  1413. //		}
  1414. //
  1415. //	if (Class == Job_Stalker)
  1416. //		{
  1417. //		setlook 6,6;
  1418. //		setlook 7,157;
  1419. //		}
  1420. //
  1421. //	if (Class == Job_Archer)
  1422. //		{
  1423. //		setlook 6,6;
  1424. //		setlook 7,26;
  1425. //		}
  1426. //
  1427. //	if (Class == Job_Gunslinger)
  1428. //		{
  1429. //		setlook 6,6;
  1430. //		setlook 7,26;
  1431. //		}
  1432. //	}
  1433.  
  1434. save "tha_t10",90,156;
  1435. warp "tha_t10",90,156;
  1436. }
  1437.  
  1438. if (@team == 1)
  1439. {
  1440. set $@nblueqt, $@nblueqt +1;
  1441.  
  1442. // "^^color^^"
  1443. //if (Sex == 1)
  1444. //	{
  1445. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  1446. //		{
  1447. //		setlook 6,5;
  1448. //		setlook 7,1;
  1449. //		}
  1450. //
  1451. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  1452. //		{
  1453. //		setlook 6,5;
  1454. //		setlook 7,2;
  1455. //		}
  1456. //
  1457. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  1458. //		{
  1459. //		setlook 6,5;
  1460. //		setlook 7,43;
  1461. //		}
  1462. //	}
  1463.  
  1464. //if (Sex == 0)
  1465. //	{
  1466. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  1467. //		{
  1468. //		setlook 6,5;
  1469. //		setlook 7,1;
  1470. //		}
  1471. //
  1472. //	if (Class == Job_Archer)
  1473. //		{
  1474. //		setlook 6,5;
  1475. //		setlook 7,0;
  1476. //		}
  1477. //
  1478. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  1479. //		{
  1480. //		setlook 6,5;
  1481. //		setlook 7,43;
  1482. //		}
  1483. //	if (Class == Job_Wizard)
  1484. //		{
  1485. //		setlook 6,5;
  1486. //		setlook 7,67;
  1487. //		}
  1488. //	}
  1489.  
  1490. save "tha_t10",167,100;
  1491. warp "tha_t10",167,100;
  1492. }
  1493. percentheal 100,100;
  1494. close;
  1495.  
  1496. nfullmsgclassic:
  1497. mes "The ^FF0000Red Team^000000 has "+$@nredqt+"/12 Players.";
  1498. mes "The ^0066FFBlue Team^000000 has "+$@nblueqt+"/12 Players.";
  1499. mes " ";
  1500. mes "Sorry both teams are full try another CTF arena.";
  1501. close;
  1502. end;
  1503.  
  1504. M_classicgvg:
  1505.  
  1506. next;
  1507. mes "[Classic GvG CTF]";
  1508.  
  1509. //makes player unable to join the game due to full room
  1510. if (@gmapuser >= 24)
  1511. {
  1512. goto hfullmsgclassic;
  1513. }
  1514.  
  1515. if ($@gredqt < 0)
  1516. {
  1517. set $@gredqt, 0;
  1518. }
  1519.  
  1520. if ($@gblueqt < 0)
  1521. {
  1522. set $@gblueqt, 0;
  1523. }
  1524.  
  1525. mes "The "+@redteam$+" has "+$@gredqt+"/12 Players.";
  1526. mes "The "+@blueteam$+" has "+$@gblueqt+"/12 Players.";
  1527. mes " ";
  1528. mes "What team would you like to join?";
  1529.  
  1530. menu "Blue Team",gbt,"Red Team",grt,"Cancel",-;
  1531. close;
  1532.  
  1533. gbt:
  1534. if ($@gblueqt >= 12)
  1535. 	{
  1536. 	next;
  1537. 	mes "The "+@blueteam$+" is full";
  1538. 	next;
  1539. 	goto M_begin;
  1540. 	}
  1541.  
  1542. mapannounce "poring_w02", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  1543. set @team, 1;
  1544. set teamname, @blueteam$;
  1545. goto okclassicgvg;
  1546. end;
  1547.  
  1548. grt:
  1549. if ($@gredqt >= 12)
  1550. 	{
  1551. 	next;
  1552. 	mes "The "+@redteam$+" is full";
  1553. 	next;
  1554. 	goto M_begin;
  1555. 	}
  1556.  
  1557. mapannounce "poring_w02", ""+strcharinfo(0)+" has joined the Red Team.",0;
  1558. set @team, 2;
  1559. set teamname, @redteam$;
  1560. goto okclassicgvg;
  1561. end;
  1562.  
  1563. okclassicgvg:
  1564.  
  1565. set @iclassgvgqt, getarraysize($@classicgvg);
  1566. setarray $@classicgvg[@iclassgvgqt], getcharid(3);
  1567.  
  1568. set colorchange, 1;
  1569. set @playing, 1;
  1570. set @classicgvg, 1;
  1571.  
  1572. if (@team == 2)
  1573. {
  1574. set $@gredqt, $@gredqt +1;
  1575.  
  1576. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  1577. //if (Sex == 1)
  1578. //	{
  1579. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  1580. //		{
  1581. //		setlook 6,6;
  1582. //		setlook 7,2;
  1583. //		}
  1584. //
  1585. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  1586. //		{
  1587. //		setlook 6,6;
  1588. //		setlook 7,1;
  1589. //		}
  1590. //
  1591. //	if (Class == SuperNovice || Class == Job_Paladin)
  1592. //		{
  1593. //		setlook 6,6;
  1594. //		setlook 7,58;
  1595. //		}
  1596. //
  1597. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  1598. //		{
  1599. //		setlook 6,6;
  1600. //		setlook 7,146;
  1601. //		}
  1602. //
  1603. //	if (Class == Job_High_Priest || Class == Job_Champion)
  1604. //		{
  1605. //		setlook 6,6;
  1606. //		setlook 7,66;
  1607. //		}
  1608. //
  1609. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  1610. //		{
  1611. //		setlook 6,6;
  1612. //		setlook 7,42;
  1613. //		}
  1614. //
  1615. //	if (Class == Job_Creator)
  1616. //		{
  1617. //		setlook 6,6;
  1618. //		setlook 7,14;
  1619. //		}
  1620. //
  1621. //	if (Class == Job_Sage)
  1622. //		{
  1623. //		setlook 6,6;
  1624. //		setlook 7,18;
  1625. //		}
  1626. //
  1627. //	if (Class == Job_Professor || Class == Job_Mage)
  1628. //		{
  1629. //		setlook 6,6;
  1630. //		setlook 7,39;
  1631. //		}
  1632. //
  1633. //	if (Class == Job_Whitesmith)
  1634. //		{
  1635. //		setlook 6,6;
  1636. //		setlook 7,62;
  1637. //		}
  1638. //
  1639. //	if (Class == Job_Soul_Linker)
  1640. //		{
  1641. //		setlook 6,6;
  1642. //		setlook 7,122;
  1643. //		}
  1644. //
  1645. //	if (Class == Job_Gunslinger)
  1646. //		{
  1647. //		setlook 6,6;
  1648. //		setlook 7,26;
  1649. //		}
  1650. //	}
  1651.  
  1652. //if (Sex == 0)
  1653. //	{
  1654. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  1655. //		{
  1656. //		setlook 6,6;
  1657. //		setlook 7,2;
  1658. //		}
  1659. //
  1660. //	if (Class == Job_Crusader || Class == Job_Merchant)
  1661. //		{
  1662. //		setlook 6,6;
  1663. //		setlook 7,18;
  1664. //		}
  1665. //
  1666. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  1667. //		{
  1668. //		setlook 6,6;
  1669. //		setlook 7,42;
  1670. //		}
  1671. //
  1672. //	if (Class == Job_High_Priest)
  1673. //		{
  1674. //		setlook 6,6;
  1675. //		setlook 7,0;
  1676. //		}
  1677. //
  1678. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  1679. //		{
  1680. //		setlook 6,6;
  1681. //		setlook 7,14;
  1682. //		}
  1683. //
  1684. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  1685. //		{
  1686. //		setlook 6,6;
  1687. //		setlook 7,66;
  1688. //		}
  1689. //
  1690. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  1691. //		{
  1692. //		setlook 6,6;
  1693. //		setlook 7,58;
  1694. //		}
  1695. //	if (Class == Job_Dancer)
  1696. //		{
  1697. //		setlook 6,6;
  1698. //		setlook 7,153;
  1699. //		}
  1700. //
  1701. //	if (Class == Job_Gypsy)
  1702. //		{
  1703. //		setlook 6,6;
  1704. //		setlook 7,47;
  1705. //		}
  1706. //
  1707. //	if (Class == Job_Stalker)
  1708. //		{
  1709. //		setlook 6,6;
  1710. //		setlook 7,157;
  1711. //		}
  1712. //
  1713. //	if (Class == Job_Archer)
  1714. //		{
  1715. //		setlook 6,6;
  1716. //		setlook 7,26;
  1717. //		}
  1718. //
  1719. //	if (Class == Job_Gunslinger)
  1720. //		{
  1721. //		setlook 6,6;
  1722. //		setlook 7,26;
  1723. //		}
  1724. //	}
  1725.  
  1726. save "poring_w02",170,176;
  1727. warp "poring_w02",170,176;
  1728. }
  1729.  
  1730. if (@team == 1)
  1731. {
  1732. set $@gblueqt, $@gblueqt +1;
  1733. setlook 6,5;
  1734.  
  1735. // "^^color^^"
  1736. //if (Sex == 1)
  1737. //	{
  1738. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  1739. //		{
  1740. //		setlook 6,5;
  1741. //		setlook 7,1;
  1742. //		}
  1743. //
  1744. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  1745. //		{
  1746. //		setlook 6,5;
  1747. //		setlook 7,2;
  1748. //		}
  1749. //
  1750. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  1751. //		{
  1752. //		setlook 6,5;
  1753. //		setlook 7,43;
  1754. //		}
  1755. //	}
  1756.  
  1757. //if (Sex == 0)
  1758. //	{
  1759. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  1760. //		{
  1761. //		setlook 6,5;
  1762. //		setlook 7,1;
  1763. //		}
  1764. //
  1765. //	if (Class == Job_Archer)
  1766. //		{
  1767. //		setlook 6,5;
  1768. //		setlook 7,0;
  1769. //		}
  1770. //
  1771. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  1772. //		{
  1773. //		setlook 6,5;
  1774. //		setlook 7,43;
  1775. //		}
  1776. //	if (Class == Job_Wizard)
  1777. //		{
  1778. //		setlook 6,5;
  1779. //		setlook 7,67;
  1780. //		}
  1781. //	}
  1782.  
  1783. save "poring_w02",26,176;
  1784. warp "poring_w02",26,176;
  1785. }
  1786. percentheal 100,100;
  1787. close;
  1788.  
  1789. gfullmsgclassic:
  1790. mes "The ^FF0000Red Team^000000 has "+$@gredqt+"/12 Players.";
  1791. mes "The ^0066FFBlue Team^000000 has "+$@gblueqt+"/12 Players.";
  1792. mes " ";
  1793. mes "Sorry both teams are full try another CTF arena.";
  1794. close;
  1795.  
  1796. close;
  1797.  
  1798. M_pronteraneutral:
  1799.  
  1800. next;
  1801. mes "[Prontera Neutral Flag]";
  1802.  
  1803. //makes player unable to join the game due to full room
  1804. if (@nnmapuser >= 24)
  1805. {
  1806. goto nnfullmsgclassic;
  1807. }
  1808.  
  1809. if ($@nnredqt < 0)
  1810. {
  1811. set $@nnredqt, 0;
  1812. }
  1813.  
  1814. if ($@nnblueqt < 0)
  1815. {
  1816. set $@nnblueqt, 0;
  1817. }
  1818.  
  1819. mes "The "+@redteam$+" has "+$@nnredqt+"/12 Players.";
  1820. mes "The "+@blueteam$+" has "+$@nnblueqt+"/12 Players.";
  1821. mes " ";
  1822. mes "What team would you like to join?";
  1823.  
  1824. menu "Blue Team",nnbt,"Red Team",nnrt,"Cancel",-;
  1825. close;
  1826.  
  1827. nnbt:
  1828. if ($@nnblueqt >= 12)
  1829. 	{
  1830. 	next;
  1831. 	mes "The "+@blueteam$+" is full";
  1832. 	next;
  1833. 	goto M_begin;
  1834. 	}
  1835.  
  1836. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  1837. set @team, 1;
  1838. set teamname, @blueteam$;
  1839. goto okpronteraneutral;
  1840. end;
  1841.  
  1842. nnrt:
  1843. if ($@nnredqt >= 12)
  1844. 	{
  1845. 	next;
  1846. 	mes "The "+@redteam$+" is full";
  1847. 	next;
  1848. 	goto M_begin;
  1849. 	}
  1850.  
  1851. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has joined the Red Team.",0;
  1852. set @team, 2;
  1853. set teamname, @redteam$;
  1854. goto okpronteraneutral;
  1855. end;
  1856.  
  1857. okpronteraneutral:
  1858.  
  1859. set @ipneutralqt, getarraysize($@pneutral);
  1860. setarray $@pneutral[@ipneutralqt], getcharid(3);
  1861.  
  1862. set colorchange, 1;
  1863. set @playing, 1;
  1864.  
  1865. if (@team == 2)
  1866. {
  1867. set $@nnredqt, $@nnredqt +1;
  1868.  
  1869. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  1870. //if (Sex == 1)
  1871. //	{
  1872. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  1873. //		{
  1874. //		setlook 6,6;
  1875. //		setlook 7,2;
  1876. //		}
  1877. //
  1878. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  1879. //		{
  1880. //		setlook 6,6;
  1881. //		setlook 7,1;
  1882. //		}
  1883. //
  1884. //	if (Class == SuperNovice || Class == Job_Paladin)
  1885. //		{
  1886. //		setlook 6,6;
  1887. //		setlook 7,58;
  1888. //		}
  1889. //
  1890. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  1891. //		{
  1892. //		setlook 6,6;
  1893. //		setlook 7,146;
  1894. //		}
  1895. //
  1896. //	if (Class == Job_High_Priest || Class == Job_Champion)
  1897. //		{
  1898. //		setlook 6,6;
  1899. //		setlook 7,66;
  1900. //		}
  1901. //
  1902. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  1903. //		{
  1904. //		setlook 6,6;
  1905. //		setlook 7,42;
  1906. //		}
  1907. //
  1908. //	if (Class == Job_Creator)
  1909. //		{
  1910. //		setlook 6,6;
  1911. //		setlook 7,14;
  1912. //		}
  1913. //
  1914. //	if (Class == Job_Sage)
  1915. //		{
  1916. //		setlook 6,6;
  1917. //		setlook 7,18;
  1918. //		}
  1919. //
  1920. //	if (Class == Job_Professor || Class == Job_Mage)
  1921. //		{
  1922. //		setlook 6,6;
  1923. //		setlook 7,39;
  1924. //		}
  1925. //
  1926. //	if (Class == Job_Whitesmith)
  1927. //		{
  1928. //		setlook 6,6;
  1929. //		setlook 7,62;
  1930. //		}
  1931. //
  1932. //	if (Class == Job_Soul_Linker)
  1933. //		{
  1934. //		setlook 6,6;
  1935. //		setlook 7,122;
  1936. //		}
  1937. //
  1938. //	if (Class == Job_Gunslinger)
  1939. //		{
  1940. //		setlook 6,6;
  1941. //		setlook 7,26;
  1942. //		}
  1943. //	}
  1944.  
  1945. //if (Sex == 0)
  1946. //	{
  1947. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  1948. //		{
  1949. //		setlook 6,6;
  1950. //		setlook 7,2;
  1951. //		}
  1952. //
  1953. //	if (Class == Job_Crusader || Class == Job_Merchant)
  1954. //		{
  1955. //		setlook 6,6;
  1956. //		setlook 7,18;
  1957. //		}
  1958. //
  1959. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  1960. //		{
  1961. //		setlook 6,6;
  1962. //		setlook 7,42;
  1963. //		}
  1964. //
  1965. //	if (Class == Job_High_Priest)
  1966. //		{
  1967. //		setlook 6,6;
  1968. //		setlook 7,0;
  1969. //		}
  1970. //
  1971. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  1972. //		{
  1973. //		setlook 6,6;
  1974. //		setlook 7,14;
  1975. //		}
  1976. //
  1977. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  1978. //		{
  1979. //		setlook 6,6;
  1980. //		setlook 7,66;
  1981. //		}
  1982. //
  1983. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  1984. //		{
  1985. //		setlook 6,6;
  1986. //		setlook 7,58;
  1987. //		}
  1988. //	if (Class == Job_Dancer)
  1989. //		{
  1990. //		setlook 6,6;
  1991. //		setlook 7,153;
  1992. //		}
  1993. //
  1994. //	if (Class == Job_Gypsy)
  1995. //		{
  1996. //		setlook 6,6;
  1997. //		setlook 7,47;
  1998. //		}
  1999. //
  2000. //	if (Class == Job_Stalker)
  2001. //		{
  2002. //		setlook 6,6;
  2003. //		setlook 7,157;
  2004. //		}
  2005. //
  2006. //	if (Class == Job_Archer)
  2007. //		{
  2008. //		setlook 6,6;
  2009. //		setlook 7,26;
  2010. //		}
  2011. //
  2012. //	if (Class == Job_Gunslinger)
  2013. //		{
  2014. //		setlook 6,6;
  2015. //		setlook 7,26;
  2016. //		}
  2017. //	}
  2018.  
  2019. save "pvp_y_7-1",283,204;
  2020. warp "pvp_y_7-1",283,204;
  2021. }
  2022.  
  2023. if (@team == 1)
  2024. {
  2025. set $@nnblueqt, $@nnblueqt +1;
  2026.  
  2027. // "^^color^^"
  2028. //if (Sex == 1)
  2029. //	{
  2030. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  2031. //		{
  2032. //		setlook 6,5;
  2033. //		setlook 7,1;
  2034. //		}
  2035. //
  2036. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  2037. //		{
  2038. //		setlook 6,5;
  2039. //		setlook 7,2;
  2040. //		}
  2041. //
  2042. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  2043. //		{
  2044. //		setlook 6,5;
  2045. //		setlook 7,43;
  2046. //		}
  2047. //	}
  2048.  
  2049. //if (Sex == 0)
  2050. //	{
  2051. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  2052. //		{
  2053. //		setlook 6,5;
  2054. //		setlook 7,1;
  2055. //		}
  2056. //
  2057. //	if (Class == Job_Archer)
  2058. //		{
  2059. //		setlook 6,5;
  2060. //		setlook 7,0;
  2061. //		}
  2062. //
  2063. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  2064. //		{
  2065. //		setlook 6,5;
  2066. //		setlook 7,43;
  2067. //		}
  2068. //	if (Class == Job_Wizard)
  2069. //		{
  2070. //		setlook 6,5;
  2071. //		setlook 7,67;
  2072. //		}
  2073. //	}
  2074.  
  2075. save "pvp_y_7-1",29,204;
  2076. warp "pvp_y_7-1",29,204;
  2077. }
  2078. percentheal 100,100;
  2079. close;
  2080.  
  2081. nnfullmsgclassic:
  2082. mes "The ^FF0000Red Team^000000 has "+$@nnredqt+"/12 Players.";
  2083. mes "The ^0066FFBlue Team^000000 has "+$@nnblueqt+"/12 Players.";
  2084. mes " ";
  2085. mes "Sorry both teams are full try another CTF arena.";
  2086. close;
  2087. end;
  2088.  
  2089. M_rules:
  2090. mes "What do you want to know about?";
  2091. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",M_begin;
  2092. close;
  2093.  
  2094. crrules:
  2095.  
  2096. next;
  2097. mes "The object of Capture the Flag is to steal the opposing team's flag and returning it to your base while having your flag still at your base.";
  2098. mes "Each gametype plays in a similar way.  The flags will cast agility down on the flag carrier every 5 seconds and will also follow the carriers like pets would (when they have the flag).  Each game of Capture the Flag will end with the first team that achieves 5 flag captures.";
  2099. next;
  2100. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",M_begin;
  2101. close;
  2102.  
  2103. crules:
  2104. next;
  2105. mes "Classic CTF is the most basic of Capture the Flag games.  PvP is on and each team must play offense and defense to win.  The flags are both on touch return.";
  2106. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",M_begin;
  2107. close;
  2108.  
  2109. hrules:
  2110. next;
  2111. mes "Hardcore CTF is similar to Classic CTF but with some minor tweaks.  GvG is on, each team has to play offensively and defensively, and the flag will silence the flag carrier along with agility down every 5 seconds.  The flags are both on touch return.";
  2112. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",M_begin;
  2113. close;
  2114.  
  2115. srules:
  2116. next;
  2117. mes "Single Flag CTF is the most complicated out of the three gametypes.  PvP is on for this gametype.  Instead of having to play offense and defense all at once there are 3 minute rounds where one team is on offense and the other is on defense.  The flags are NOT on touch return in this gametype, instead they are on 30 second respawn times.";
  2118. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",M_begin;
  2119. close;
  2120.  
  2121. M_pstats:
  2122. set #kdr, #kills - #death;
  2123. set @kdr, kills - death;
  2124. set #rate, ( ((#win * 25) - (#lose *25)) + ((#kills * 4) - (#death *4)) + (#spree * 10)  + (#multikill * 30) + (#fcapt * 5) + (#ftaken - #fdrop) + (#freturn * 3) );
  2125. set rate, ( ((win * 25) - (lose *25)) + ((kills * 4) - (death * 4)) + (spree * 10) + (multikill * 30) + (fcapt * 5) + (ftaken - fdrop) + (freturn * 3) );
  2126.  
  2127. next;
  2128. mes "Wins: "+win+"";
  2129. mes "Loses: "+lose+"";
  2130. mes " ";
  2131. mes "Kills: "+kills+"";
  2132. mes "Deaths: "+death+"";
  2133. mes "Kill/Death Ratio: "+@kdr+"";
  2134. mes " ";
  2135. mes "Best Killing Spree: "+spree+"";
  2136. mes "Best Multi Kill: "+multikill+"";
  2137. mes " ";
  2138. mes "Flags Captured: "+fcapt+"";
  2139. mes "Flags Returned: "+freturn+"";
  2140. mes "Flags Taken: "+ftaken+"";
  2141. mes "Flags Dropped: "+fdrop+"" ;
  2142. mes " ";
  2143. //mes "Rank: n/a";
  2144. mes "Overall Rating: "+rate+"";
  2145. mes "CTF POINTS: "+ctfpt+"";
  2146. mes " ";
  2147. mes "TOTAL CTF POINTS GAINED: "+tctfpt+"";
  2148.  
  2149. close;
  2150. end;
  2151.  
  2152. astat:
  2153.  
  2154. next;
  2155. mes "Wins: "+#win+"";
  2156. mes "Loses: "+#lose+"";
  2157. mes " ";
  2158. mes "Kills: "+#kills+"";
  2159. mes "Deaths: "+#death+"";
  2160. mes "Kill/Death Ratio: "+#kdr+"";
  2161. mes " ";
  2162. mes "Best Killing Spree: "+#spree+"";
  2163. mes "Best Multi Kill: "+#multikill+"";
  2164. mes " ";
  2165. mes "Flags Captured: "+#fcapt+"";
  2166. mes "Flags Returned: "+#freturn+"";
  2167. mes "Flags Taken: "+#ftaken+"";
  2168. mes "Flags Dropped: "+#fdrop+"" ;
  2169. mes " ";
  2170. //mes "Rank: n/a";
  2171. mes "Overall Rating: "+#rate+"";
  2172.  
  2173. close;
  2174. end;
  2175.  
  2176. M_rank:
  2177. mes "System isn't implemented yet.";
  2178. close;
  2179.  
  2180. //Player kill, death, and log in/outs
  2181.  
  2182. OnPCKillEvent:
  2183.  
  2184. getmapxy(@checkmap$,@checkx,@checky,0);
  2185. if (@checkmap$ == "prt_are01" || @checkmap$ == "pvp_2vs2" || @checkmap$ == "pvp_y_5-2" || @checkmap$ == "tha_t10" || @checkmap$ == "poring_w02" || @checkmap$ == "pvp_y_7-1")
  2186. 	{
  2187. 	set kills, kills + 1;
  2188. 	set #kills, #kills + 1;
  2189.  
  2190. 	set ctfpt, ctfpt + 1;
  2191. 	set tctfpt, tctfpt + 1;
  2192.  
  2193. 	set spreecounter, spreecounter + 1;
  2194.  
  2195. 	if (spreecounter > #spree)
  2196. 		{
  2197. 		set #spree, spreecounter;
  2198. 		}
  2199.  
  2200. 	if (spreecounter > spree)
  2201. 		{
  2202. 		set spree, spreecounter;
  2203. 		}
  2204.  
  2205. 	if (@killtimer == 0)
  2206. 		{
  2207. 		set @killtime, gettimetick(2);
  2208. 		set @kill, kills;
  2209. 		set @killtimer, 1;
  2210. 		end;
  2211. 		}
  2212.  
  2213. 	if ((@killtime) + 10) > (gettimetick(2))
  2214. 		{
  2215. 		if ((kills > @kill) && (@killtimer == 1))
  2216. 			{
  2217. 			set @kill, kills;
  2218. 			announce ""+strcharinfo(0)+" got a DOUBLE KILL!!",bc_map;
  2219. 			set @killtimer, 2;
  2220. 			set @killtime, gettimetick(2);
  2221.  
  2222. 			if (multikill < 2)
  2223. 				{
  2224. 				set multikill, 2;
  2225. 				set #multikill, 2;
  2226. 				}
  2227. 			end;
  2228. 			}
  2229.  
  2230. 		if ((kills > @kill) && (@killtimer == 2))
  2231. 			{
  2232. 			set @kill, kills;
  2233. 			announce ""+strcharinfo(0)+" got a TRIPLE KILL!!",bc_map;
  2234. 			set @killtimer, 3;
  2235. 			set @killtime, gettimetick(2);
  2236.  
  2237. 			if (multikill < 3)
  2238. 				{
  2239. 				set multikill, 3;
  2240. 				set #multikill, 3;
  2241. 				}
  2242. 			end;
  2243. 			}
  2244.  
  2245. 		if ((kills > @kill) && (@killtimer == 3))
  2246. 			{
  2247. 			set @kill, kills;
  2248. 			announce ""+strcharinfo(0)+" got a MULTI KILL!!",bc_map;
  2249. 			set @killtimer, 4;
  2250. 			set @killtime, gettimetick(2);
  2251.  
  2252. 			if (multikill < 4)
  2253. 				{
  2254. 				set multikill, 4;
  2255. 				set #multikill, 4;
  2256. 				}
  2257. 			end;
  2258. 			}
  2259.  
  2260. 		if ((kills > @kill) && (@killtimer == 4))
  2261. 			{
  2262. 			set @kill, kills;
  2263. 			announce ""+strcharinfo(0)+" got a CRAZY KILL!!",bc_map;
  2264. 			set @killtimer, 5;
  2265. 			set @killtime, gettimetick(2);
  2266.  
  2267. 			if (multikill < 5)
  2268. 				{
  2269. 				set multikill, 5;
  2270. 				set #multikill, 5;
  2271. 				}
  2272. 			end;
  2273. 			}
  2274.  
  2275. 		if ((kills > @kill) && (@killtimer == 5))
  2276. 			{
  2277. 			set @kill, kills;
  2278. 			announce ""+strcharinfo(0)+" got an MEGA KILL!!",bc_map;
  2279. 			set @killtimer, 6;
  2280. 			set @killtime, gettimetick(2);
  2281.  
  2282. 			if (multikill < 6)
  2283. 				{
  2284. 				set multikill, 6;
  2285. 				set #multikill, 6;
  2286. 				}
  2287. 			end;
  2288. 			}
  2289.  
  2290. 		if ((kills > @kill) && (@killtimer == 6))
  2291. 			{
  2292. 			set @kill, kills;
  2293. 			announce ""+strcharinfo(0)+" got an ULTRA KILL!!",bc_map;
  2294. 			set @killtimer, 7;
  2295. 			set @killtime, gettimetick(2);
  2296.  
  2297. 			if (multikill < 7)
  2298. 				{
  2299. 				set multikill, 7;
  2300. 				set #multikill, 7;
  2301. 				}
  2302. 			end;
  2303. 			}
  2304.  
  2305. 		if ((kills > @kill) && (@killtimer == 7))
  2306. 			{
  2307. 			set @kill, kills;
  2308. 			announce ""+strcharinfo(0)+" got an UBER KILL!!",bc_map;
  2309. 			set @killtimer, 8;
  2310. 			set @killtime, gettimetick(2);
  2311.  
  2312. 			if (multikill < 8)
  2313. 				{
  2314. 				set multikill, 8;
  2315. 				set #multikill, 8;
  2316. 				}
  2317. 			end;
  2318. 			}
  2319.  
  2320. 		if ((kills > @kill) && (@killtimer == 8))
  2321. 			{
  2322. 			set @kill, kills;
  2323. 			announce ""+strcharinfo(0)+" got a ZOMGZ KILL!!",bc_map;
  2324. 			set @killtimer, 9;
  2325. 			set @killtime, gettimetick(2);
  2326.  
  2327. 			if (multikill < 9)
  2328. 				{
  2329. 				set multikill, 9;
  2330. 				set #multikill, 9;
  2331. 				}
  2332. 			end;
  2333. 			}
  2334.  
  2335. 		if ((kills > @kill) && (@killtimer == 9))
  2336. 			{
  2337. 			set @kill, kills;
  2338. 			announce ""+strcharinfo(0)+" got a RIDICULOUS KILL!!",bc_map;
  2339. 			set @killtimer, 10;
  2340. 			set @killtime, gettimetick(2);
  2341.  
  2342. 			if (multikill < 10)
  2343. 				{
  2344. 				set multikill, 10;
  2345. 				set #multikill, 10;
  2346. 				}
  2347. 			end;
  2348. 			}
  2349.  
  2350. 		if ((kills > @kill) && (@killtimer == 10))
  2351. 			{
  2352. 			set @kill, kills;
  2353. 			announce ""+strcharinfo(0)+" got a MONSTER KILL!!",bc_map;
  2354. 			set @killtimer, 11;
  2355. 			set @killtime, gettimetick(2);
  2356.  
  2357. 			if (multikill < 11)
  2358. 				{
  2359. 				set multikill, 11;
  2360. 				set #multikill, 11;
  2361. 				}
  2362. 			end;
  2363. 			}
  2364.  
  2365. 		if ((kills > @kill) && (@killtimer == 11))
  2366. 			{
  2367. 			set @kill, kills;
  2368. 			announce ""+strcharinfo(0)+" got an INSANE KILL!!",bc_map;
  2369. 			set @killtimer, 12;
  2370. 			set @killtime, gettimetick(2);
  2371.  
  2372. 			if (multikill < 12)
  2373. 				{
  2374. 				set multikill, 12;
  2375. 				set #multikill, 12;
  2376. 				}
  2377. 			end;
  2378. 			}
  2379.  
  2380. 		if ((kills > @kill) && (@killtimer == 12))
  2381. 			{
  2382. 			set @kill, kills;
  2383. 			announce ""+strcharinfo(0)+" got a GM KILL!!",bc_map;
  2384. 			set @killtimer, 1;
  2385. 			set @killtime, gettimetick(2);
  2386.  
  2387. 			if (multikill < 13)
  2388. 				{
  2389. 				set multikill, 13;
  2390. 				set #multikill, 13;
  2391. 				}
  2392. 			end;
  2393. 			}
  2394. 		end;
  2395. 		}
  2396.  
  2397. 	if ((@killtime) + 10) < (gettimetick(2))
  2398. 		{
  2399. 		set @killtime, gettimetick(2);
  2400. 		set @kill, kills;
  2401. 		set @killtimer, 1;
  2402. 		}
  2403.  
  2404. 	}
  2405. end;
  2406.  
  2407. OnPCDieEvent:
  2408.  
  2409. getmapxy(@checkmap$,@checkx,@checky,0);
  2410. if (@checkmap$ == "prt_are01")
  2411. {
  2412. set spreecounter, 0;
  2413. set @heal, 0;
  2414. set #death, #death + 1;
  2415. set death, death + 1;
  2416.  
  2417. 	if ($@redcarrier$ == strcharinfo(0))
  2418. 	{
  2419. 	set $@reddropped, 1;
  2420. 	mapannounce "prt_are01", ""+$@redcarrier$+" dropped the Red Flag.",0;
  2421. 	set $@redcarrier$, "-";
  2422. 	set #fdrop, #fdrop + 1;
  2423. 	set fdrop, fdrop + 1;
  2424. 	}
  2425.  
  2426. 	if ($@bluecarrier$ == strcharinfo(0))
  2427. 	{
  2428. 	set $@bluedropped, 1;
  2429. 	mapannounce "prt_are01", ""+$@bluecarrier$+" dropped the Blue Flag.",0;
  2430. 	set $@bluecarrier$, "-";
  2431. 	set #fdrop, #fdrop + 1;
  2432. 	set fdrop, fdrop + 1;
  2433. 	}
  2434.  
  2435. if (@team == 1)
  2436. {
  2437. sleep2 1000;
  2438. set @newsave, rand(1,5);
  2439.  
  2440. 	if (@newsave == 1)
  2441. 		{
  2442. 		set @savex, rand(29,34);
  2443. 		set @savey, rand(134,166);
  2444. 		warp "prt_are01", (@savex), (@savey);
  2445. 		}
  2446.  
  2447. 	if (@newsave == 2)
  2448. 		{
  2449. 		set @savex, rand(37,78);
  2450. 		set @savey, rand(125,130);
  2451. 		warp "prt_are01", (@savex), (@savey);
  2452. 		}
  2453.  
  2454. 	if (@newsave == 3)
  2455. 		{
  2456. 		set @savex, rand(38,77);
  2457. 		set @savey, rand(169,174);
  2458. 		warp "prt_are01", (@savex), (@savey);
  2459. 		}
  2460.  
  2461. 	if (@newsave == 4)
  2462. 		{
  2463. 		set @savex, rand(81,84);
  2464. 		set @savey, rand(134,165);
  2465. 		warp "prt_are01", (@savex), (@savey);
  2466. 		}
  2467.  
  2468. 	if (@newsave == 5)
  2469. 		{
  2470. 		set @savex, rand(43,83);
  2471. 		set @savey, rand(146,153);
  2472. 		warp "prt_are01", (@savex), (@savey);
  2473. 		}
  2474. }
  2475.  
  2476. if (@team == 2)
  2477. {
  2478. sleep2 1000;
  2479. set @newsave, rand(1,5);
  2480.  
  2481. 	if (@newsave == 1)
  2482. 		{
  2483. 		set @savex, rand(265,270);
  2484. 		set @savey, rand(134,166);
  2485. 		warp "prt_are01", (@savex), (@savey);
  2486. 		}
  2487.  
  2488. 	if (@newsave == 2)
  2489. 		{
  2490. 		set @savex, rand(222,260);
  2491. 		set @savey, rand(125,130);
  2492. 		warp "prt_are01", (@savex), (@savey);
  2493. 		}
  2494.  
  2495. 	if (@newsave == 3)
  2496. 		{
  2497. 		set @savex, rand(215,218);
  2498. 		set @savey, rand(133,168);
  2499. 		warp "prt_are01", (@savex), (@savey);
  2500. 		}
  2501.  
  2502. 	if (@newsave == 4)
  2503. 		{
  2504. 		set @savex, rand(221,261);
  2505. 		set @savey, rand(169,174);
  2506. 		warp "prt_are01", (@savex), (@savey);
  2507. 		}
  2508.  
  2509. 	if (@newsave == 5)
  2510. 		{
  2511. 		set @savex, rand(215,256);
  2512. 		set @savey, rand(146,153);
  2513. 		warp "prt_are01", (@savex), (@savey);
  2514. 		}
  2515. }
  2516.  
  2517. atcommand "@alive";
  2518. sleep2 500;
  2519. percentheal 100,100;
  2520. }
  2521.  
  2522. if (@checkmap$ == "pvp_2vs2")
  2523. {
  2524. set spreecounter, 0;
  2525. set @heal, 0;
  2526. set #death, #death + 1;
  2527. set death, death + 1;
  2528.  
  2529. 	if ($@hredcarrier$ == strcharinfo(0))
  2530. 	{
  2531. 	set $@hreddropped, 1;
  2532. 	mapannounce "pvp_2vs2", ""+$@hredcarrier$+" dropped the Red Flag.",0;
  2533. 	set $@hredcarrier$, "-";
  2534. 	set #fdrop, #fdrop + 1;
  2535. 	set fdrop, fdrop + 1;
  2536. 	}
  2537.  
  2538. 	if ($@hbluecarrier$ == strcharinfo(0))
  2539. 	{
  2540. 	set $@hbluedropped, 1;
  2541. 	mapannounce "pvp_2vs2", ""+$@hbluecarrier$+" dropped the Blue Flag.",0;
  2542. 	set $@hbluecarrier$, "-";
  2543. 	set #fdrop, #fdrop + 1;
  2544. 	set fdrop, fdrop + 1;
  2545. 	}
  2546.  
  2547. if (@team == 1)
  2548. {
  2549. sleep2 1000;
  2550. set @newsave, rand(1,2);
  2551.  
  2552. 	if (@newsave == 1)
  2553. 		{
  2554. 		set @savex, rand(14,17);
  2555. 		set @savey, rand(14,49);
  2556. 		warp "pvp_2vs2", (@savex), (@savey);
  2557. 		}
  2558.  
  2559. 	if (@newsave == 2)
  2560. 		{
  2561. 		set @savex, rand(14,17);
  2562. 		set @savey, rand(52,65);
  2563. 		warp "pvp_2vs2", (@savex), (@savey);
  2564. 		}
  2565. }
  2566.  
  2567. if (@team == 2)
  2568. {
  2569. sleep2 1000;
  2570. set @newsave, rand(1,2);
  2571.  
  2572. 	if (@newsave == 1)
  2573. 		{
  2574. 		set @savex, rand(62,65);
  2575. 		set @savey, rand(30,65);
  2576. 		warp "pvp_2vs2", (@savex), (@savey);
  2577. 		}
  2578.  
  2579. 	if (@newsave == 2)
  2580. 		{
  2581. 		set @savex, rand(62,65);
  2582. 		set @savey, rand(14,27);
  2583. 		warp "pvp_2vs2", (@savex), (@savey);
  2584. 		}
  2585. }
  2586.  
  2587. atcommand "@alive";
  2588. sleep2 500;
  2589. percentheal 100,100;
  2590. }
  2591.  
  2592. if (@checkmap$ == "pvp_y_5-2")
  2593. {
  2594. set spreecounter, 0;
  2595. set @heal, 0;
  2596. set #death, #death + 1;
  2597. set death, death + 1;
  2598.  
  2599. if (@team == 1)
  2600. {
  2601. sleep2 1000;
  2602. set @newsave, rand(1,2);
  2603.  
  2604. 	if (@newsave == 1)
  2605. 		{
  2606. 		set @savex, rand(46,60);
  2607. 		set @savey, rand(128,138);
  2608. 		warp "pvp_y_5-2", (@savex), (@savey);
  2609. 		}
  2610.  
  2611. 	if (@newsave == 2)
  2612. 		{
  2613. 		set @savex, rand(54,62);
  2614. 		set @savey, rand(120,127);
  2615. 		warp "pvp_y_5-2", (@savex), (@savey);
  2616. 		}
  2617. }
  2618.  
  2619. if (@team == 2)
  2620. {
  2621. sleep2 1000;
  2622. set @newsave, rand(1,2);
  2623.  
  2624. 	if (@newsave == 1)
  2625. 		{
  2626. 		set @savex, rand(205,220);
  2627. 		set @savey, rand(121,124);
  2628. 		warp "pvp_y_5-2", (@savex), (@savey);
  2629. 		}
  2630.  
  2631. 	if (@newsave == 2)
  2632. 		{
  2633. 		set @savex, rand(201,211);
  2634. 		set @savey, rand(125,137);
  2635. 		warp "pvp_y_5-2", (@savex), (@savey);
  2636. 		}
  2637. }
  2638.  
  2639. atcommand "@alive";
  2640.  
  2641. 	if ($@sredcarrier$ == strcharinfo(0))
  2642. 		{
  2643. 		mapannounce "pvp_y_5-2", ""+$@sredcarrier$+" dropped the Red Flag.",0;
  2644. 		set $@sredcarrier$, "-";
  2645. 		set $@sreddropped, 1;
  2646. 		set $@suddendeath, 0;
  2647. 		set $@rresett, 0;
  2648. 		set #fdrop, #fdrop + 1;
  2649. 		set fdrop, fdrop + 1;
  2650. 		sleep2 500;
  2651. 		percentheal 100,100;
  2652.  
  2653. 			if ($@nearend == 1)
  2654. 			{
  2655. 			goto OnSuddenDeath;
  2656. 			}
  2657.  
  2658. 			if ($@nearend == 0)
  2659. 			{
  2660.  
  2661. 			OnRRespawn:
  2662. 			set $@ridol, $@ridol + 1;
  2663.  
  2664. 			if ($@rresett == 1)
  2665. 				{
  2666. 				set $@ridol, 0;
  2667. 				goto flgrspwn;
  2668. 				end;
  2669. 				}
  2670.  
  2671. 			if ($@ridol == 15)
  2672. 				{
  2673. 				movenpc "single_red_flag",210,130;
  2674. 				set $@rresett, 0;
  2675. 				set $@ridol, 0;
  2676. 				set $@sredgone, 0;
  2677. 				set $@sreddropped, 0;
  2678. 				set $@suddendeath, 0;
  2679. 				announce "The Red Flag has been returned.",bc_map;
  2680. 				end;
  2681. 				}
  2682.  
  2683. 			sleep2 1000;
  2684. 			goto OnRRespawn;
  2685. 			end;
  2686. 			}
  2687. 		}
  2688.  
  2689. 	if ($@sbluecarrier$ == strcharinfo(0))
  2690. 		{
  2691. 		mapannounce "pvp_y_5-2", ""+$@sbluecarrier$+" dropped the Blue Flag.",0;
  2692. 		set $@sbluecarrier$, "-";
  2693. 		set $@sbluedropped, 1;
  2694. 		set $@suddendeath, 0;
  2695. 		set $@bresett, 0;
  2696. 		set #fdrop, #fdrop + 1;
  2697. 		set fdrop, fdrop + 1;
  2698. 		sleep2 500;
  2699. 		percentheal 100,100;
  2700.  
  2701. 			if ($@nearend == 1)
  2702. 			{
  2703. 			goto OnSuddenDeath;
  2704. 			}
  2705.  
  2706. 			if ($@nearend == 0)
  2707. 			{
  2708.  
  2709. 			OnBRespawn:
  2710. 			set $@bidol, $@bidol + 1;
  2711.  
  2712. 			if ($@bresett == 1)
  2713. 				{
  2714. 				set $@bidol, 0;
  2715. 				goto flgrspwn;
  2716. 				end;
  2717. 				}
  2718.  
  2719. 			if ($@bidol == 15)
  2720. 				{
  2721. 				movenpc "single_blue_flag",53,130;
  2722. 				set $@bresett, 0;
  2723. 				set $@bidol, 0;
  2724. 				set $@sbluegone, 0;
  2725. 				set $@sbluedropped, 0;
  2726. 				set $@suddendeath, 0;
  2727. 				announce "The Blue Flag has been returned.",bc_map;
  2728. 				end;
  2729. 				}
  2730.  
  2731. 			sleep2 1000;
  2732. 			goto OnBRespawn;
  2733. 			end;
  2734. 			}
  2735. flgrspwn:
  2736. end;
  2737. 		}
  2738. sleep2 500;
  2739. percentheal 100,100;
  2740. }
  2741.  
  2742. if (@checkmap$ == "tha_t10")
  2743. {
  2744. set spreecounter, 0;
  2745. set @heal, 0;
  2746. set #death, #death + 1;
  2747. set death, death + 1;
  2748.  
  2749. if (@team == 1)
  2750. {
  2751. sleep2 1000;
  2752. set @newsave, rand(1,2);
  2753.  
  2754. 	if (@newsave == 1)
  2755. 		{
  2756. 		set @savex, rand(134,157);
  2757. 		set @savey, rand(90,101);
  2758. 		warp "tha_t10", (@savex), (@savey);
  2759. 		}
  2760.  
  2761. 	if (@newsave == 2)
  2762. 		{
  2763. 		set @savex, rand(148,167);
  2764. 		set @savey, rand(99,105);
  2765. 		warp "tha_t10", (@savex), (@savey);
  2766. 		}
  2767. }
  2768.  
  2769. if (@team == 2)
  2770. 	{
  2771. 	sleep2 1000;
  2772. 	set @savex, rand(94,120);
  2773. 	set @savey, rand(144,167);
  2774. 	warp "tha_t10", (@savex), (@savey);
  2775. 	}
  2776.  
  2777. atcommand "@alive";
  2778.  
  2779. 	if ($@flagcarrier$ == strcharinfo(0))
  2780. 		{
  2781. 		mapannounce "tha_t10", ""+$@flagcarrier$+" dropped the Flag.",0;
  2782. 		set $@flagcarrier$, "-";
  2783. 		set $@flagdropped, 1;
  2784. 		set $@flagresett, 0;
  2785. 		set #fdrop, #fdrop + 1;
  2786. 		set fdrop, fdrop + 1;
  2787. 		sleep2 500;
  2788. 		percentheal 100,100;
  2789.  
  2790. 		OnFlagRespawn:
  2791. 		set $@idol, $@idol + 1;
  2792.  
  2793. 		if ($@flagresett == 1)
  2794. 			{
  2795. 			set $@idol, 0;
  2796. 			goto nflgrspwn;
  2797. 			end;
  2798. 			}
  2799.  
  2800. 		if ($@idol == 30)
  2801. 			{
  2802. 			movenpc "neutral_flag",127,124;
  2803. 			set $@idol, 0;
  2804. 			set $@flaggone, 0;
  2805. 			set $@flagdropped, 0;
  2806. 			announce "The Flag has been returned.",bc_map;
  2807. 			end;
  2808. 			}
  2809.  
  2810. 		sleep2 1000;
  2811. 		goto OnFlagRespawn;
  2812. 		end;
  2813. 		}
  2814. sleep2 500;
  2815. percentheal 100,100;
  2816. }
  2817. nflgrspwn:
  2818.  
  2819. if (@checkmap$ == "poring_w02")
  2820. {
  2821. set spreecounter, 0;
  2822. set @heal, 0;
  2823. set #death, #death + 1;
  2824. set death, death + 1;
  2825.  
  2826.  
  2827. if (@team == 2)
  2828. {
  2829. sleep2 1000;
  2830. warp "poring_w02",170,176;
  2831. }
  2832.  
  2833. if (@team == 1)
  2834. {
  2835. sleep2 1000;
  2836. warp "poring_w02",26,176;
  2837. }
  2838.  
  2839.  
  2840. 	if ($@gredcarrier$ == strcharinfo(0))
  2841. 	{
  2842. 	set $@greddropped, 1;
  2843. 	mapannounce "poring_w02", ""+$@gredcarrier$+" dropped the Red Flag.",0;
  2844. 	set $@gredcarrier$, "-";
  2845. 	set #fdrop, #fdrop + 1;
  2846. 	set fdrop, fdrop + 1;
  2847. 	}
  2848.  
  2849. 	if ($@gbluecarrier$ == strcharinfo(0))
  2850. 	{
  2851. 	set $@gbluedropped, 1;
  2852. 	mapannounce "poring_w02", ""+$@gbluecarrier$+" dropped the Blue Flag.",0;
  2853. 	set $@gbluecarrier$, "-";
  2854. 	set #fdrop, #fdrop + 1;
  2855. 	set fdrop, fdrop + 1;
  2856. 	}
  2857.  
  2858. atcommand "@alive";
  2859. sleep2 500;
  2860. percentheal 100,100;
  2861. }
  2862.  
  2863. if (@checkmap$ == "pvp_y_7-1")
  2864. {
  2865. set spreecounter, 0;
  2866. set @heal, 0;
  2867. set #death, #death + 1;
  2868. set death, death + 1;
  2869.  
  2870.  
  2871. if (@team == 1)
  2872. {
  2873. sleep2 1000;
  2874. set @savex, rand(27,67);
  2875. set @savey, rand(196,209);
  2876. warp "pvp_y_7-1", (@savex), (@savey);
  2877. }
  2878.  
  2879.  
  2880. if (@team == 2)
  2881. {
  2882. sleep2 1000;
  2883. set @savex, rand(244,284);
  2884. set @savey, rand(196,209);
  2885. warp "pvp_y_7-1", (@savex), (@savey);
  2886. }
  2887.  
  2888. atcommand "@alive";
  2889.  
  2890. 	if ($@nflagcarrier$ == strcharinfo(0))
  2891. 		{
  2892. 		mapannounce "pvp_y_7-1", ""+$@nflagcarrier$+" dropped the Flag.",0;
  2893. 		set $@warp, 0;
  2894. 		set $@nflagcarrier$, "-";
  2895. 		set $@nflagdropped, 1;
  2896. 		set $@nflagresett, 0;
  2897. 		set #fdrop, #fdrop + 1;
  2898. 		set fdrop, fdrop + 1;
  2899. 		sleep2 500;
  2900. 		percentheal 100,100;
  2901.  
  2902. 		OnNFlagRespawn:
  2903. 		set $@nidol, $@nidol + 1;
  2904.  
  2905. 		if ($@nflagresett == 1)
  2906. 			{
  2907. 			set $@nidol, 0;
  2908. 			goto nnflgrspwn;
  2909. 			end;
  2910. 			}
  2911.  
  2912. 		if ($@nidol == 30)
  2913. 			{
  2914. 			movenpc "prontera_neutral_flag",156,195;
  2915. 			set $@nidol, 0;
  2916. 			set $@nflaggone, 0;
  2917. 			set $@nflagdropped, 0;
  2918. 			announce "The Flag has been returned.",bc_map;
  2919. 			end;
  2920. 			}
  2921.  
  2922. 		sleep2 1000;
  2923. 		goto OnNFlagRespawn;
  2924. 		end;
  2925. 		}
  2926.  
  2927. sleep2 500;
  2928. percentheal 100,100;
  2929. }
  2930. nnflgrspwn:
  2931. end;
  2932.  
  2933. //When player logs out it restores thier hair color, body color, and save point
  2934.  
  2935. OnPCLogoutEvent:
  2936.  
  2937. getmapxy(@checkmap$,@checkx,@checky,0);
  2938. if (@checkmap$ == "prt_are01")
  2939. {
  2940. mapannounce "prt_are01", ""+strcharinfo(0)+" has left the game.",0;
  2941. set @cmapuser, getmapusers ("prt_are01");
  2942. set @heal, 0;
  2943. setlook 6, hair;
  2944. setlook 7, body;
  2945. save originmap$, (originx), (originy);
  2946. set @classic, 0;
  2947.  
  2948. if (@cmapuser == 1)
  2949. 	{
  2950. 	movenpc "blue_flag", 47, 150;
  2951. 	movenpc "red_flag",252,150;
  2952. 	set $@bluept, 0;
  2953. 	set $@redpt, 0;
  2954. 	set $@reddropped, 0;
  2955. 	set $@redgone, 0;
  2956. 	set $@bluedropped, 0;
  2957. 	set $@bluegone, 0;
  2958. 	set $@bluecarrier$, "-";
  2959. 	set $@redcarrier$, "-";
  2960. 	}
  2961.  
  2962. if ($@redcarrier$ == strcharinfo(0))
  2963. 	{
  2964. 	set $@reddropped, 1;
  2965. 	mapannounce "prt_are01", ""+$@redcarrier$+" dropped the Red Flag.",0;
  2966. 	set $@redcarrier$, "-";
  2967. 	set #fdrop, #fdrop + 1;
  2968. 	set fdrop, fdrop + 1;
  2969. 	}
  2970.  
  2971. if ($@bluecarrier$ == strcharinfo(0))
  2972. 	{
  2973. 	set $@bluedropped, 1;
  2974. 	mapannounce "prt_are01", ""+$@bluecarrier$+" dropped the Blue Flag.",0;
  2975. 	set $@bluecarrier$, "-";
  2976. 	set #fdrop, #fdrop + 1;
  2977. 	set fdrop, fdrop + 1;
  2978. 	}
  2979.  
  2980. //lowers the team count for leaving the game
  2981.  
  2982. if (@team == 2)
  2983. 	{
  2984. 	set $@redqt, $@redqt - 1;
  2985. 	}
  2986.  
  2987. 	if (@team == 1)
  2988. 	{
  2989. 	set $@blueqt, $@blueqt - 1;
  2990. 	}
  2991.  
  2992. set @ctf, 0;
  2993. for (set @i, 0; @i < getarraysize($@classic); set @i, @i+1) {
  2994. 	if ($@classic[@i] == getcharid(3))
  2995. 		{
  2996. 		setarray $@classic[@i],0;
  2997. 		break;
  2998. 		}
  2999. }
  3000. for (; @i < getarraysize($@classic); set @i, @i+1) {
  3001. 	setarray $@classic[@i], $@classic[@i+1];
  3002. }
  3003.  
  3004. }
  3005.  
  3006. if (@checkmap$ == "pvp_2vs2")
  3007. {
  3008. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has left the game.",0;
  3009. set @hmapuser, getmapusers ("pvp_2vs2");
  3010. set @heal, 0;
  3011. setlook 6, hair;
  3012. setlook 7, body;
  3013. save originmap$, (originx), (originy);
  3014. set @hardcore, 0;
  3015.  
  3016. if ($@hredcarrier$ == strcharinfo(0))
  3017. 	{
  3018. 	set $@hreddropped, 1;
  3019. 	mapannounce "pvp_2vs2", ""+$@hredcarrier$+" dropped the Red Flag.",0;
  3020. 	set $@hredcarrier$, "-";
  3021. 	set #fdrop, #fdrop + 1;
  3022. 	set fdrop, fdrop + 1;
  3023. 	}
  3024.  
  3025. if ($@hbluecarrier$ == strcharinfo(0))
  3026. 	{
  3027. 	set $@hbluedropped, 1;
  3028. 	mapannounce "pvp_2vs2", ""+$@hbluecarrier$+" dropped the Blue Flag.",0;
  3029. 	set $@hbluecarrier$, "-";
  3030. 	set #fdrop, #fdrop + 1;
  3031. 	set fdrop, fdrop + 1;
  3032. 	}
  3033.  
  3034. //lowers the team count for leaving the game
  3035.  
  3036. 	if (@team == 2)
  3037. 	{
  3038. 	set $@hredqt, $@hredqt - 1;
  3039. 	}
  3040.  
  3041. 	if (@team == 1)
  3042. 	{
  3043. 	set $@hblueqt, $@hblueqt - 1;
  3044. 	}
  3045.  
  3046. if (@hmapuser == 1)
  3047. 	{
  3048. 	movenpc "hard_blue_flag", 19, 39;
  3049. 	movenpc "hard_red_flag",60,39;
  3050. 	set $@hbluept, 0;
  3051. 	set $@hredpt, 0;
  3052. 	set $@hbluecarrier$, "-";
  3053. 	set $@hredcarrier$, "-";
  3054. 	set $@hreddropped, 0;
  3055. 	set $@hredgone, 0;
  3056. 	set $@hbluedropped, 0;
  3057. 	set $@hbluegone, 0;
  3058. 	}
  3059.  
  3060. set @ctf, 0;
  3061. for (set @i, 0; @i < getarraysize($@hardcore); set @i, @i+1) {
  3062. 	if ($@hardcore[@i] == getcharid(3))
  3063. 		{
  3064. 		setarray $@hardcore[@i],0;
  3065. 		break;
  3066. 		}
  3067. }
  3068. for (; @i < getarraysize($@hardcore); set @i, @i+1) {
  3069. 	setarray $@hardcore[@i], $@hardcore[@i+1];
  3070. }
  3071.  
  3072. }
  3073.  
  3074. if (@checkmap$ == "pvp_y_5-2")
  3075. {
  3076. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has left the game.",0;
  3077. set @smapuser, getmapusers ("pvp_y_5-2");
  3078. set @heal, 0;
  3079. setlook 6, hair;
  3080. setlook 7, body;
  3081. save originmap$, (originx), (originy);
  3082. set @single, 0;
  3083.  
  3084. if (@smapuser == 1)
  3085. 	{
  3086. 	movenpc "single_blue_flag",53,130;
  3087. 	movenpc "single_red_flag",210,130;
  3088. 	set $@sbluept, 0;
  3089. 	set $@sredpt, 0;
  3090. 	set $@sbluecarrier$, "-";
  3091. 	set $@sredcarrier$, "-";
  3092. 	set $@sreddropped, 0;
  3093. 	set $@sredgone, 0;
  3094. 	set $@sbluedropped, 0;
  3095. 	set $@sbluegone, 0;
  3096. 	}
  3097.  
  3098. warp originmap$, (originx), (originy);
  3099.  
  3100. set @ctf, 0;
  3101. for (set @i, 0; @i < getarraysize($@single); set @i, @i+1) {
  3102. 	if ($@single[@i] == getcharid(3))
  3103. 		{
  3104. 		setarray $@single[@i],0;
  3105. 		break;
  3106. 		}
  3107. }
  3108. for (; @i < getarraysize($@single); set @i, @i+1) {
  3109. 	setarray $@single[@i], $@single[@i+1];
  3110. }
  3111.  
  3112. if ($@sredcarrier$ == strcharinfo(0))
  3113. 	{
  3114. 	set $@sreddropped, 1;
  3115. 	mapannounce "pvp_y_5-2", ""+$@sredcarrier$+" dropped the Red Flag.",0;
  3116. 	set $@sredcarrier$, "-";
  3117. 	set $@suddendeath, 0;
  3118. 	set #fdrop, #fdrop + 1;
  3119. 	set fdrop, fdrop + 1;
  3120. 	set $@rresett, 0;
  3121.  
  3122. 	if ($@nearend == 1)
  3123. 		{
  3124. 		goto OnSuddenDeath;
  3125. 		}
  3126. 	if ($@nearend == 0)
  3127. 		{
  3128. 		goto OnRRespawn;
  3129. 		}
  3130. 	}
  3131.  
  3132. if ($@sbluecarrier$ == strcharinfo(0))
  3133. 	{
  3134. 	set $@sbluedropped, 1;
  3135. 	mapannounce "pvp_y_5-2", ""+$@sbluecarrier$+" dropped the Blue Flag.",0;
  3136. 	set $@sbluecarrier$, "-";
  3137. 	set $@suddendeath, 0;
  3138. 	set #fdrop, #fdrop + 1;
  3139. 	set fdrop, fdrop + 1;
  3140. 	set $@bresett, 0;
  3141.  
  3142. 	if ($@nearend == 1)
  3143. 		{
  3144. 		goto OnSuddenDeath;
  3145. 		}
  3146. 	if ($@nearend == 0)
  3147. 		{
  3148. 		goto OnBRespawn;
  3149. 		}
  3150. 	}
  3151.  
  3152. //lowers the team count for leaving the game
  3153.  
  3154. if (@team == 2)
  3155. 	{
  3156. 	set $@sredqt, $@sredqt - 1;
  3157. 	}
  3158.  
  3159. 	if (@team == 1)
  3160. 	{
  3161. 	set $@sblueqt, $@sblueqt - 1;
  3162. 	}
  3163.  
  3164. }
  3165.  
  3166. if (@checkmap$ == "tha_t10")
  3167. {
  3168. mapannounce "tha_t10", ""+strcharinfo(0)+" has left the game.",0;
  3169. set @nmapuser, getmapusers ("tha_t10");
  3170. set @heal, 0;
  3171. setlook 6, hair;
  3172. setlook 7, body;
  3173. save originmap$, (originx), (originy);
  3174. set @neutral, 0;
  3175.  
  3176. if (@nmapuser == 1)
  3177. 	{
  3178. 	movenpc "neutral_flag",127,124;
  3179. 	set $@nbluept, 0;
  3180. 	set $@nredpt, 0;
  3181. 	set $@flagcarrier$, "-";
  3182. 	set $@flagresett, 0;
  3183. 	set $@flaggone, 0;
  3184. 	set $@flagdropped, 0;
  3185. 	}
  3186.  
  3187. warp originmap$, (originx), (originy);
  3188.  
  3189. set @ctf, 0;
  3190. for (set @i, 0; @i < getarraysize($@neutral); set @i, @i+1) {
  3191. 	if ($@neutral[@i] == getcharid(3))
  3192. 		{
  3193. 		setarray $@neutral[@i],0;
  3194. 		break;
  3195. 		}
  3196. }
  3197. for (; @i < getarraysize($@neutral); set @i, @i+1) {
  3198. 	setarray $@neutral[@i], $@neutral[@i+1];
  3199. }
  3200.  
  3201. if ($@flagcarrier$ == strcharinfo(0))
  3202. 	{
  3203. 	set $@flagdropped, 1;
  3204. 	mapannounce "tha_t10", ""+$@flagcarrier$+" dropped the Flag.",0;
  3205. 	set $@flagcarrier$, "-";
  3206. 	set $@flagresett, 0;
  3207. 	set #fdrop, #fdrop + 1;
  3208. 	set fdrop, fdrop + 1;
  3209. 	goto OnFlagRespawn;
  3210. 	}
  3211.  
  3212. //lowers the team count for leaving the game
  3213.  
  3214. if (@team == 2)
  3215. 	{
  3216. 	set $@nredqt, $@nredqt - 1;
  3217. 	}
  3218.  
  3219. if (@team == 1)
  3220. 	{
  3221. 	set $@nblueqt, $@nblueqt - 1;
  3222. 	}
  3223.  
  3224. }
  3225.  
  3226. if (@checkmap$ == "poring_w02")
  3227. {
  3228. mapannounce "poring_w02", ""+strcharinfo(0)+" has left the game.",0;
  3229. set @gmapuser, getmapusers ("poring_w02");
  3230. set @heal, 0;
  3231. setlook 6, hair;
  3232. setlook 7, body;
  3233. save originmap$, (originx), (originy);
  3234. set @classicgvg, 0;
  3235.  
  3236. if ($@gredcarrier$ == strcharinfo(0))
  3237. 	{
  3238. 	set $@greddropped, 1;
  3239. 	mapannounce "poring_w02", ""+$@gredcarrier$+" dropped the Red Flag.",0;
  3240. 	set $@gredcarrier$, "-";
  3241. 	set #fdrop, #fdrop + 1;
  3242. 	set fdrop, fdrop + 1;
  3243. 	}
  3244.  
  3245. if ($@gbluecarrier$ == strcharinfo(0))
  3246. 	{
  3247. 	set $@gbluedropped, 1;
  3248. 	mapannounce "poring_w02", ""+$@gbluecarrier$+" dropped the Blue Flag.",0;
  3249. 	set $@gbluecarrier$, "-";
  3250. 	set #fdrop, #fdrop + 1;
  3251. 	set fdrop, fdrop + 1;
  3252. 	}
  3253.  
  3254. //lowers the team count for leaving the game
  3255.  
  3256. 	if (@team == 2)
  3257. 	{
  3258. 	set $@gredqt, $@gredqt - 1;
  3259. 	}
  3260.  
  3261. 	if (@team == 1)
  3262. 	{
  3263. 	set $@gblueqt, $@gblueqt - 1;
  3264. 	}
  3265.  
  3266. if (@gmapuser == 1)
  3267. 	{
  3268. 	//movenpc "classicgvg_blue_flag",98,124;
  3269. 	//movenpc "classicgvg_red_flag",98,41;
  3270. 	movenpc "classicgvg_red_flag",98,30;
  3271. 	movenpc "classicgvg_blue_flag",98,135;
  3272. 	set $@gbluept, 0;
  3273. 	set $@gredpt, 0;
  3274. 	set $@gbluecarrier$, "-";
  3275. 	set $@gredcarrier$, "-";
  3276. 	set $@greddropped, 0;
  3277. 	set $@gredgone, 0;
  3278. 	set $@gbluedropped, 0;
  3279. 	set $@gbluegone, 0;
  3280. 	}
  3281.  
  3282. warp originmap$, (originx), (originy);
  3283.  
  3284. set @ctf, 0;
  3285. for (set @i, 0; @i < getarraysize($@classicgvg); set @i, @i+1) {
  3286. 	if ($@classicgvg[@i] == getcharid(3))
  3287. 		{
  3288. 		setarray $@classicgvg[@i],0;
  3289. 		break;
  3290. 		}
  3291. }
  3292. for (; @i < getarraysize($@classicgvg); set @i, @i+1) {
  3293. 	setarray $@classicgvg[@i], $@classicgvg[@i+1];
  3294. }
  3295.  
  3296. }
  3297.  
  3298. if (@checkmap$ == "pvp_y_7-1")
  3299. {
  3300. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has left the game.",0;
  3301. set @nnmapuser, getmapusers ("pvp_y_7-1");
  3302. set @heal, 0;
  3303. setlook 6, hair;
  3304. setlook 7, body;
  3305. save originmap$, (originx), (originy);
  3306. set @pneutral, 0;
  3307.  
  3308. if (@nnmapuser == 1)
  3309. 	{
  3310. 	movenpc "prontera_neutral_flag",156,195;
  3311. 	set $@nnbluept, 0;
  3312. 	set $@nnredpt, 0;
  3313. 	set $@nflagcarrier$, "-";
  3314. 	set $@nflagresett, 0;
  3315. 	set $@nflaggone, 0;
  3316. 	set $@nflagdropped, 0;
  3317. 	}
  3318.  
  3319. warp originmap$, (originx), (originy);
  3320.  
  3321. set @ctf, 0;
  3322. for (set @i, 0; @i < getarraysize($@pneutral); set @i, @i+1) {
  3323. 	if ($@pneutral[@i] == getcharid(3))
  3324. 		{
  3325. 		setarray $@pneutral[@i],0;
  3326. 		break;
  3327. 		}
  3328. }
  3329. for (; @i < getarraysize($@pneutral); set @i, @i+1) {
  3330. 	setarray $@pneutral[@i], $@pneutral[@i+1];
  3331. }
  3332.  
  3333. if ($@nflagcarrier$ == strcharinfo(0))
  3334. 	{
  3335. 	set $@nflagdropped, 1;
  3336. 	mapannounce "pvp_y_7-1", ""+$@nflagcarrier$+" dropped the Flag.",0;
  3337. 	set $@nflagcarrier$, "-";
  3338. 	set $@nflagresett, 0;
  3339. 	set #fdrop, #fdrop + 1;
  3340. 	set fdrop, fdrop + 1;
  3341. 	goto OnFlagRespawn;
  3342. 	}
  3343.  
  3344. //lowers the team count for leaving the game
  3345.  
  3346. if (@team == 2)
  3347. 	{
  3348. 	set $@nnredqt, $@nnredqt - 1;
  3349. 	}
  3350.  
  3351. if (@team == 1)
  3352. 	{
  3353. 	set $@nnblueqt, $@nnblueqt - 1;
  3354. 	}
  3355.  
  3356. }
  3357.  
  3358. if (@playing == 1)
  3359. 	{
  3360. 	warp originmap$, (originx), (originy);
  3361. 	save originmap$, (originx), (originy);
  3362. 	set @team, 0;
  3363. 	set Hp, charhp;
  3364. 	set Sp, charsp;
  3365. 	set @playing, 0;
  3366. 	}
  3367. end;
  3368.  
  3369. OnPCLoginEvent:
  3370.  
  3371. if (flogin == 0)
  3372. 	{
  3373. 	set charhp, 1;
  3374. 	set charsp, 1;
  3375. 	set @playing, 0;
  3376. 	set flogin, 1;
  3377. 	}
  3378.  
  3379. getmapxy(@checkmap$,@checkx,@checky,0);
  3380. if (@checkmap$ == "prt_are01" || @checkmap$ == "pvp_2vs2" || @checkmap$ == "pvp_y_5-2" || @checkmap$ == "tha_t10" || @checkmap$ == "poring_w02" || @checkmap$ == "pvp_y_7-1")
  3381. 	{
  3382. 	set @heal, 0;
  3383. 	warp originmap$, (originx), (originy);
  3384. 	save originmap$, (originx), (originy);
  3385. 		if (colorchange == 1)
  3386. 		{
  3387. 		set colorchange, 0;
  3388. 		setlook 6, hair;
  3389. 		setlook 7, body;
  3390. 		set Hp, charhp;
  3391. 		set Sp, charsp;
  3392. 		}
  3393. 	}
  3394.  
  3395. if ((@checkmap$ == "prontera") && (colorchange == 1))
  3396. 	{
  3397. 	set colorchange, 0;
  3398. 	setlook 6, hair;
  3399. 	setlook 7, body;
  3400. 	}
  3401. end;
  3402.  
  3403. OnEventGameOverClassic:
  3404. set .@classqt, getarraysize($@classic);
  3405. set .@cctf, 0;
  3406.  
  3407. over:
  3408. if (.@cctf < .@classqt)
  3409. {
  3410. 	{
  3411. 	attachrid $@classic[.@cctf];
  3412. 	if (@classic == 1)
  3413. 		{
  3414. 		if (@team == 2)
  3415. 			{
  3416.  
  3417. 			if ($@redwin == 1)
  3418. 				{
  3419. 				set #win, #win + 1;
  3420. 				set win, win + 1;
  3421. 				}
  3422.  
  3423. 			if ($@bluewin == 1)
  3424. 				{
  3425. 				set #lose, #lose + 1;
  3426. 				set lose, lose + 1;
  3427. 				}
  3428. 			}
  3429.  
  3430. 		if (@team == 1)
  3431. 			{
  3432.  
  3433. 			if ($@redwin == 1)
  3434. 				{
  3435. 				set #lose, #lose + 1;
  3436. 				set lose, lose + 1;
  3437. 				}
  3438.  
  3439. 			if ($@bluewin == 1)
  3440. 				{
  3441. 				set #win, #win + 1;
  3442. 				set win, win + 1;
  3443. 				}
  3444. 			}
  3445. 		}
  3446.  
  3447. 	save originmap$, (originx), (originy);
  3448. 	warp originmap$, (originx), (originy);
  3449. 	setlook 6, hair;
  3450. 	setlook 7, body;
  3451. 	set Hp, charhp;
  3452. 	set Sp, charsp;
  3453. 	set @playing, 0;
  3454. 	set @classic, 0;
  3455. 	set @heal, 0;
  3456. 	detachrid;
  3457. 	set .@cctf, .@cctf + 1;
  3458. 	goto over;
  3459. 	}
  3460. }
  3461. for (set .@i, 0; .@i < getarraysize($@classic); set .@i, .@i+1) {
  3462. 	setarray $@classic[.@i], 0;
  3463. }
  3464. end;
  3465.  
  3466. OnEventGameOverHardcore:
  3467. set .@hardqt, getarraysize($@hardcore);
  3468. set .@hctf, 0;
  3469.  
  3470. hover:
  3471. if (.@hctf < .@hardqt)
  3472. {
  3473. 	{
  3474. 	attachrid $@hardcore[.@hctf];
  3475. 	if (@hardcore == 1)
  3476. 		{
  3477. 		if (@team == 2)
  3478. 			{
  3479.  
  3480. 			if ($@hredwin == 1)
  3481. 				{
  3482. 				set #win, #win + 1;
  3483. 				set win, win + 1;
  3484. 				}
  3485.  
  3486. 			if ($@hbluewin == 1)
  3487. 				{
  3488. 				set #lose, #lose + 1;
  3489. 				set lose, lose + 1;
  3490. 				}
  3491. 			}
  3492.  
  3493. 		if (@team == 1)
  3494. 			{
  3495.  
  3496. 			if ($@hredwin == 1)
  3497. 				{
  3498. 				set #lose, #lose + 1;
  3499. 				set lose, lose + 1;
  3500. 				}
  3501.  
  3502. 			if ($@hbluewin == 1)
  3503. 				{
  3504. 				set #win, #win + 1;
  3505. 				set win, win + 1;
  3506. 				}
  3507. 			}
  3508. 		}
  3509.  
  3510. 	save originmap$, (originx), (originy);
  3511. 	warp originmap$, (originx), (originy);
  3512. 	setlook 6, hair;
  3513. 	setlook 7, body;
  3514. 	set Hp, charhp;
  3515. 	set Sp, charsp;
  3516. 	set @playing, 0;
  3517. 	set @hardcore, 0;
  3518. 	set @heal, 0;
  3519. 	detachrid;
  3520. 	set .@hctf, .@hctf + 1;
  3521. 	goto hover;
  3522. 	}
  3523. }
  3524. for (set .@h, 0; .@h < getarraysize($@hardcore); set .@h, .@h+1) {
  3525. 	setarray $@hardcore[.@h], 0;
  3526. }
  3527. end;
  3528.  
  3529. OnEventGameOverSingle:
  3530. set .@singleqt, getarraysize($@single);
  3531. set .@sctf, 0;
  3532.  
  3533. sover:
  3534. if (.@sctf < .@singleqt)
  3535. {
  3536. 	{
  3537. 	attachrid $@single[.@sctf];
  3538. 	if (@single == 1)
  3539. 		{
  3540. 		if (@team == 2)
  3541. 			{
  3542.  
  3543. 			if ($@sredwin == 1)
  3544. 				{
  3545. 				set #win, #win + 1;
  3546. 				set win, win + 1;
  3547. 				}
  3548.  
  3549. 			if ($@sbluewin == 1)
  3550. 				{
  3551. 				set #lose, #lose + 1;
  3552. 				set lose, lose + 1;
  3553. 				}
  3554. 			}
  3555.  
  3556. 		if (@team == 1)
  3557. 			{
  3558.  
  3559. 			if ($@sredwin == 1)
  3560. 				{
  3561. 				set #lose, #lose + 1;
  3562. 				set lose, lose + 1;
  3563. 				}
  3564.  
  3565. 			if ($@sbluewin == 1)
  3566. 				{
  3567. 				set #win, #win + 1;
  3568. 				set win, win + 1;
  3569. 				}
  3570. 			}
  3571. 		}
  3572.  
  3573. 	save originmap$, (originx), (originy);
  3574. 	warp originmap$, (originx), (originy);
  3575. 	setlook 6, hair;
  3576. 	setlook 7, body;
  3577. 	set Hp, charhp;
  3578. 	set Sp, charsp;
  3579. 	set @playing, 0;
  3580. 	set @single, 0;
  3581. 	set @heal, 0;
  3582. 	detachrid;
  3583. 	set .@sctf, .@sctf + 1;
  3584. 	goto sover;
  3585. 	}
  3586. }
  3587. for (set .@s, 0; .@s < getarraysize($@single); set .@s, .@s+1) {
  3588. 	setarray $@single[.@s], 0;
  3589. }
  3590. end;
  3591.  
  3592. OnEventGameOverNeutral:
  3593. set .@neutralqt, getarraysize($@neutral);
  3594. set .@nctf, 0;
  3595.  
  3596. nover:
  3597. if (.@nctf < .@neutralqt)
  3598. {
  3599. 	{
  3600. 	attachrid $@neutral[.@nctf];
  3601. 	if (@neutral == 1)
  3602. 		{
  3603. 		if (@team == 2)
  3604. 			{
  3605.  
  3606. 			if ($@nredwin == 1)
  3607. 				{
  3608. 				set #win, #win + 1;
  3609. 				set win, win + 1;
  3610. 				}
  3611.  
  3612. 			if ($@nbluewin == 1)
  3613. 				{
  3614. 				set #lose, #lose + 1;
  3615. 				set lose, lose + 1;
  3616. 				}
  3617. 			}
  3618.  
  3619. 		if (@team == 1)
  3620. 			{
  3621.  
  3622. 			if ($@nredwin == 1)
  3623. 				{
  3624. 				set #lose, #lose + 1;
  3625. 				set lose, lose + 1;
  3626. 				}
  3627.  
  3628. 			if ($@nbluewin == 1)
  3629. 				{
  3630. 				set #win, #win + 1;
  3631. 				set win, win + 1;
  3632. 				}
  3633. 			}
  3634. 		}
  3635.  
  3636. 	save originmap$, (originx), (originy);
  3637. 	warp originmap$, (originx), (originy);
  3638. 	setlook 6, hair;
  3639. 	setlook 7, body;
  3640. 	set Hp, charhp;
  3641. 	set Sp, charsp;
  3642. 	set @playing, 0;
  3643. 	set @neutral, 0;
  3644. 	set @heal, 0;
  3645. 	detachrid;
  3646. 	set .@nctf, .@nctf + 1;
  3647. 	goto nover;
  3648. 	}
  3649. }
  3650. for (set .@n, 0; .@n < getarraysize($@neutral); set .@n, .@n+1) {
  3651. 	setarray $@neutral[.@n], 0;
  3652. }
  3653. end;
  3654.  
  3655. OnEventGameOverCgvg:
  3656. set .@classicgvgqt, getarraysize($@classicgvg);
  3657. set .@gctf, 0;
  3658.  
  3659. gover:
  3660. if (.@gctf < .@classicgvgqt)
  3661. {
  3662. 	{
  3663. 	attachrid $@classicgvg[.@gctf];
  3664. 	if (@classicgvg == 1)
  3665. 		{
  3666. 		if (@team == 2)
  3667. 			{
  3668.  
  3669. 			if ($@gredwin == 1)
  3670. 				{
  3671. 				set #win, #win + 1;
  3672. 				set win, win + 1;
  3673. 				}
  3674.  
  3675. 			if ($@gbluewin == 1)
  3676. 				{
  3677. 				set #lose, #lose + 1;
  3678. 				set lose, lose + 1;
  3679. 				}
  3680. 			}
  3681.  
  3682. 		if (@team == 1)
  3683. 			{
  3684.  
  3685. 			if ($@gredwin == 1)
  3686. 				{
  3687. 				set #lose, #lose + 1;
  3688. 				set lose, lose + 1;
  3689. 				}
  3690.  
  3691. 			if ($@gbluewin == 1)
  3692. 				{
  3693. 				set #win, #win + 1;
  3694. 				set win, win + 1;
  3695. 				}
  3696. 			}
  3697. 		}
  3698.  
  3699. 	save originmap$, (originx), (originy);
  3700. 	warp originmap$, (originx), (originy);
  3701. 	setlook 6, hair;
  3702. 	setlook 7, body;
  3703. 	set Hp, charhp;
  3704. 	set Sp, charsp;
  3705. 	set @playing, 0;
  3706. 	set @classicgvg, 0;
  3707. 	set @heal, 0;
  3708. 	detachrid;
  3709. 	set .@gctf, .@gctf + 1;
  3710. 	goto gover;
  3711. 	}
  3712. }
  3713. for (set .@g, 0; .@g < getarraysize($@classicgvg); set .@g, .@g+1) {
  3714. 	setarray $@classicgvg[.@g], 0;
  3715. }
  3716. end;
  3717.  
  3718. OnEventGameOverPneutral:
  3719. set .@pneutralqt, getarraysize($@pneutral);
  3720. set .@pctf, 0;
  3721.  
  3722. pover:
  3723. if (.@pctf < .@pneutralqt)
  3724. {
  3725. 	{
  3726. 	attachrid $@pneutral[.@pctf];
  3727. 	if (@pneutral == 1)
  3728. 		{
  3729. 		if (@team == 2)
  3730. 			{
  3731.  
  3732. 			if ($@nnredwin == 1)
  3733. 				{
  3734. 				set #win, #win + 1;
  3735. 				set win, win + 1;
  3736. 				}
  3737.  
  3738. 			if ($@nnbluewin == 1)
  3739. 				{
  3740. 				set #lose, #lose + 1;
  3741. 				set lose, lose + 1;
  3742. 				}
  3743. 			}
  3744.  
  3745. 		if (@team == 1)
  3746. 			{
  3747.  
  3748. 			if ($@nnredwin == 1)
  3749. 				{
  3750. 				set #lose, #lose + 1;
  3751. 				set lose, lose + 1;
  3752. 				}
  3753.  
  3754. 			if ($@nnbluewin == 1)
  3755. 				{
  3756. 				set #win, #win + 1;
  3757. 				set win, win + 1;
  3758. 				}
  3759. 			}
  3760. 		}
  3761.  
  3762. 	save originmap$, (originx), (originy);
  3763. 	warp originmap$, (originx), (originy);
  3764. 	setlook 6, hair;
  3765. 	setlook 7, body;
  3766. 	set Hp, charhp;
  3767. 	set Sp, charsp;
  3768. 	set @playing, 0;
  3769. 	set @pneutral, 0;
  3770. 	set @heal, 0;
  3771. 	detachrid;
  3772. 	set .@pctf, .@pctf + 1;
  3773. 	goto pover;
  3774. 	}
  3775. }
  3776. for (set .@p, 0; .@p < getarraysize($@pneutral); set .@p, .@p+1) {
  3777. 	setarray $@pneutral[.@p], 0;
  3778. }
  3779. end;
  3780.  
  3781. }
  3782.  
  3783. prt_are01,252,150,2	script	Red Flag::red_flag	1026,{
  3784.  
  3785. npcspeed 100;
  3786.  
  3787. getmapxy($@redflag$,$@redflagx,$@redflagy,1);
  3788. getmapxy($@redtouch$,$@redtouchx,$@redtouchy,0);
  3789.  
  3790. if (distance($@redflagx,$@redflagy,$@redtouchx,$@redtouchy) <= 2)
  3791. {
  3792.  
  3793. If (@team == 1) 
  3794. {
  3795. 	if ($@redgone == 0)
  3796. 	{ 
  3797. 	set $@redgone, 1;
  3798. 	set #ftaken, #ftaken + 1;
  3799. 	set ftaken, ftaken + 1;
  3800. 	set $@redcarrier$, strcharinfo(0);
  3801. 	announce ""+$@redcarrier$+" has the Red Flag!!",bc_map; 
  3802. 	sc_start SC_DECREASEAGI, 10000, 10;
  3803. 	specialeffect2 38;
  3804. 	goto redfollow;
  3805. 	} 
  3806.  
  3807.  	//Make the flag be picked up by the blue team
  3808. 	if ($@reddropped == 1)
  3809. 	{
  3810. 	set $@reddropped, 0;
  3811. 	set $@redgone, 1; 
  3812. 	set #ftaken, #ftaken + 1;
  3813. 	set ftaken, ftaken + 1;
  3814. 	set $@redcarrier$, strcharinfo(0);
  3815. 	announce ""+$@redcarrier$+" has the Red Flag!!",bc_map; 
  3816. 	sc_start SC_DECREASEAGI, 10000, 10;
  3817. 	specialeffect2 38;
  3818. 	goto redfollow;
  3819. 	}
  3820.  
  3821. 	if (@novalue == 503)
  3822. 	{
  3823. 	redfollow:
  3824.  
  3825. 	if (strcharinfo(0) == $@redcarrier$)
  3826. 		{
  3827. 		getmapxy(@mapname$,@redcarrierx,@redcarriery,0,$@redcarrier$);
  3828. 		npcwalkto (@redcarrierx + 1), (@redcarriery - 1);
  3829.  
  3830. 		set @redagi, @redagi + 1;
  3831. 		set @redwarp, @redwarp + 1;
  3832.  
  3833. 		if (@redwarp == 30)
  3834. 			{
  3835. 			movenpc "red_flag", @redcarrierx, @redcarriery;
  3836. 			set @redwarp, 0;
  3837. 			}
  3838.  
  3839. 		if (@redagi == 5)
  3840. 			{
  3841. 			sc_start SC_DECREASEAGI,10000,10;
  3842. 			specialeffect2 38;
  3843. 			set @redagi, 0;
  3844. 			}
  3845. 		}
  3846.  
  3847. 	if (strcharinfo(0) != $@redcarrier$)
  3848. 		{
  3849. 		end;
  3850. 		}
  3851.  
  3852. 	sleep2 500;
  3853. 	goto redfollow;
  3854. 	}
  3855.  
  3856. }
  3857.  
  3858. If (@team == 2) 
  3859. {
  3860. 	if (($@bluecarrier$ == strcharinfo(0)) && ($@reddropped == 0) && ($@redgone == 0))
  3861. 	{
  3862. 	movenpc "blue_flag", 47, 150;
  3863. 	set $@redpt, $@redpt + 1;
  3864. 	set #fcapt, #fcapt + 1;
  3865. 	set fcapt, fcapt + 1;
  3866. 	set ctfpt, ctfpt + 10;
  3867. 	set tctfpt, tctfpt + 10;
  3868. 	announce "The Blue Team has "+$@bluept+" points.",bc_map;
  3869. 	announce "The Red Team has "+$@redpt+" points.",bc_map;
  3870. 	set $@bluegone, 0;
  3871. 	set $@bluecarrier$, "-";
  3872. 		if ($@redpt >= 5)
  3873. 		{
  3874. 		mapannounce "prt_are01", "The Red Team has won the match",0;
  3875. 		movenpc "blue_flag", 47, 150;
  3876. 		movenpc "red_flag",252,150;
  3877. 		set $@bluept, 0;
  3878. 		set $@redpt, 0;
  3879. 		set $@blueqt, 0;
  3880. 		set $@redqt, 0;
  3881. 		set $@bluecarrier$, "-";
  3882. 		set $@redcarrier$, "-";
  3883. 		set $@redwin, 1;
  3884. 		donpcevent "CTF::OnEventGameOverClassic";
  3885. 		}
  3886. 	}
  3887.  
  3888. 	if ($@reddropped == 1) 
  3889. 	{ 
  3890. 	//Return the Flag
  3891. 	movenpc "red_flag",252,150;
  3892. 	set $@redgone, 0; 
  3893. 	set $@reddropped, 0;
  3894. 	set #freturn, #freturn + 1;
  3895. 	set freturn, freturn + 1;
  3896. 	announce "The Red Flag has been returned.",bc_map; 
  3897. 	}
  3898. }
  3899.  
  3900. }
  3901.  
  3902. }
  3903.  
  3904. prt_are01,47,150,6	script	Blue Flag::blue_flag	1188,{
  3905.  
  3906. npcspeed 100;
  3907.  
  3908. getmapxy($@blueflag$,$@blueflagx,$@blueflagy,1);
  3909. getmapxy($@bluetouch$,$@bluetouchx,$@bluetouchy,0);
  3910.  
  3911. if (distance($@blueflagx,$@blueflagy,$@bluetouchx,$@bluetouchy) <= 2)
  3912. {
  3913.  
  3914. If (@team == 2)
  3915. { 
  3916. 	if ($@bluegone == 0) 
  3917. 	{
  3918. 	set $@bluegone, 1;
  3919. 	set #ftaken, #ftaken + 1;
  3920. 	set ftaken, ftaken + 1;
  3921. 	set $@bluecarrier$, strcharinfo(0);
  3922. 	announce ""+$@bluecarrier$+" has the Blue Flag!!",bc_map;
  3923. 	sc_start SC_DECREASEAGI, 10000, 10;
  3924. 	specialeffect2 38;
  3925. 	goto bluefollow;
  3926. 	} 
  3927.  
  3928.  	//Make the flag be picked up by the red team 
  3929. 	if ($@bluedropped == 1) 
  3930. 	{ 
  3931. 	set $@bluedropped, 0;
  3932. 	set $@bluegone, 1;
  3933. 	set #ftaken, #ftaken + 1;
  3934. 	set ftaken, ftaken + 1;
  3935. 	set $@bluecarrier$, strcharinfo(0); 
  3936. 	announce ""+$@bluecarrier$+" has the Blue Flag!!",bc_map;
  3937. 	sc_start SC_DECREASEAGI, 10000, 10;
  3938. 	specialeffect2 38;
  3939. 	goto bluefollow;
  3940. 	}
  3941.  
  3942. 	if (@novalue == 879)
  3943. 	{
  3944. 	bluefollow:
  3945.  
  3946. 	if (strcharinfo(0) == $@bluecarrier$)
  3947. 		{
  3948. 		getmapxy(@mapname$,@bluecarrierx,@bluecarriery,0,$@bluecarrier$);
  3949. 		npcwalkto (@bluecarrierx - 1), (@bluecarriery - 1);
  3950.  
  3951. 		set @blueagi, @blueagi + 1;
  3952. 		set @bluewarp, @bluewarp + 1;
  3953.  
  3954. 		if (@bluewarp == 30)
  3955. 			{
  3956. 			movenpc "blue_flag", @bluecarrierx, @bluecarriery;
  3957. 			set @bluewarp, 0;
  3958. 			}
  3959.  
  3960. 		if (@blueagi == 5)
  3961. 			{
  3962. 			sc_start SC_DECREASEAGI,10000,10;
  3963. 			specialeffect2 38;
  3964. 			set @blueagi, 0;
  3965. 			}
  3966. 		}
  3967.  
  3968. 	if (strcharinfo(0) != $@bluecarrier$)
  3969. 		{
  3970. 		end;
  3971. 		}
  3972.  
  3973. 	sleep2 500;
  3974. 	goto bluefollow;
  3975. 	}
  3976.  
  3977. } 
  3978.  
  3979. If (@team == 1) 
  3980. {
  3981. 	if (($@redcarrier$ == strcharinfo(0)) && ($@bluedropped == 0) && ($@bluegone == 0))
  3982. 	{
  3983. 	movenpc "red_flag", 252, 150;
  3984. 	set $@bluept, $@bluept + 1;
  3985. 	set #fcapt, #fcapt + 1;
  3986. 	set fcapt, fcapt + 1;
  3987. 	set ctfpt, ctfpt + 10;
  3988. 	set tctfpt, tctfpt + 10;
  3989. 	announce "The Blue Team has "+$@bluept+" points.",bc_map;
  3990. 	announce "The Red Team has "+$@redpt+" points.",bc_map;
  3991. 	set $@redgone, 0;
  3992. 	set $@redcarrier$, "-";
  3993. 		if ($@bluept >= 5)
  3994. 		{
  3995. 		mapannounce "prt_are01", "The Blue Team has won the match",0;
  3996. 		movenpc "blue_flag", 47, 150;
  3997. 		movenpc "red_flag",252,150;
  3998. 		set $@bluept, 0;
  3999. 		set $@redpt, 0;
  4000. 		set $@blueqt, 0;
  4001. 		set $@redqt, 0;
  4002. 		set $@bluecarrier$, "-";
  4003. 		set $@redcarrier$, "-";
  4004. 		set $@bluewin, 1;
  4005. 		donpcevent "CTF::OnEventGameOverClassic";
  4006. 		}
  4007. 	}
  4008.  
  4009. 	if ($@bluedropped == 1) 
  4010. 	{ 
  4011. 	//Return the Flag 
  4012. 	movenpc "blue_flag",47,150;
  4013. 	set $@bluegone, 0;
  4014. 	set $@bluedropped, 0;
  4015. 	set #freturn, #freturn + 1;
  4016. 	set freturn, freturn + 1;
  4017. 	announce "The Blue Flag has been returned.",bc_map; 
  4018. 	}
  4019. }
  4020.  
  4021. }
  4022.  
  4023. }
  4024.  
  4025. pvp_2vs2,60,39,2	script	Red Flag::hard_red_flag	1026,{
  4026.  
  4027. npcspeed 100;
  4028.  
  4029. getmapxy($@hredflag$,$@hredflagx,$@hredflagy,1);
  4030. getmapxy($@hredtouch$,$@hredtouchx,$@hredtouchy,0);
  4031.  
  4032. if (distance($@hredflagx,$@hredflagy,$@hredtouchx,$@hredtouchy) <= 2)
  4033. {
  4034.  
  4035. If (@team == 1) 
  4036. {
  4037. 	if ($@hredgone == 0)
  4038. 	{ 
  4039. 	set $@hredgone, 1;
  4040. 	set #ftaken, #ftaken + 1;
  4041. 	set ftaken, ftaken + 1;
  4042. 	set $@hredcarrier$, strcharinfo(0);
  4043. 	announce ""+$@hredcarrier$+" has the Red Flag!!",bc_map; 
  4044. 	sc_start SC_DECREASEAGI, 10000, 10;
  4045. 	sc_start SC_CURSE, 10000, 10;
  4046. 	sc_start SC_SILENCE, 10000, 10;
  4047. 	specialeffect2 38;
  4048. 	goto hredfollow;
  4049. 	} 
  4050.  
  4051.  	//Make the flag be picked up by the blue team
  4052. 	if ($@hreddropped == 1)
  4053. 	{
  4054. 	set $@hreddropped, 0;
  4055. 	set $@hredgone, 1; 
  4056. 	set #ftaken, #ftaken + 1;
  4057. 	set ftaken, ftaken + 1;
  4058. 	set $@hredcarrier$, strcharinfo(0);
  4059. 	announce ""+$@hredcarrier$+" has the Red Flag!!",bc_map; 
  4060. 	sc_start SC_DECREASEAGI, 10000, 10;
  4061. 	sc_start SC_SILENCE, 10000, 10;
  4062. 	sc_start SC_CURSE, 10000, 10;
  4063. 	specialeffect2 38;
  4064. 	goto hredfollow;
  4065. 	}
  4066.  
  4067. 	if (@novalue == 932847)
  4068. 	{
  4069. 	hredfollow:
  4070.  
  4071. 	if (strcharinfo(0) == $@hredcarrier$)
  4072. 		{
  4073. 		getmapxy(@mapname$,@hredcarrierx,@hredcarriery,0,$@hredcarrier$);
  4074. 		npcwalkto (@hredcarrierx + 1), (@hredcarriery - 1);
  4075.  
  4076. 		set @hredagi, @hredagi + 1;
  4077. 		set @hredwarp, @hredwarp + 1;
  4078.  
  4079. 		if (@hredwarp == 30)
  4080. 			{
  4081. 			movenpc "hard_red_flag", @hredcarrierx, @hredcarriery;
  4082. 			set @hredwarp, 0;
  4083. 			}
  4084.  
  4085. 		if (@hredagi == 5)
  4086. 			{
  4087. 			sc_start SC_DECREASEAGI,10000,10;
  4088. 			sc_start SC_SILENCE, 10000, 10;
  4089. 			sc_start SC_CURSE, 10000, 10;
  4090. 			specialeffect2 38;
  4091. 			set @hredagi, 0;
  4092. 			}
  4093. 		}
  4094.  
  4095. 	if (strcharinfo(0) != $@hredcarrier$)
  4096. 		{
  4097. 		end;
  4098. 		}
  4099.  
  4100. 	sleep2 500;
  4101. 	goto hredfollow;
  4102. 	}
  4103.  
  4104. }
  4105.  
  4106. If (@team == 2) 
  4107. {
  4108. 	if (($@hbluecarrier$ == strcharinfo(0)) && ($@hreddropped == 0) && ($@hredgone == 0))
  4109. 	{
  4110. 	movenpc "hard_blue_flag", 19, 39;
  4111. 	set $@hredpt, $@hredpt + 1;
  4112. 	set #fcapt, #fcapt + 1;
  4113. 	set fcapt, fcapt + 1;
  4114. 	set ctfpt, ctfpt + 10;
  4115. 	set tctfpt, tctfpt + 10;
  4116. 	announce "The Blue Team has "+$@hbluept+" points.",bc_map;
  4117. 	announce "The Red Team has "+$@hredpt+" points.",bc_map;
  4118. 	set $@hbluegone, 0;
  4119. 	set $@hbluecarrier$, "-";
  4120. 		if ($@hredpt >= 5)
  4121. 		{
  4122. 		mapannounce "pvp_2vs2", "The Red Team has won the match",0;
  4123. 		movenpc "hard_blue_flag", 19, 39;
  4124. 		movenpc "hard_red_flag",60, 39;
  4125. 		set $@hbluept, 0;
  4126. 		set $@hredpt, 0;
  4127. 		set $@hredqt, 0;
  4128. 		set $@hblueqt, 0;
  4129. 		set $@hbluecarrier$, "-";
  4130. 		set $@hredcarrier$, "-";
  4131. 		set $@hredwin, 1;
  4132. 		donpcevent "CTF::OnEventGameOverHardcore";
  4133. 		}
  4134. 	}
  4135.  
  4136. 	if ($@hreddropped == 1) 
  4137. 	{
  4138. 	//Return the Flag
  4139. 	movenpc "hard_red_flag",60,39;
  4140. 	set $@hredgone, 0; 
  4141. 	set $@hreddropped, 0;
  4142. 	set #freturn, #freturn + 1;
  4143. 	set freturn, freturn + 1;
  4144. 	announce "The Red Flag has been returned.",bc_map;  
  4145. 	}
  4146. }
  4147.  
  4148. }
  4149.  
  4150. }
  4151.  
  4152. pvp_2vs2,19,39,6	script	Blue Flag::hard_blue_flag	1188,{
  4153.  
  4154. npcspeed 100;
  4155.  
  4156. getmapxy($@hblueflag$,$@hblueflagx,$@hblueflagy,1);
  4157. getmapxy($@hbluetouch$,$@hbluetouchx,$@hbluetouchy,0);
  4158.  
  4159. if (distance($@hblueflagx,$@hblueflagy,$@hbluetouchx,$@hbluetouchy) <= 2)
  4160. {
  4161.  
  4162. If (@team == 2)
  4163. { 
  4164. 	if ($@hbluegone == 0) 
  4165. 	{
  4166. 	set $@hbluegone, 1;
  4167. 	set #ftaken, #ftaken + 1;
  4168. 	set ftaken, ftaken + 1;
  4169. 	set $@hbluecarrier$, strcharinfo(0);
  4170. 	announce ""+$@hbluecarrier$+" has the Blue Flag!!",bc_map;
  4171. 	sc_start SC_DECREASEAGI, 10000, 10;
  4172. 	sc_start SC_SILENCE, 10000, 10;
  4173. 	sc_start SC_CURSE, 10000, 10;
  4174. 	specialeffect2 38;
  4175. 	goto hbluefollow;
  4176. 	} 
  4177.  
  4178.  	//Make the flag be picked up by the red team 
  4179. 	if ($@hbluedropped == 1) 
  4180. 	{ 
  4181. 	set $@hbluedropped, 0;
  4182. 	set $@hbluegone, 1;
  4183. 	set #ftaken, #ftaken + 1;
  4184. 	set ftaken, ftaken + 1;
  4185. 	set $@hbluecarrier$, strcharinfo(0); 
  4186. 	announce ""+$@hbluecarrier$+" has the Blue Flag!!",bc_map;
  4187. 	sc_start SC_DECREASEAGI, 10000, 10;
  4188. 	sc_start SC_SILENCE, 10000, 10;
  4189. 	sc_start SC_CURSE, 10000, 10;
  4190. 	specialeffect2 38;
  4191. 	goto hbluefollow;
  4192. 	}
  4193.  
  4194. 	if (@novalue == 9832)
  4195. 	{
  4196. 	hbluefollow:
  4197.  
  4198. 	if (strcharinfo(0) == $@hbluecarrier$)
  4199. 		{
  4200. 		getmapxy(@mapname$,@hbluecarrierx,@hbluecarriery,0,$@hbluecarrier$);
  4201. 		npcwalkto (@hbluecarrierx - 1), (@hbluecarriery - 1);
  4202.  
  4203. 		set @hblueagi, @hblueagi + 1;
  4204. 		set @hbluewarp, @hbluewarp + 1;
  4205.  
  4206. 		if (@hbluewarp == 30)
  4207. 			{
  4208. 			movenpc "hard_blue_flag", @hbluecarrierx, @hbluecarriery;
  4209. 			set @hbluewarp, 0;
  4210. 			}
  4211.  
  4212. 		if (@hblueagi == 5)
  4213. 			{
  4214. 			sc_start SC_DECREASEAGI,10000,10;
  4215. 			sc_start SC_SILENCE, 10000, 10;
  4216. 			sc_start SC_CURSE, 10000, 10;
  4217. 			specialeffect2 38;
  4218. 			set @hblueagi, 0;
  4219. 			}
  4220. 		}
  4221.  
  4222. 	if (strcharinfo(0) != $@hbluecarrier$)
  4223. 		{
  4224. 		end;
  4225. 		}
  4226.  
  4227. 	sleep2 500;
  4228. 	goto hbluefollow;
  4229. 	}
  4230.  
  4231. } 
  4232.  
  4233. If (@team == 1) 
  4234. {
  4235. 	if (($@hredcarrier$ == strcharinfo(0)) && ($@hbluedropped == 0) && ($@hbluegone == 0))
  4236. 	{
  4237. 	movenpc "hard_red_flag", 60, 39;
  4238. 	set $@hbluept, $@hbluept + 1;
  4239. 	set #fcapt, #fcapt + 1;
  4240. 	set fcapt, fcapt + 1;
  4241. 	set ctfpt, ctfpt + 10;
  4242. 	set tctfpt, tctfpt + 10;
  4243. 	announce "The Blue Team has "+$@hbluept+" points.",bc_map;
  4244. 	announce "The Red Team has "+$@hredpt+" points.",bc_map;
  4245. 	set $@hredgone, 0;
  4246. 	set $@hredcarrier$, "-";
  4247.  
  4248. 		if ($@hbluept >= 5)
  4249. 		{
  4250. 		mapannounce "pvp_2vs2", "The Blue Team has won the match",0;
  4251. 		movenpc "hard_blue_flag", 19, 39;
  4252. 		movenpc "hard_red_flag",60,39;
  4253. 		set $@hbluept, 0;
  4254. 		set $@hredpt, 0;
  4255. 		set $@hredqt, 0;
  4256. 		set $@hblueqt, 0;
  4257. 		set $@hbluecarrier$, "-";
  4258. 		set $@hredcarrier$, "-";
  4259. 		set $@hbluewin, 1;
  4260. 		donpcevent "CTF::OnEventGameOverHardcore";
  4261. 		}
  4262. 	}
  4263.  
  4264. 	if ($@hbluedropped == 1) 
  4265. 	{ 
  4266. 	//Return the Flag
  4267. 	movenpc "hard_blue_flag",19,39;
  4268. 	set $@hbluegone, 0;
  4269. 	set $@hbluedropped, 0;
  4270. 	set #freturn, #freturn + 1;
  4271. 	set freturn, freturn + 1;
  4272. 	announce "The Blue Flag has been returned.",bc_map; 
  4273. 	}
  4274. }
  4275.  
  4276. }
  4277.  
  4278. }
  4279.  
  4280. pvp_y_5-2,210,130,2	script	Red Flag::single_red_flag	1026,{
  4281.  
  4282. npcspeed 100;
  4283.  
  4284. getmapxy($@sredflag$,$@sredflagx,$@sredflagy,1);
  4285. getmapxy($@sredtouch$,$@sredtouchx,$@sredtouchy,0);
  4286.  
  4287. if (distance($@sredflagx,$@sredflagy,$@sredtouchx,$@sredtouchy) <= 2)
  4288. {
  4289.  
  4290. If ((@team == 1) && ($@boff == 1) && ($@roundover == 0))
  4291. {
  4292. 	if ($@sredgone == 0)
  4293. 	{ 
  4294. 	set $@sredgone, 1;
  4295. 	set $@suddendeath, 1;
  4296. 	set $@rresett, 1;
  4297. 	set #ftaken, #ftaken + 1;
  4298. 	set ftaken, ftaken + 1;
  4299. 	set $@sredcarrier$, strcharinfo(0);
  4300. 	announce ""+$@sredcarrier$+" has the Red Flag!!",bc_map; 
  4301. 	sc_start SC_DECREASEAGI, 10000, 10;
  4302. 	sc_start SC_SILENCE, 10000, 10;
  4303. 	sc_start SC_DPOISON, 10000, 10;
  4304. 	specialeffect2 38;
  4305. 	goto sredfollow;
  4306. 	} 
  4307.  
  4308.  	//Make the flag be picked up by the blue team
  4309. 	if ($@sreddropped == 1)
  4310. 	{
  4311. 	set $@sreddropped, 0;
  4312. 	set $@sredgone, 1;
  4313. 	set $@suddendeath, 1;
  4314. 	set $@rresett, 1;
  4315. 	set #ftaken, #ftaken + 1;
  4316. 	set ftaken, ftaken + 1;
  4317. 	set $@sredcarrier$, strcharinfo(0);
  4318. 	announce ""+$@sredcarrier$+" has the Red Flag!!",bc_map; 
  4319. 	sc_start SC_DECREASEAGI, 10000, 10;
  4320. 	sc_start SC_SILENCE, 10000, 10;
  4321. 	sc_start SC_DPOISON, 10000, 10;
  4322. 	specialeffect2 38;
  4323. 	goto sredfollow;
  4324. 	}
  4325.  
  4326. 	if (@novalue == 9324)
  4327. 	{
  4328. 	sredfollow:
  4329.  
  4330. 	if (strcharinfo(0) == $@sredcarrier$)
  4331. 		{
  4332. 		getmapxy(@mapname$,@sredcarrierx,@sredcarriery,0,$@sredcarrier$);
  4333. 		npcwalkto (@sredcarrierx + 1), (@sredcarriery - 1);
  4334.  
  4335. 		set @sredagi, @sredagi + 1;
  4336. 		set @sredwarp, @sredwarp + 1;
  4337.  
  4338. 		if (@sredwarp == 30)
  4339. 			{
  4340. 			movenpc "single_red_flag", @sredcarrierx, @sredcarriery;
  4341. 			set @sredwarp, 0;
  4342. 			}
  4343.  
  4344. 		if (@sredagi == 5)
  4345. 			{
  4346. 			sc_start SC_DECREASEAGI,10000,10;
  4347. 			sc_start SC_SILENCE, 10000, 10;
  4348. 			sc_start SC_DPOISON, 10000, 10;
  4349. 			specialeffect2 38;
  4350. 			set @sredagi, 0;
  4351. 			}
  4352. 		}
  4353.  
  4354. 	if (strcharinfo(0) != $@sredcarrier$)
  4355. 		{
  4356. 		end;
  4357. 		}
  4358.  
  4359. 	sleep2 500;
  4360. 	goto sredfollow;
  4361. 	}
  4362.  
  4363. }
  4364.  
  4365. If ((@team == 2) && ($@roff == 1) && ($@roundover == 0)) 
  4366. {
  4367. 	if (($@sbluecarrier$ == strcharinfo(0)) && ($@sreddropped == 0) && ($@sredgone == 0))
  4368. 	{
  4369. 	donpcevent "CTF::OnEventRoundOver";
  4370. 	set $@sredpt, $@sredpt + 1;
  4371. 	set #fcapt, #fcapt + 1;
  4372. 	set fcapt, fcapt + 1;
  4373. 	set ctfpt, ctfpt + 10;
  4374. 	set tctfpt, tctfpt + 10;
  4375. 	announce "The Red Team Scored!!",bc_map;
  4376. 	announce "The Blue Team has "+$@sbluept+" points.",bc_map;
  4377. 	announce "The Red Team has "+$@sredpt+" points.",bc_map;
  4378. 	set $@roundover, 1;
  4379.  
  4380. 		if ($@sredpt >= 5)
  4381. 		{
  4382. 		mapannounce "pvp_y_5-2", "The Red Team has won the match",0;
  4383. 		movenpc "single_blue_flag",53,130;
  4384. 		movenpc "single_red_flag",210,130;
  4385. 		set $@sbluept, 0;
  4386. 		set $@sredpt, 0;
  4387. 		set $@sblueqt, 0;
  4388. 		set $@sredqt, 0;
  4389. 		set $@sbluecarrier$, "-";
  4390. 		set $@sredcarrier$, "-";
  4391. 		set $@sredwin, 1;
  4392. 		donpcevent "CTF::OnEventGameOverSingle";
  4393. 		}
  4394. 	}
  4395. }
  4396.  
  4397. }
  4398.  
  4399. }
  4400.  
  4401. pvp_y_5-2,53,130,6	script	Blue Flag::single_blue_flag	1188,{
  4402.  
  4403. npcspeed 100;
  4404.  
  4405. getmapxy($@sblueflag$,$@sblueflagx,$@sblueflagy,1);
  4406. getmapxy($@sbluetouch$,$@sbluetouchx,$@sbluetouchy,0);
  4407.  
  4408. if (distance($@sblueflagx,$@sblueflagy,$@sbluetouchx,$@sbluetouchy) <= 2)
  4409. {
  4410.  
  4411. If ((@team == 2) && ($@roff == 1) && ($@roundover == 0))
  4412. { 
  4413. 	if ($@sbluegone == 0) 
  4414. 	{
  4415. 	set $@sbluegone, 1;
  4416. 	set $@suddendeath, 1;
  4417. 	set #ftaken, #ftaken + 1;
  4418. 	set ftaken, ftaken + 1;
  4419. 	set $@bresett, 1;
  4420. 	set $@sbluecarrier$, strcharinfo(0);
  4421. 	setnpctimer 0;
  4422. 	announce ""+$@sbluecarrier$+" has the Blue Flag!!",bc_map;
  4423. 	sc_start SC_DECREASEAGI, 10000, 10;
  4424. 	sc_start SC_SILENCE, 10000, 10;
  4425. 	sc_start SC_DPOISON, 10000, 10;
  4426. 	specialeffect2 38;
  4427. 	goto sbluefollow;
  4428. 	} 
  4429.  
  4430.  	//Make the flag be picked up by the red team 
  4431. 	if ($@sbluedropped == 1) 
  4432. 	{ 
  4433. 	set $@sbluedropped, 0;
  4434. 	set $@sbluegone, 1;
  4435. 	set $@suddendeath, 1;
  4436. 	set $@bresett, 1;
  4437. 	set #ftaken, #ftaken + 1;
  4438. 	set ftaken, ftaken + 1;
  4439. 	set $@sbluecarrier$, strcharinfo(0); 
  4440. 	setnpctimer 0;
  4441. 	announce ""+$@sbluecarrier$+" has the Blue Flag!!",bc_map;
  4442. 	sc_start SC_DECREASEAGI, 10000, 10;
  4443. 	sc_start SC_SILENCE, 10000, 10;
  4444. 	sc_start SC_DPOISON, 10000, 10;
  4445. 	specialeffect2 38;
  4446. 	goto sbluefollow;
  4447. 	}
  4448.  
  4449. 	if (@novalue == 89)
  4450. 	{
  4451. 	sbluefollow:
  4452.  
  4453. 	if (strcharinfo(0) == $@sbluecarrier$)
  4454. 		{
  4455. 		getmapxy(@mapname$,@sbluecarrierx,@sbluecarriery,0,$@sbluecarrier$);
  4456. 		npcwalkto (@sbluecarrierx - 1), (@sbluecarriery - 1);
  4457.  
  4458. 		set @sblueagi, @sblueagi + 1;
  4459. 		set @sbluewarp, @sbluewarp + 1;
  4460.  
  4461. 		if (@sbluewarp == 30)
  4462. 			{
  4463. 			movenpc "single_blue_flag", @sbluecarrierx, @sbluecarriery;
  4464. 			set @sbluewarp, 0;
  4465. 			}
  4466.  
  4467. 		if (@sblueagi == 5)
  4468. 			{
  4469. 			sc_start SC_DECREASEAGI,10000,10;
  4470. 			sc_start SC_SILENCE, 10000, 10;
  4471. 			sc_start SC_DPOISON, 10000, 10;
  4472. 			specialeffect2 38;
  4473. 			set @sblueagi, 0;
  4474. 			}
  4475. 		}
  4476.  
  4477. 	if (strcharinfo(0) != $@sbluecarrier$)
  4478. 		{
  4479. 		end;
  4480. 		}
  4481.  
  4482. 	sleep2 500;
  4483. 	goto sbluefollow;
  4484. 	}
  4485.  
  4486. } 
  4487.  
  4488. If ((@team == 1) && ($@boff == 1) && ($@roundover == 0))
  4489. {
  4490. 	if (($@sredcarrier$ == strcharinfo(0)) && ($@sbluedropped == 0) && ($@sbluegone == 0))
  4491. 	{
  4492. 	donpcevent "CTF::OnEventRoundOver";
  4493. 	set $@sbluept, $@sbluept + 1;
  4494. 	set #fcapt, #fcapt + 1;
  4495. 	set fcapt, fcapt + 1;
  4496. 	set ctfpt, ctfpt + 10;
  4497. 	set tctfpt, tctfpt + 10;
  4498. 	announce "The Blue Team Scored!!",bc_map;
  4499. 	announce "The Blue Team has "+$@sbluept+" points.",bc_map;
  4500. 	announce "The Red Team has "+$@sredpt+" points.",bc_map; 
  4501. 	set $@roundover, 1;
  4502.  
  4503. 		if ($@sbluept >= 5)
  4504. 		{
  4505. 		mapannounce "pvp_y_5-2", "The Blue Team has won the match",0;
  4506. 		movenpc "single_blue_flag",53,130;
  4507. 		movenpc "single_red_flag",210,130;
  4508. 		set $@sbluept, 0;
  4509. 		set $@sredpt, 0;
  4510. 		set $@sblueqt, 0;
  4511. 		set $@sredqt, 0;
  4512. 		set $@sbluecarrier$, "-";
  4513. 		set $@sredcarrier$, "-";
  4514. 		set $@sbluewin, 1;
  4515. 		donpcevent "CTF::OnEventGameOverSingle";
  4516. 		}
  4517.  
  4518. 	}
  4519. }
  4520.  
  4521. }
  4522.  
  4523. }
  4524.  
  4525. tha_t10,127,124,4	script	Flag::neutral_flag	1512,{
  4526.  
  4527. npcspeed 100;
  4528.  
  4529. getmapxy($@nflag$,$@nflagx,$@nflagy,1);
  4530. getmapxy($@ntouch$,$@ntouchx,$@ntouchy,0);
  4531.  
  4532. if (distance($@nflagx,$@nflagy,$@ntouchx,$@ntouchy) <= 2)
  4533. {
  4534.  
  4535. if (@team == 2)
  4536. 	{
  4537. 	set @teammate$, " Red member,";
  4538. 	}
  4539.  
  4540. if (@team == 1)
  4541. 	{
  4542. 	set @teammate$, " Blue member,";
  4543. 	}
  4544.  
  4545. if ($@flaggone == 0)
  4546. 	{
  4547. 	set $@flagresett, 1;
  4548. 	set $@flaggone, 1;
  4549. 	set #ftaken, #ftaken + 1;
  4550. 	set ftaken, ftaken + 1;
  4551. 	set $@flagcarrier$, strcharinfo(0);
  4552. 	announce ""+@teammate$+" "+$@flagcarrier$+" has the Flag!!",bc_map; 
  4553. 	sc_start SC_DECREASEAGI, 10000, 10;
  4554. 	sc_start SC_SILENCE, 10000, 10;
  4555. 	sc_start SC_DPOISON, 10000, 10;
  4556. 	specialeffect2 38;
  4557. 	goto neutralfollow;
  4558. 	} 
  4559.  
  4560. if ($@flagdropped == 1)
  4561. 	{
  4562. 	set $@flagresett, 1;
  4563. 	set $@flagdropped, 0;
  4564. 	set $@flaggone, 1;
  4565. 	set #ftaken, #ftaken + 1;
  4566. 	set ftaken, ftaken + 1;
  4567. 	set $@flagcarrier$, strcharinfo(0);
  4568. 	announce ""+$@flagcarrier$+" has the Flag!!",bc_map; 
  4569. 	sc_start SC_DECREASEAGI, 10000, 10;
  4570. 	sc_start SC_SILENCE, 10000, 10;
  4571. 	sc_start SC_DPOISON, 10000, 10;
  4572. 	specialeffect2 38;
  4573. 	goto neutralfollow;
  4574. 	}
  4575.  
  4576. 	if (@novalue == 6969696969)
  4577. 	{
  4578. 	neutralfollow:
  4579.  
  4580. 	if (strcharinfo(0) == $@flagcarrier$)
  4581. 		{
  4582. 		getmapxy(@mapname$,@flagcarrierx,@flagcarriery,0,$@flagcarrier$);
  4583. 		npcwalkto (@flagcarrierx - 2), (@flagcarriery);
  4584.  
  4585. 		set @flagagi, @flagagi + 1;
  4586. 		set @flagwarp, @flagwarp + 1;
  4587.  
  4588. 		if (@flagwarp == 30)
  4589. 			{
  4590. 			movenpc "neutral_flag", @flagcarrierx, @flagcarriery;
  4591. 			set @flagwarp, 0;
  4592. 			}
  4593.  
  4594. 		if (@flagagi == 5)
  4595. 			{
  4596. 			sc_start SC_DECREASEAGI,10000,10;
  4597. 			sc_start SC_SILENCE, 10000, 10;
  4598. 			sc_start SC_DPOISON, 10000, 10;
  4599. 			specialeffect2 38;
  4600. 			set @flagagi, 0;
  4601. 			}
  4602. 		}
  4603.  
  4604. 	if (strcharinfo(0) != $@flagcarrier$)
  4605. 		{
  4606. 		end;
  4607. 		}
  4608.  
  4609. 	sleep2 500;
  4610. 	goto neutralfollow;
  4611. 	}
  4612.  
  4613. }
  4614.  
  4615. end;
  4616. }
  4617.  
  4618. tha_t10,100,156,4	script	Red Base::red_base	1026,{
  4619.  
  4620. getmapxy($@redbase$,$@redbasex,$@redbasey,1);
  4621. getmapxy($@rbasetouch$,$@rbasetouchx,$@rbasetouchy,0);
  4622.  
  4623. if (distance($@redbasex,$@redbasey,$@rbasetouchx,$@rbasetouchy) <= 2)
  4624. {
  4625.  
  4626. If (@team == 2) 
  4627. {
  4628. 	if ($@flagcarrier$ == strcharinfo(0))
  4629. 	{
  4630. 	movenpc "neutral_flag",127,124;
  4631. 	set $@nredpt, $@nredpt + 1;
  4632. 	set #fcapt, #fcapt + 1;
  4633. 	set fcapt, fcapt + 1;
  4634. 	set ctfpt, ctfpt + 10;
  4635. 	set tctfpt, tctfpt + 10;
  4636. 	announce "The Blue Team has "+$@nbluept+" points.",bc_map;
  4637. 	announce "The Red Team has "+$@nredpt+" points.",bc_map;
  4638. 	set $@flaggone, 0;
  4639. 	set $@flagcarrier$, "-";
  4640.  
  4641. 		if ($@nredpt >= 5)
  4642. 		{
  4643. 		mapannounce "tha_t10", "The Red Team has won the match",0;
  4644. 		set $@nbluept, 0;
  4645. 		set $@nredpt, 0;
  4646. 		set $@nblueqt, 0;
  4647. 		set $@nredqt, 0;
  4648. 		set $@flagcarrier$, "-";
  4649. 		set $@nredwin, 1;
  4650. 		donpcevent "CTF::OnEventGameOverNeutral";
  4651. 		}
  4652. 	}
  4653. }
  4654.  
  4655. }
  4656.  
  4657. }
  4658.  
  4659. tha_t10,157,100,4	script	Blue Base::blue_base	1188,{
  4660.  
  4661. getmapxy($@bluebase$,$@bluebasex,$@bluebasey,1);
  4662. getmapxy($@bbasetouch$,$@bbasetouchx,$@bbasetouchy,0);
  4663.  
  4664. if (distance($@bluebasex,$@bluebasey,$@bbasetouchx,$@bbasetouchy) <= 2)
  4665. {
  4666.  
  4667. If (@team == 1) 
  4668. {
  4669. 	if ($@flagcarrier$ == strcharinfo(0))
  4670. 	{
  4671. 	movenpc "neutral_flag",127,124;
  4672. 	set $@nbluept, $@nbluept + 1;
  4673. 	set #fcapt, #fcapt + 1;
  4674. 	set fcapt, fcapt + 1;
  4675. 	set ctfpt, ctfpt + 10;
  4676. 	set tctfpt, tctfpt + 10;
  4677. 	announce "The Blue Team has "+$@nbluept+" points.",bc_map;
  4678. 	announce "The Red Team has "+$@nredpt+" points.",bc_map;
  4679. 	set $@flaggone, 0;
  4680. 	set $@flagcarrier$, "-";
  4681.  
  4682. 		if ($@nbluept >= 5)
  4683. 		{
  4684. 		mapannounce "tha_t10", "The Blue Team has won the match",0;
  4685. 		set $@nbluept, 0;
  4686. 		set $@nredpt, 0;
  4687. 		set $@nblueqt, 0;
  4688. 		set $@nredqt, 0;
  4689. 		set $@flagcarrier$, "-";
  4690. 		set $@nbluewin, 1;
  4691. 		donpcevent "CTF::OnEventGameOverNeutral";
  4692. 		}
  4693. 	}
  4694. }
  4695.  
  4696. }
  4697.  
  4698. }
  4699.  
  4700. //poring_w02,98,41,2	script	Red Flag::classicgvg_red_flag	1026,{
  4701. poring_w02,98,30,2	script	Red Flag::classicgvg_red_flag	1026,{
  4702.  
  4703. npcspeed 100;
  4704.  
  4705. getmapxy($@gredflag$,$@gredflagx,$@gredflagy,1);
  4706. getmapxy($@gredtouch$,$@gredtouchx,$@gredtouchy,0);
  4707.  
  4708. if (distance($@gredflagx,$@gredflagy,$@gredtouchx,$@gredtouchy) <= 2)
  4709. {
  4710.  
  4711. If (@team == 1) 
  4712. {
  4713. 	if ($@gredgone == 0)
  4714. 	{ 
  4715. 	set $@gredgone, 1;
  4716. 	set #ftaken, #ftaken + 1;
  4717. 	set ftaken, ftaken + 1;
  4718. 	set $@gredcarrier$, strcharinfo(0);
  4719. 	announce ""+$@gredcarrier$+" has the Red Flag!!",bc_map; 
  4720. 	sc_start SC_DECREASEAGI, 10000, 10;
  4721. 	sc_start SC_SILENCE, 10000, 10;
  4722. 	specialeffect2 38;
  4723. 	goto gredfollow;
  4724. 	} 
  4725.  
  4726.  	//Make the flag be picked up by the blue team
  4727. 	if ($@greddropped == 1)
  4728. 	{
  4729. 	set $@greddropped, 0;
  4730. 	set $@gredgone, 1; 
  4731. 	set #ftaken, #ftaken + 1;
  4732. 	set ftaken, ftaken + 1;
  4733. 	set $@gredcarrier$, strcharinfo(0);
  4734. 	announce ""+$@gredcarrier$+" has the Red Flag!!",bc_map; 
  4735. 	sc_start SC_DECREASEAGI, 10000, 10;
  4736. 	sc_start SC_SILENCE, 10000, 10;
  4737. 	specialeffect2 38;
  4738. 	goto gredfollow;
  4739. 	}
  4740.  
  4741. 	if (@novalue == 932847)
  4742. 	{
  4743. 	gredfollow:
  4744.  
  4745. 	if (strcharinfo(0) == $@gredcarrier$)
  4746. 		{
  4747. 		getmapxy(@mapname$,@gredcarrierx,@gredcarriery,0,$@gredcarrier$);
  4748. 		npcwalkto (@gredcarrierx + 1), (@gredcarriery - 1);
  4749.  
  4750. 		set @gredagi, @gredagi + 1;
  4751. 		set @gredwarp, @gredwarp + 1;
  4752.  
  4753. 		if (@gredwarp == 30)
  4754. 			{
  4755. 			movenpc "classicgvg_red_flag", @gredcarrierx, @gredcarriery;
  4756. 			set @gredwarp, 0;
  4757. 			}
  4758.  
  4759. 		if (@gredagi == 5)
  4760. 			{
  4761. 			sc_start SC_DECREASEAGI,10000,10;
  4762. 			sc_start SC_SILENCE, 10000, 10;
  4763. 			specialeffect2 38;
  4764. 			set @gredagi, 0;
  4765. 			}
  4766. 		}
  4767.  
  4768. 	if (strcharinfo(0) != $@gredcarrier$)
  4769. 		{
  4770. 		end;
  4771. 		}
  4772.  
  4773. 	sleep2 500;
  4774. 	goto gredfollow;
  4775. 	}
  4776.  
  4777. }
  4778.  
  4779. If (@team == 2) 
  4780. {
  4781. 	if (($@gbluecarrier$ == strcharinfo(0)) && ($@greddropped == 0) && ($@gredgone == 0))
  4782. 	{
  4783. 	//movenpc "classicgvg_blue_flag",98,124;
  4784. 	movenpc "classicgvg_blue_flag",98,135;
  4785. 	set $@gredpt, $@gredpt + 1;
  4786. 	set #fcapt, #fcapt + 1;
  4787. 	set fcapt, fcapt + 1;
  4788. 	set ctfpt, ctfpt + 10;
  4789. 	set tctfpt, tctfpt + 10;
  4790. 	announce "The Blue Team has "+$@gbluept+" points.",bc_map;
  4791. 	announce "The Red Team has "+$@gredpt+" points.",bc_map;
  4792. 	set $@gbluegone, 0;
  4793. 	set $@gbluecarrier$, "-";
  4794. 		if ($@gredpt >= 5)
  4795. 		{
  4796. 		mapannounce "poring_w02", "The Red Team has won the match",0;
  4797. 		//movenpc "classicgvg_blue_flag",98,124;
  4798. 		//movenpc "classicgvg_red_flag",98,41;
  4799. 		movenpc "classicgvg_red_flag",98,30;
  4800. 		movenpc "classicgvg_blue_flag",98,135;
  4801. 		set $@gbluept, 0;
  4802. 		set $@gredpt, 0;
  4803. 		set $@gredqt, 0;
  4804. 		set $@gblueqt, 0;
  4805. 		set $@gbluecarrier$, "-";
  4806. 		set $@gredcarrier$, "-";
  4807. 		set $@gredwin, 1;
  4808. 		donpcevent "CTF::OnEventGameOverCgvg";
  4809. 		}
  4810. 	}
  4811.  
  4812. 	if ($@greddropped == 1) 
  4813. 	{
  4814. 	//Return the Flag
  4815. 	//movenpc "classicgvg_red_flag",98,41;
  4816. 	movenpc "classicgvg_red_flag",98,30;
  4817. 	set $@gredgone, 0; 
  4818. 	set $@greddropped, 0;
  4819. 	set #freturn, #freturn + 1;
  4820. 	set freturn, freturn + 1;
  4821. 	announce "The Red Flag has been returned.",bc_map;  
  4822. 	}
  4823. }
  4824.  
  4825. }
  4826.  
  4827. }
  4828.  
  4829. //poring_w02,98,124,6	script	Blue Flag::classicgvg_blue_flag	1188,{
  4830. poring_w02,98,135,6	script	Blue Flag::classicgvg_blue_flag	1188,{
  4831.  
  4832. npcspeed 100;
  4833.  
  4834. getmapxy($@gblueflag$,$@gblueflagx,$@gblueflagy,1);
  4835. getmapxy($@gbluetouch$,$@gbluetouchx,$@gbluetouchy,0);
  4836.  
  4837. if (distance($@gblueflagx,$@gblueflagy,$@gbluetouchx,$@gbluetouchy) <= 2)
  4838. {
  4839.  
  4840. If (@team == 2)
  4841. { 
  4842. 	if ($@gbluegone == 0) 
  4843. 	{
  4844. 	set $@gbluegone, 1;
  4845. 	set #ftaken, #ftaken + 1;
  4846. 	set ftaken, ftaken + 1;
  4847. 	set $@gbluecarrier$, strcharinfo(0);
  4848. 	announce ""+$@gbluecarrier$+" has the Blue Flag!!",bc_map;
  4849. 	sc_start SC_DECREASEAGI, 10000, 10;
  4850. 	sc_start SC_SILENCE, 10000, 10;
  4851. 	specialeffect2 38;
  4852. 	goto gbluefollow;
  4853. 	} 
  4854.  
  4855.  	//Make the flag be picked up by the red team 
  4856. 	if ($@gbluedropped == 1) 
  4857. 	{ 
  4858. 	set $@gbluedropped, 0;
  4859. 	set $@gbluegone, 1;
  4860. 	set #ftaken, #ftaken + 1;
  4861. 	set ftaken, ftaken + 1;
  4862. 	set $@gbluecarrier$, strcharinfo(0); 
  4863. 	announce ""+$@gbluecarrier$+" has the Blue Flag!!",bc_map;
  4864. 	sc_start SC_DECREASEAGI, 10000, 10;
  4865. 	sc_start SC_SILENCE, 10000, 10;
  4866. 	specialeffect2 38;
  4867. 	goto gbluefollow;
  4868. 	}
  4869.  
  4870. 	if (@novalue == 9832)
  4871. 	{
  4872. 	gbluefollow:
  4873.  
  4874. 	if (strcharinfo(0) == $@gbluecarrier$)
  4875. 		{
  4876. 		getmapxy(@mapname$,@gbluecarrierx,@gbluecarriery,0,$@gbluecarrier$);
  4877. 		npcwalkto (@gbluecarrierx - 1), (@gbluecarriery - 1);
  4878.  
  4879. 		set @gblueagi, @gblueagi + 1;
  4880. 		set @gbluewarp, @gbluewarp + 1;
  4881.  
  4882. 		if (@gbluewarp == 30)
  4883. 			{
  4884. 			movenpc "classicgvg_blue_flag", @gbluecarrierx, @gbluecarriery;
  4885. 			set @gbluewarp, 0;
  4886. 			}
  4887.  
  4888. 		if (@gblueagi == 5)
  4889. 			{
  4890. 			sc_start SC_DECREASEAGI,10000,10;
  4891. 			sc_start SC_SILENCE, 10000, 10;
  4892. 			specialeffect2 38;
  4893. 			set @gblueagi, 0;
  4894. 			}
  4895. 		}
  4896.  
  4897. 	if (strcharinfo(0) != $@gbluecarrier$)
  4898. 		{
  4899. 		end;
  4900. 		}
  4901.  
  4902. 	sleep2 500;
  4903. 	goto gbluefollow;
  4904. 	}
  4905.  
  4906. } 
  4907.  
  4908. If (@team == 1) 
  4909. {
  4910. 	if (($@gredcarrier$ == strcharinfo(0)) && ($@gbluedropped == 0) && ($@gbluegone == 0))
  4911. 	{
  4912. 	//movenpc "classicgvg_red_flag",98,41;
  4913. 	movenpc "classicgvg_red_flag",98,30;
  4914. 	set $@gbluept, $@gbluept + 1;
  4915. 	set #fcapt, #fcapt + 1;
  4916. 	set fcapt, fcapt + 1;
  4917. 	set ctfpt, ctfpt + 10;
  4918. 	set tctfpt, tctfpt + 10;
  4919. 	announce "The Blue Team has "+$@gbluept+" points.",bc_map;
  4920. 	announce "The Red Team has "+$@gredpt+" points.",bc_map;
  4921. 	set $@gredgone, 0;
  4922. 	set $@gredcarrier$, "-";
  4923.  
  4924. 		if ($@gbluept >= 5)
  4925. 		{
  4926. 		mapannounce "poring_w02", "The Blue Team has won the match",0;
  4927. 		//movenpc "classicgvg_blue_flag",98,124;
  4928. 		//movenpc "classicgvg_red_flag",98,41;
  4929. 		movenpc "classicgvg_red_flag",98,30;
  4930. 		movenpc "classicgvg_blue_flag",98,135;
  4931. 		set $@gbluept, 0;
  4932. 		set $@gredpt, 0;
  4933. 		set $@gredqt, 0;
  4934. 		set $@gblueqt, 0;
  4935. 		set $@gbluecarrier$, "-";
  4936. 		set $@gredcarrier$, "-";
  4937. 		set $@gbluewin, 1;
  4938. 		donpcevent "CTF::OnEventGameOverCgvg";
  4939. 		}
  4940. 	}
  4941.  
  4942. 	if ($@gbluedropped == 1) 
  4943. 	{ 
  4944. 	//Return the Flag
  4945. 	//movenpc "classicgvg_blue_flag",98,124;
  4946. 	movenpc "classicgvg_blue_flag",98,135;
  4947. 	set $@gbluegone, 0;
  4948. 	set $@gbluedropped, 0;
  4949. 	set #freturn, #freturn + 1;
  4950. 	set freturn, freturn + 1;
  4951. 	announce "The Blue Flag has been returned.",bc_map; 
  4952. 	}
  4953. }
  4954.  
  4955. }
  4956.  
  4957. }
  4958.  
  4959. pvp_y_7-1,156,195,4	script	Flag::prontera_neutral_flag	1512,{
  4960.  
  4961. npcspeed 100;
  4962.  
  4963. getmapxy($@nnflag$,$@nnflagx,$@nnflagy,1);
  4964. getmapxy($@nntouch$,$@nntouchx,$@nntouchy,0);
  4965.  
  4966. if (distance($@nnflagx,$@nnflagy,$@nntouchx,$@nntouchy) <= 2)
  4967. {
  4968.  
  4969. if (@team == 2)
  4970. 	{
  4971. 	set @teammate$, " Red member,";
  4972. 	}
  4973.  
  4974. if (@team == 1)
  4975. 	{
  4976. 	set @teammate$, " Blue member,";
  4977. 	}
  4978.  
  4979. if ($@nflaggone == 0)
  4980. 	{
  4981. 	set $@nflagresett, 1;
  4982. 	set $@nflaggone, 1;
  4983. 	set #ftaken, #ftaken + 1;
  4984. 	set ftaken, ftaken + 1;
  4985. 	set $@nflagcarrier$, strcharinfo(0);
  4986. 	announce ""+@teammate$+" "+$@nflagcarrier$+" has the Flag!!",bc_map; 
  4987. 	sc_start SC_DECREASEAGI, 10000, 10;
  4988. 	sc_start SC_SILENCE, 10000, 10;
  4989. 	sc_start SC_DPOISON, 10000, 10;
  4990. 	specialeffect2 38;
  4991.  
  4992. 	if (@team == 2)
  4993. 		{
  4994. 		set $@warp, 1;
  4995. 		mapannounce "pvp_y_7-1", "The Blue Gate is Open.",0;
  4996. 		}
  4997.  
  4998. 	if (@team == 1)
  4999. 		{
  5000. 		set $@warp, 2;
  5001. 		mapannounce "pvp_y_7-1", "The Red Gate is Open.",0;
  5002. 		}
  5003.  
  5004. 	goto pneutralfollow;
  5005. 	} 
  5006.  
  5007. if ($@nflagdropped == 1)
  5008. 	{
  5009. 	set $@nflagresett, 1;
  5010. 	set $@nflagdropped, 0;
  5011. 	set $@nflaggone, 1;
  5012. 	set #ftaken, #ftaken + 1;
  5013. 	set ftaken, ftaken + 1;
  5014. 	set $@nflagcarrier$, strcharinfo(0);
  5015. 	announce ""+$@nflagcarrier$+" has the Flag!!",bc_map; 
  5016. 	sc_start SC_DECREASEAGI, 10000, 10;
  5017. 	sc_start SC_SILENCE, 10000, 10;
  5018. 	sc_start SC_DPOISON, 10000, 10;
  5019. 	specialeffect2 38;
  5020.  
  5021. 	if (@team == 2)
  5022. 		{
  5023. 		set $@warp, 1;
  5024. 		mapannounce "pvp_y_7-1", "The Blue Gate is Open.",0;
  5025. 		}
  5026.  
  5027. 	if (@team == 1)
  5028. 		{
  5029. 		set $@warp, 2;
  5030. 		mapannounce "pvp_y_7-1", "The Red Gate is Open.",0;
  5031. 		}
  5032.  
  5033. 	goto pneutralfollow;
  5034. 	}
  5035.  
  5036. 	if (@novalue == 6969696969)
  5037. 	{
  5038. 	pneutralfollow:
  5039.  
  5040. 	if (strcharinfo(0) == $@nflagcarrier$)
  5041. 		{
  5042. 		getmapxy(@mapname$,@nflagcarrierx,@nflagcarriery,0,$@nflagcarrier$);
  5043. 		npcwalkto (@nflagcarrierx), (@nflagcarriery + 2);
  5044.  
  5045. 		set @nflagagi, @nflagagi + 1;
  5046. 		set @nflagwarp, @nflagwarp + 1;
  5047.  
  5048. 		if (@nflagwarp == 30)
  5049. 			{
  5050. 			movenpc "prontera_neutral_flag", @nflagcarrierx, @nflagcarriery;
  5051. 			set @nflagwarp, 0;
  5052. 			}
  5053.  
  5054. 		if (@nflagagi == 5)
  5055. 			{
  5056. 			sc_start SC_DECREASEAGI,10000,10;
  5057. 			sc_start SC_SILENCE, 10000, 10;
  5058. 			sc_start SC_DPOISON, 10000, 10;
  5059. 			specialeffect2 38;
  5060. 			set @nflagagi, 0;
  5061. 			}
  5062. 		}
  5063.  
  5064. 	if (strcharinfo(0) != $@nflagcarrier$)
  5065. 		{
  5066. 		end;
  5067. 		}
  5068.  
  5069. 	sleep2 500;
  5070. 	goto pneutralfollow;
  5071. 	}
  5072.  
  5073. }
  5074.  
  5075. end;
  5076. }
  5077.  
  5078. pvp_y_7-1,272,204,4	script	Red Base::prontera_red_base	1026,{
  5079.  
  5080. getmapxy($@nnredbase$,$@nnredbasex,$@nnredbasey,1);
  5081. getmapxy($@nnrbasetouch$,$@nnrbasetouchx,$@nnrbasetouchy,0);
  5082.  
  5083. if (distance($@nnredbasex,$@nnredbasey,$@nnrbasetouchx,$@nnrbasetouchy) <= 2)
  5084. {
  5085.  
  5086. If (@team == 2) 
  5087. {
  5088. 	if ($@nflagcarrier$ == strcharinfo(0))
  5089. 	{
  5090. 	movenpc "prontera_neutral_flag",156,195;
  5091. 	set $@warp, 0;
  5092. 	set $@nnredpt, $@nnredpt + 1;
  5093. 	set #fcapt, #fcapt + 1;
  5094. 	set fcapt, fcapt + 1;
  5095. 	set ctfpt, ctfpt + 10;
  5096. 	set tctfpt, tctfpt + 10;
  5097. 	announce "The Blue Team has "+$@nnbluept+" points.",bc_map;
  5098. 	announce "The Red Team has "+$@nnredpt+" points.",bc_map;
  5099. 	set $@nflaggone, 0;
  5100. 	set $@nflagcarrier$, "-";
  5101.  
  5102. 		if ($@nnredpt >= 5)
  5103. 		{
  5104. 		mapannounce "pvp_y_7-1", "The Red Team has won the match",0;
  5105. 		set $@nnbluept, 0;
  5106. 		set $@nnredpt, 0;
  5107. 		set $@nnblueqt, 0;
  5108. 		set $@nnredqt, 0;
  5109. 		set $@nflagcarrier$, "-";
  5110. 		set $@nnredwin, 1;
  5111. 		donpcevent "CTF::OnEventGameOverPneutral";
  5112. 		}
  5113. 	}
  5114. }
  5115.  
  5116. }
  5117.  
  5118. }
  5119.  
  5120. pvp_y_7-1,40,204,4	script	Blue Base::prontera_blue_base	1188,{
  5121.  
  5122. getmapxy($@nnbluebase$,$@nnbluebasex,$@nnbluebasey,1);
  5123. getmapxy($@nnbbasetouch$,$@nnbbasetouchx,$@nnbbasetouchy,0);
  5124.  
  5125. if (distance($@nnbluebasex,$@nnbluebasey,$@nnbbasetouchx,$@nnbbasetouchy) <= 2)
  5126. {
  5127.  
  5128. If (@team == 1) 
  5129. {
  5130. 	if ($@nflagcarrier$ == strcharinfo(0))
  5131. 	{
  5132. 	movenpc "prontera_neutral_flag",156,195;
  5133. 	set $@warp, 0;
  5134. 	set $@nnbluept, $@nnbluept + 1;
  5135. 	set #fcapt, #fcapt + 1;
  5136. 	set fcapt, fcapt + 1;
  5137. 	set ctfpt, ctfpt + 10;
  5138. 	set tctfpt, tctfpt + 10;
  5139. 	announce "The Blue Team has "+$@nnbluept+" points.",bc_map;
  5140. 	announce "The Red Team has "+$@nnredpt+" points.",bc_map;
  5141. 	set $@nflaggone, 0;
  5142. 	set $@nflagcarrier$, "-";
  5143.  
  5144. 		if ($@nnbluept >= 5)
  5145. 		{
  5146. 		mapannounce "pvp_y_7-1", "The Blue Team has won the match",0;
  5147. 		set $@nnbluept, 0;
  5148. 		set $@nnredpt, 0;
  5149. 		set $@nnblueqt, 0;
  5150. 		set $@nnredqt, 0;
  5151. 		set $@nflagcarrier$, "-";
  5152. 		set $@nnbluewin, 1;
  5153. 		donpcevent "CTF::OnEventGameOverPneutral";
  5154. 		}
  5155. 	}
  5156. }
  5157.  
  5158. }
  5159.  
  5160. }
  5161.  
  5162. -	script	healer::red_ctf_healer	829,{
  5163.  
  5164. if ((@heal == 0) && (@team == 2))
  5165. 	{
  5166. 	percentheal 100,100;
  5167. 	set @heal, 1;
  5168. 	}
  5169.  
  5170. }
  5171.  
  5172. -	script	healer::blue_ctf_healer	829,{
  5173.  
  5174. if ((@heal == 0) && (@team == 1))
  5175. 	{
  5176. 	percentheal 100,100;
  5177. 	set @heal, 1;
  5178. 	}
  5179.  
  5180. }
  5181.  
  5182. -	script	leave_ctf::escape_npc	780,{
  5183.  
  5184. mes "Would you like to leave Capture the Flag?";
  5185.  
  5186. menu "No",no,"Yes",yes,"Cancel",-;
  5187. close;
  5188.  
  5189. yes:
  5190. getmapxy(@checkmap$,@checkx,@checky,0);
  5191. if (@checkmap$ == "prt_are01")
  5192. {
  5193. mapannounce "prt_are01", ""+strcharinfo(0)+" has left the game.",0;
  5194. set @cmapuser, getmapusers ("prt_are01");
  5195. set @heal, 0;
  5196. setlook 6, hair;
  5197. setlook 7, body;
  5198. save originmap$, (originx), (originy);
  5199. set @classic, 0;
  5200.  
  5201. if (@cmapuser == 1)
  5202. 	{
  5203. 	movenpc "blue_flag", 47, 150;
  5204. 	movenpc "red_flag",252,150;
  5205. 	set $@bluept, 0;
  5206. 	set $@redpt, 0;
  5207. 	set $@bluecarrier$, "-";
  5208. 	set $@redcarrier$, "-";
  5209. 	set $@reddropped, 0;
  5210. 	set $@redgone, 0;
  5211. 	set $@bluedropped, 0;
  5212. 	set $@bluegone, 0;
  5213. 	}
  5214.  
  5215. if ($@redcarrier$ == strcharinfo(0))
  5216. 	{
  5217. 	mapannounce "prt_are01", ""+$@redcarrier$+" dropped the Red Flag.",0;
  5218. 	set $@redcarrier$, "-";
  5219. 	set $@reddropped, 1;
  5220. 	set #fdrop, #fdrop + 1;
  5221. 	set fdrop, fdrop + 1;
  5222. 	}
  5223.  
  5224. if ($@bluecarrier$ == strcharinfo(0))
  5225. 	{
  5226. 	mapannounce "prt_are01", ""+$@bluecarrier$+" dropped the Blue Flag.",0;
  5227. 	set $@bluecarrier$, "-";
  5228. 	set $@bluedropped, 1;
  5229. 	set #fdrop, #fdrop + 1;
  5230. 	set fdrop, fdrop + 1;
  5231. 	}
  5232.  
  5233. //lowers the team count for leaving the game
  5234.  
  5235. if (@team == 2)
  5236. 	{
  5237. 	set $@redqt, $@redqt - 1;
  5238. 	}
  5239.  
  5240. 	if (@team == 1)
  5241. 	{
  5242. 	set $@blueqt, $@blueqt - 1;
  5243. 	}
  5244. warp originmap$, (originx), (originy);
  5245.  
  5246. set @ctf, 0;
  5247. for (set @i, 0; @i < getarraysize($@classic); set @i, @i+1) {
  5248. 	if ($@classic[@i] == getcharid(3))
  5249. 		{
  5250. 		setarray $@classic[@i],0;
  5251. 		break;
  5252. 		}
  5253. }
  5254. for (; @i < getarraysize($@classic); set @i, @i+1) {
  5255. 	setarray $@classic[@i], $@classic[@i+1];
  5256. }
  5257.  
  5258. }
  5259.  
  5260. if (@checkmap$ == "pvp_2vs2")
  5261. {
  5262. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has left the game.",0;
  5263. set @hmapuser, getmapusers ("pvp_2vs2");
  5264. set @heal, 0;
  5265. setlook 6, hair;
  5266. setlook 7, body;
  5267. save originmap$, (originx), (originy);
  5268. set @hardcore, 0;
  5269.  
  5270. if ($@hredcarrier$ == strcharinfo(0))
  5271. 	{
  5272. 	mapannounce "pvp_2vs2", ""+$@hredcarrier$+" dropped the Red Flag.",0;
  5273. 	set $@hredcarrier$, "-";
  5274. 	set $@hreddropped, 1;
  5275. 	set #fdrop, #fdrop + 1;
  5276. 	set fdrop, fdrop + 1;
  5277. 	}
  5278.  
  5279. if ($@hbluecarrier$ == strcharinfo(0))
  5280. 	{
  5281. 	mapannounce "pvp_2vs2", ""+$@hbluecarrier$+" dropped the Blue Flag.",0;
  5282. 	set $@hbluecarrier$, "-";
  5283. 	set $@hbluedropped, 1;
  5284. 	set #fdrop, #fdrop + 1;
  5285. 	set fdrop, fdrop + 1;
  5286. 	}
  5287.  
  5288. //lowers the team count for leaving the game
  5289.  
  5290. 	if (@team == 2)
  5291. 	{
  5292. 	set $@hredqt, $@hredqt - 1;
  5293. 	}
  5294.  
  5295. 	if (@team == 1)
  5296. 	{
  5297. 	set $@hblueqt, $@hblueqt - 1;
  5298. 	}
  5299.  
  5300. if (@hmapuser == 1)
  5301. 	{
  5302. 	movenpc "hard_blue_flag", 19, 39;
  5303. 	movenpc "hard_red_flag",60,39;
  5304. 	set $@hbluept, 0;
  5305. 	set $@hredpt, 0;
  5306. 	set $@hbluecarrier$, "-";
  5307. 	set $@hredcarrier$, "-";
  5308. 	set $@hreddropped, 0;
  5309. 	set $@hredgone, 0;
  5310. 	set $@hbluedropped, 0;
  5311. 	set $@hbluegone, 0;
  5312. 	}
  5313.  
  5314. warp originmap$, (originx), (originy);
  5315.  
  5316. set @ctf, 0;
  5317. for (set @i, 0; @i < getarraysize($@hardcore); set @i, @i+1) {
  5318. 	if ($@hardcore[@i] == getcharid(3))
  5319. 		{
  5320. 		setarray $@hardcore[@i],0;
  5321. 		break;
  5322. 		}
  5323. }
  5324. for (; @i < getarraysize($@hardcore); set @i, @i+1) {
  5325. 	setarray $@hardcore[@i], $@hardcore[@i+1];
  5326. }
  5327.  
  5328. }
  5329.  
  5330. if (@checkmap$ == "pvp_y_5-2")
  5331. {
  5332. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has left the game.",0;
  5333. set @smapuser, getmapusers ("pvp_y_5-2");
  5334. set @heal, 0;
  5335. setlook 6, hair;
  5336. setlook 7, body;
  5337. save originmap$, (originx), (originy);
  5338. set @single, 0;
  5339.  
  5340. if (@smapuser == 1)
  5341. 	{
  5342. 	movenpc "single_blue_flag",53,130;
  5343. 	movenpc "single_red_flag",210,130;
  5344. 	set $@sbluept, 0;
  5345. 	set $@sredpt, 0;
  5346. 	set $@sbluecarrier$, "-";
  5347. 	set $@sredcarrier$, "-";
  5348. 	set $@sreddropped, 0;
  5349. 	set $@sredgone, 0;
  5350. 	set $@sbluedropped, 0;
  5351. 	set $@sbluegone, 0;
  5352. 	}
  5353.  
  5354. if ($@sredcarrier$ == strcharinfo(0))
  5355. 	{
  5356. 	mapannounce "pvp_y_5-2", ""+$@sredcarrier$+" dropped the Red Flag.",0;
  5357. 	set $@sredcarrier$, "-";
  5358. 	set $@sreddropped, 1;
  5359. 	set $@suddendeath, 0;
  5360. 	set #fdrop, #fdrop + 1;
  5361. 	set fdrop, fdrop + 1;
  5362. 	}
  5363.  
  5364. if ($@sbluecarrier$ == strcharinfo(0))
  5365. 	{
  5366. 	mapannounce "pvp_y_5-2", ""+$@sbluecarrier$+" dropped the Blue Flag.",0;
  5367. 	set $@sbluecarrier$, "-";
  5368. 	set $@sbluedropped, 1;
  5369. 	set $@suddendeath, 0;
  5370. 	set #fdrop, #fdrop + 1;
  5371. 	set fdrop, fdrop + 1;
  5372. 	}
  5373.  
  5374. //lowers the team count for leaving the game
  5375.  
  5376. if (@team == 2)
  5377. 	{
  5378. 	set $@sredqt, $@sredqt - 1;
  5379. 	}
  5380.  
  5381. 	if (@team == 1)
  5382. 	{
  5383. 	set $@sblueqt, $@sblueqt - 1;
  5384. 	}
  5385.  
  5386. warp originmap$, (originx), (originy);
  5387.  
  5388. set @ctf, 0;
  5389. for (set @i, 0; @i < getarraysize($@single); set @i, @i+1) {
  5390. 	if ($@single[@i] == getcharid(3))
  5391. 		{
  5392. 		setarray $@single[@i],0;
  5393. 		break;
  5394. 		}
  5395. }
  5396. for (; @i < getarraysize($@single); set @i, @i+1) {
  5397. 	setarray $@single[@i], $@single[@i+1];
  5398. }
  5399. }
  5400.  
  5401. if (@checkmap$ == "tha_t10")
  5402. {
  5403. mapannounce "tha_t10", ""+strcharinfo(0)+" has left the game.",0;
  5404. set @nmapuser, getmapusers ("tha_t10");
  5405. set @heal, 0;
  5406. setlook 6, hair;
  5407. setlook 7, body;
  5408. save originmap$, (originx), (originy);
  5409. set @neutral, 0;
  5410.  
  5411. //lowers the team count for leaving the game
  5412.  
  5413. if (@team == 2)
  5414. 	{
  5415. 	set $@nredqt, $@nredqt - 1;
  5416. 	}
  5417.  
  5418. if (@team == 1)
  5419. 	{
  5420. 	set $@nblueqt, $@nblueqt - 1;
  5421. 	}
  5422.  
  5423. warp originmap$, (originx), (originy);
  5424.  
  5425. set @ctf, 0;
  5426. for (set @i, 0; @i < getarraysize($@neutral); set @i, @i+1) {
  5427. 	if ($@neutral[@i] == getcharid(3))
  5428. 		{
  5429. 		setarray $@neutral[@i],0;
  5430. 		break;
  5431. 		}
  5432. }
  5433. for (; @i < getarraysize($@neutral); set @i, @i+1) {
  5434. 	setarray $@neutral[@i], $@neutral[@i+1];
  5435. }
  5436.  
  5437. if (@nmapuser == 1)
  5438. 	{
  5439. 	movenpc "neutral_flag",127,124;
  5440. 	set $@nbluept, 0;
  5441. 	set $@nredpt, 0;
  5442. 	set $@flagcarrier$, "-";
  5443. 	set $@flagresett, 0;
  5444. 	set $@flaggone, 0;
  5445. 	set $@flagdropped, 0;
  5446. 	}
  5447.  
  5448. if ($@flagcarrier$ == strcharinfo(0))
  5449. 	{
  5450. 	mapannounce "tha_t10", ""+$@flagcarrier$+" dropped the Flag.",0;
  5451. 	set $@flagcarrier$, "-";
  5452. 	set $@flagdropped, 1;
  5453. 	set #fdrop, #fdrop + 1;
  5454. 	set fdrop, fdrop + 1;
  5455.  
  5456. 	OnFlagRespawn:
  5457. 	set $@idol, $@idol + 1;
  5458.  
  5459. 	if ($@flagresett == 1)
  5460. 		{
  5461. 		set $@idol, 0;
  5462. 		goto nflgrspwn;
  5463. 		end;
  5464. 		}
  5465.  
  5466. 	if ($@idol == 30)
  5467. 		{
  5468. 		movenpc "neutral_flag",127,124;
  5469. 		set $@idol, 0;
  5470. 		set $@flaggone, 0;
  5471. 		set $@flagdropped, 0;
  5472. 		announce "The Flag has been returned.",bc_map;
  5473. 		end;
  5474. 		}
  5475.  
  5476. 	sleep2 1000;
  5477. 	goto OnFlagRespawn;
  5478. 	end;
  5479. 	}
  5480. nflgrspwn:
  5481. }
  5482.  
  5483. if (@checkmap$ == "poring_w02")
  5484. {
  5485. mapannounce "poring_w02", ""+strcharinfo(0)+" has left the game.",0;
  5486. set @gmapuser, getmapusers ("poring_w02");
  5487. set @heal, 0;
  5488. setlook 6, hair;
  5489. setlook 7, body;
  5490. save originmap$, (originx), (originy);
  5491. set @classicgvg, 0;
  5492.  
  5493. if ($@gredcarrier$ == strcharinfo(0))
  5494. 	{
  5495. 	mapannounce "poring_w02", ""+$@gredcarrier$+" dropped the Red Flag.",0;
  5496. 	set $@gredcarrier$, "-";
  5497. 	set $@greddropped, 1;
  5498. 	set #fdrop, #fdrop + 1;
  5499. 	set fdrop, fdrop + 1;
  5500. 	}
  5501.  
  5502. if ($@gbluecarrier$ == strcharinfo(0))
  5503. 	{
  5504. 	mapannounce "poring_w02", ""+$@gbluecarrier$+" dropped the Blue Flag.",0;
  5505. 	set $@gbluecarrier$, "-";
  5506. 	set $@gbluedropped, 1;
  5507. 	set #fdrop, #fdrop + 1;
  5508. 	set fdrop, fdrop + 1;
  5509. 	}
  5510.  
  5511. //lowers the team count for leaving the game
  5512.  
  5513. 	if (@team == 2)
  5514. 	{
  5515. 	set $@gredqt, $@gredqt - 1;
  5516. 	}
  5517.  
  5518. 	if (@team == 1)
  5519. 	{
  5520. 	set $@gblueqt, $@gblueqt - 1;
  5521. 	}
  5522.  
  5523. if (@gmapuser == 1)
  5524. 	{
  5525. 	//movenpc "classicgvg_blue_flag",98,124;
  5526. 	//movenpc "classicgvg_red_flag",98,41;
  5527. 	movenpc "classicgvg_blue_flag",98,135;
  5528. 	movenpc "classicgvg_red_flag",98,30;
  5529. 	set $@gbluept, 0;
  5530. 	set $@gredpt, 0;
  5531. 	set $@gbluecarrier$, "-";
  5532. 	set $@gredcarrier$, "-";
  5533. 	set $@greddropped, 0;
  5534. 	set $@gredgone, 0;
  5535. 	set $@gbluedropped, 0;
  5536. 	set $@gbluegone, 0;
  5537. 	}
  5538.  
  5539. warp originmap$, (originx), (originy);
  5540.  
  5541. set @ctf, 0;
  5542. for (set @i, 0; @i < getarraysize($@classicgvg); set @i, @i+1) {
  5543. 	if ($@classicgvg[@i] == getcharid(3))
  5544. 		{
  5545. 		setarray $@classicgvg[@i],0;
  5546. 		break;
  5547. 		}
  5548. }
  5549. for (; @i < getarraysize($@classicgvg); set @i, @i+1) {
  5550. 	setarray $@classicgvg[@i], $@classicgvg[@i+1];
  5551. }
  5552.  
  5553. }
  5554.  
  5555. if (@checkmap$ == "pvp_y_7-1")
  5556. {
  5557. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has left the game.",0;
  5558. set @nnmapuser, getmapusers ("pvp_y_7-1");
  5559. set @heal, 0;
  5560. setlook 6, hair;
  5561. setlook 7, body;
  5562. save originmap$, (originx), (originy);
  5563. set @pneutral, 0;
  5564.  
  5565. //lowers the team count for leaving the game
  5566.  
  5567. if (@team == 2)
  5568. 	{
  5569. 	set $@nnredqt, $@nnredqt - 1;
  5570. 	}
  5571.  
  5572. if (@team == 1)
  5573. 	{
  5574. 	set $@nnblueqt, $@nnblueqt - 1;
  5575. 	}
  5576.  
  5577. if (@nnmapuser == 1)
  5578. 	{
  5579. 	movenpc "prontera_neutral_flag",156,195;
  5580. 	set $@nnbluept, 0;
  5581. 	set $@nnredpt, 0;
  5582. 	set $@nflagcarrier$, "-";
  5583. 	set $@nflagresett, 0;
  5584. 	set $@nflaggone, 0;
  5585. 	set $@nflagdropped, 0;
  5586. 	}
  5587.  
  5588. warp originmap$, (originx), (originy);
  5589.  
  5590. set @ctf, 0;
  5591. for (set @i, 0; @i < getarraysize($@pneutral); set @i, @i+1) {
  5592. 	if ($@pneutral[@i] == getcharid(3))
  5593. 		{
  5594. 		setarray $@pneutral[@i],0;
  5595. 		break;
  5596. 		}
  5597. }
  5598. for (; @i < getarraysize($@pneutral); set @i, @i+1) {
  5599. 	setarray $@pneutral[@i], $@pneutral[@i+1];
  5600. }
  5601.  
  5602. if ($@nflagcarrier$ == strcharinfo(0))
  5603. 	{
  5604. 	mapannounce "pvp_y_7-1", ""+$@nflagcarrier$+" dropped the Flag.",0;
  5605. 	set $@warp, 0;
  5606. 	set $@nflagcarrier$, "-";
  5607. 	set $@nflagdropped, 1;
  5608. 	set #fdrop, #fdrop + 1;
  5609.  
  5610. 	OnNFlagRespawn:
  5611. 	set $@nidol, $@nidol + 1;
  5612.  
  5613. 	if ($@nflagresett == 1)
  5614. 		{
  5615. 		set $@nidol, 0;
  5616. 		goto nnflgrspwn;
  5617. 		end;
  5618. 		}
  5619.  
  5620. 	if ($@nidol == 30)
  5621. 		{
  5622. 		movenpc "prontera_neutral_flag",156,195;
  5623. 		set $@nidol, 0;
  5624. 		set $@nflaggone, 0;
  5625. 		set $@nflagdropped, 0;
  5626. 		announce "The Flag has been returned.",bc_map;
  5627. 		end;
  5628. 		}
  5629.  
  5630. 	sleep2 1000;
  5631. 	goto OnNFlagRespawn;
  5632. 	end;
  5633. 	}
  5634. nnflgrspwn:
  5635. }
  5636.  
  5637. set colorchange, 0;
  5638. setlook 6, hair;
  5639. setlook 7, body;
  5640. set Hp, charhp;
  5641. set Sp, charsp;
  5642. set @heal, 0;
  5643. set @playing, 0;
  5644. set @team, 0;
  5645. warp originmap$, (originx), (originy);
  5646. save originmap$, (originx), (originy);
  5647. end;
  5648.  
  5649. no:
  5650. mes "Ok, carry on.";
  5651. close;
  5652. }
  5653.  
  5654.  
  5655. -	script	left_warper::left_warper	836,{
  5656.  
  5657. if (@team == 1)
  5658. {
  5659. sleep2 1000;
  5660. set @newsave, rand(1,3);
  5661.  
  5662. 	if (@newsave == 1)
  5663. 		{
  5664. 		set @savex, rand(82,97);
  5665. 		set @savey, rand(132,135);
  5666. 		warp "poring_w02", (@savex), (@savey);
  5667. 		}
  5668.  
  5669. 	if (@newsave == 2)
  5670. 		{
  5671. 		set @savex, rand(82,85);
  5672. 		set @savey, rand(108,131);
  5673. 		warp "poring_w02", (@savex), (@savey);
  5674. 		}
  5675.  
  5676. 	if (@newsave == 3)
  5677. 		{
  5678. 		set @savex, rand(70,77);
  5679. 		set @savey, rand(116,127);
  5680. 		warp "poring_w02", (@savex), (@savey);
  5681. 		}
  5682. }
  5683.  
  5684. if (@team == 2)
  5685. {
  5686. sleep2 1000;
  5687. set @newsave, rand(1,3);
  5688.  
  5689. 	if (@newsave == 1)
  5690. 		{
  5691. 		set @savex, rand(82,97);
  5692. 		set @savey, rand(30,33);
  5693. 		warp "poring_w02", (@savex), (@savey);
  5694. 		}
  5695.  
  5696. 	if (@newsave == 2)
  5697. 		{
  5698. 		set @savex, rand(82,85);
  5699. 		set @savey, rand(34,57);
  5700. 		warp "poring_w02", (@savex), (@savey);
  5701. 		}
  5702.  
  5703. 	if (@newsave == 3)
  5704. 		{
  5705. 		set @savex, rand(70,77);
  5706. 		set @savey, rand(38,49);
  5707. 		warp "poring_w02", (@savex), (@savey);
  5708. 		}
  5709. }
  5710.  
  5711. percentheal 100,100;
  5712. }
  5713.  
  5714. -	script	right_warper::right_warper	836,{
  5715.  
  5716. if (@team == 1)
  5717. {
  5718. sleep2 1000;
  5719. set @newsave, rand(1,3);
  5720.  
  5721. 	if (@newsave == 1)
  5722. 		{
  5723. 		set @savex, rand(98,115);
  5724. 		set @savey, rand(132,135);
  5725. 		warp "poring_w02", (@savex), (@savey);
  5726. 		}
  5727.  
  5728. 	if (@newsave == 2)
  5729. 		{
  5730. 		set @savex, rand(112,115);
  5731. 		set @savey, rand(108,131);
  5732. 		warp "poring_w02", (@savex), (@savey);
  5733. 		}
  5734.  
  5735. 	if (@newsave == 3)
  5736. 		{
  5737. 		set @savex, rand(120,127);
  5738. 		set @savey, rand(116,127);
  5739. 		warp "poring_w02", (@savex), (@savey);
  5740. 		}
  5741. }
  5742.  
  5743. if (@team == 2)
  5744. {
  5745. sleep2 1000;
  5746. set @newsave, rand(1,3);
  5747.  
  5748. 	if (@newsave == 1)
  5749. 		{
  5750. 		set @savex, rand(98,115);
  5751. 		set @savey, rand(30,33);
  5752. 		warp "poring_w02", (@savex), (@savey);
  5753. 		}
  5754.  
  5755. 	if (@newsave == 2)
  5756. 		{
  5757. 		set @savex, rand(112,115);
  5758. 		set @savey, rand(34,57);
  5759. 		warp "poring_w02", (@savex), (@savey);
  5760. 		}
  5761.  
  5762. 	if (@newsave == 3)
  5763. 		{
  5764. 		set @savex, rand(120,127);
  5765. 		set @savey, rand(38,49);
  5766. 		warp "poring_w02", (@savex), (@savey);
  5767. 		}
  5768. }
  5769.  
  5770. percentheal 100,100;
  5771. }
  5772.  
  5773. -	script	red_warper::red_warper	723¦2,{
  5774.  
  5775. if ((@team == 2) && ($@warp == 2))
  5776. 	{
  5777. 	warp "pvp_y_7-1",91,204;
  5778. 	}
  5779. }
  5780.  
  5781. -	script	blue_warper::blue_warper	723¦2,{
  5782.  
  5783. if ((@team == 1) && ($@warp == 1))
  5784. 	{
  5785. 	warp "pvp_y_7-1",221,204;
  5786. 	}
  5787. }
  5788.  
  5789. -	script	Capture The Flag::CTFclient	108,{
  5790.  
  5791. begin:
  5792.  
  5793. set @team, 0;
  5794. set @heal, 0;
  5795.  
  5796. //gets players hair color, body color, and save point
  5797. set hair, getlook(6);
  5798. set body, getlook(7);
  5799.  
  5800. //counts users on map
  5801. set @mapuser, getmapusers ("prt_are01");
  5802. set @hmapuser, getmapusers ("pvp_2vs2");
  5803. set @smapuser, getmapusers ("pvp_y_5-2");
  5804. set @nmapuser, getmapusers ("tha_t10");
  5805. set @gmapuser, getmapusers ("poring_w02");
  5806. set @nnmapuser, getmapusers ("pvp_y_7-1");
  5807.  
  5808. getmapxy(originmap$,originx,originy,0,strcharinfo(0));
  5809.  
  5810. set @blueteam$, "^0066FFBlue Team^000000";
  5811. set @redteam$, "^FF0000Red Team^000000";
  5812.  
  5813. mes "[Capture The Flag]";
  5814. mes "Please select your desired gametype.";
  5815.  
  5816. menu "Classic CTF "+@mapuser+"/24",ctfclassic,"Classic GvG CTF "+@gmapuser+"/24",classicgvg,"Hardcore CTF "+@hmapuser+"/24",ctfhardcore,"Single Flag CTF "+@smapuser+"/24",ctfsingle,"Neutral Flag CTF "+@nmapuser+"/24",ctfneutral,"Prontera Neutral Flag "+@nnmapuser+"/24",pronteraneutral,"Your Stats",pstats,"Player Ranks",rank,"Rules",rules,"Cancel",-;
  5817.  
  5818. mes "Hope to see you soon.";
  5819. close;
  5820.  
  5821. ctfclassic:
  5822.  
  5823. next;
  5824. mes "[Classic CTF]";
  5825.  
  5826. if ($@redwin == 1 || $@bluewin == 1)
  5827. {
  5828. mes "";
  5829. mes "Please wait a minute while I clean the battlefield.";
  5830. close2;
  5831.  
  5832. sleep2 45000;
  5833.  
  5834. set $@redwin, 0;
  5835. set $@bluewin, 0;
  5836. end;
  5837. }
  5838.  
  5839. //makes player unable to join the game due to full room
  5840. if (@mapuser >= 24)
  5841. {
  5842. goto fullmsgclassic;
  5843. }
  5844.  
  5845. if ($@redqt < 0)
  5846. {
  5847. set $@redqt, 0;
  5848. }
  5849.  
  5850. if ($@blueqt < 0)
  5851. {
  5852. set $@blueqt, 0;
  5853. }
  5854.  
  5855. mes "The "+@redteam$+" has "+$@redqt+"/12 Players.";
  5856. mes "The "+@blueteam$+" has "+$@blueqt+"/12 Players.";
  5857. mes " ";
  5858. mes "What team would you like to join?";
  5859.  
  5860. menu "Blue Team",bt,"Red Team",rt,"Cancel",-;
  5861. close;
  5862.  
  5863. bt:
  5864. if ($@blueqt >= 12)
  5865. 	{
  5866. 	next;
  5867. 	mes "The "+@blueteam$+" is full";
  5868. 	next;
  5869. 	goto begin;
  5870. 	}
  5871.  
  5872. mapannounce "prt_are01", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  5873. set @team, 1;
  5874. set teamname, @blueteam$;
  5875. goto okclassic;
  5876. end;
  5877.  
  5878. rt:
  5879. if ($@redqt >= 12)
  5880. 	{
  5881. 	next;
  5882. 	mes "The "+@redteam$+" is full";
  5883. 	next;
  5884. 	goto begin;
  5885. 	}
  5886.  
  5887. mapannounce "prt_are01", ""+strcharinfo(0)+" has joined the Red Team.",0;
  5888. set @team, 2;
  5889. set teamname, @redteam$;
  5890. goto okclassic;
  5891. end;
  5892.  
  5893. okclassic:
  5894.  
  5895. set @iclassqt, getarraysize($@classic);
  5896. setarray $@classic[@iclassqt], getcharid(3);
  5897.  
  5898. set colorchange, 1;
  5899. set @playing, 1;
  5900. set @classic, 1;
  5901.  
  5902. if (@team == 2)
  5903. {
  5904. set $@redqt, $@redqt +1;
  5905.  
  5906. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  5907. //if (Sex == 1)
  5908. //	{
  5909. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  5910. //		{
  5911. //		setlook 6,6;
  5912. //		setlook 7,2;
  5913. //		}
  5914. //
  5915. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  5916. //		{
  5917. //		setlook 6,6;
  5918. //		setlook 7,1;
  5919. //		}
  5920. //
  5921. //	if (Class == SuperNovice || Class == Job_Paladin)
  5922. //		{
  5923. //		setlook 6,6;
  5924. //		setlook 7,58;
  5925. //		}
  5926. //
  5927. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  5928. //		{
  5929. //		setlook 6,6;
  5930. //		setlook 7,146;
  5931. //		}
  5932. //
  5933. //	if (Class == Job_High_Priest || Class == Job_Champion)
  5934. //		{
  5935. //		setlook 6,6;
  5936. //		setlook 7,66;
  5937. //		}
  5938. //
  5939. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  5940. //		{
  5941. //		setlook 6,6;
  5942. //		setlook 7,42;
  5943. //		}
  5944. //
  5945. //	if (Class == Job_Creator)
  5946. //		{
  5947. //		setlook 6,6;
  5948. //		setlook 7,14;
  5949. //		}
  5950. //
  5951. //	if (Class == Job_Sage)
  5952. //		{
  5953. //		setlook 6,6;
  5954. //		setlook 7,18;
  5955. //		}
  5956. //
  5957. //	if (Class == Job_Professor || Class == Job_Mage)
  5958. //		{
  5959. //		setlook 6,6;
  5960. //		setlook 7,39;
  5961. //		}
  5962. //
  5963. //	if (Class == Job_Whitesmith)
  5964. //		{
  5965. //		setlook 6,6;
  5966. //		setlook 7,62;
  5967. //		}
  5968. //
  5969. //	if (Class == Job_Soul_Linker)
  5970. //		{
  5971. //		setlook 6,6;
  5972. //		setlook 7,122;
  5973. //		}
  5974. //
  5975. //	if (Class == Job_Gunslinger)
  5976. //		{
  5977. //		setlook 6,6;
  5978. //		setlook 7,26;
  5979. //		}
  5980. //	}
  5981.  
  5982. //if (Sex == 0)
  5983. //	{
  5984. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  5985. //		{
  5986. //		setlook 6,6;
  5987. //		setlook 7,2;
  5988. //		}
  5989. //
  5990. //	if (Class == Job_Crusader || Class == Job_Merchant)
  5991. //		{
  5992. //		setlook 6,6;
  5993. //		setlook 7,18;
  5994. //		}
  5995. //
  5996. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  5997. //		{
  5998. //		setlook 6,6;
  5999. //		setlook 7,42;
  6000. //		}
  6001. //
  6002. //	if (Class == Job_High_Priest)
  6003. //		{
  6004. //		setlook 6,6;
  6005. //		setlook 7,0;
  6006. //		}
  6007. //
  6008. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  6009. //		{
  6010. //		setlook 6,6;
  6011. //		setlook 7,14;
  6012. //		}
  6013. //
  6014. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  6015. //		{
  6016. //		setlook 6,6;
  6017. //		setlook 7,66;
  6018. //		}
  6019. //
  6020. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  6021. //		{
  6022. //		setlook 6,6;
  6023. //		setlook 7,58;
  6024. //		}
  6025. //	if (Class == Job_Dancer)
  6026. //		{
  6027. //		setlook 6,6;
  6028. //		setlook 7,153;
  6029. //		}
  6030. //
  6031. //	if (Class == Job_Gypsy)
  6032. //		{
  6033. //		setlook 6,6;
  6034. //		setlook 7,47;
  6035. //		}
  6036. //
  6037. //	if (Class == Job_Stalker)
  6038. //		{
  6039. //		setlook 6,6;
  6040. //		setlook 7,157;
  6041. //		}
  6042. //
  6043. //	if (Class == Job_Archer)
  6044. //		{
  6045. //		setlook 6,6;
  6046. //		setlook 7,26;
  6047. //		}
  6048. //
  6049. //	if (Class == Job_Gunslinger)
  6050. //		{
  6051. //		setlook 6,6;
  6052. //		setlook 7,26;
  6053. //		}
  6054. //	}
  6055.  
  6056. save "prt_are01",268,150;
  6057. warp "prt_are01",268,150;
  6058. }
  6059.  
  6060. if (@team == 1)
  6061. {
  6062. set $@blueqt, $@blueqt +1;
  6063.  
  6064. // "^^color^^"
  6065. //if (Sex == 1)
  6066. //	{
  6067. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  6068. //		{
  6069. //		setlook 6,5;
  6070. //		setlook 7,1;
  6071. //		}
  6072. //
  6073. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  6074. //		{
  6075. //		setlook 6,5;
  6076. //		setlook 7,2;
  6077. //		}
  6078. //
  6079. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  6080. //		{
  6081. //		setlook 6,5;
  6082. //		setlook 7,43;
  6083. //		}
  6084. //	}
  6085.  
  6086. //if (Sex == 0)
  6087. //	{
  6088. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  6089. //		{
  6090. //		setlook 6,5;
  6091. //		setlook 7,1;
  6092. //		}
  6093. //
  6094. //	if (Class == Job_Archer)
  6095. //		{
  6096. //		setlook 6,5;
  6097. //		setlook 7,0;
  6098. //		}
  6099. //
  6100. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  6101. //		{
  6102. //		setlook 6,5;
  6103. //		setlook 7,43;
  6104. //		}
  6105. //	if (Class == Job_Wizard)
  6106. //		{
  6107. //		setlook 6,5;
  6108. //		setlook 7,67;
  6109. //		}
  6110. //	}
  6111.  
  6112. save "prt_are01",30,150;
  6113. warp "prt_are01",30,150;
  6114. }
  6115. percentheal 100,100;
  6116. close;
  6117.  
  6118. fullmsgclassic:
  6119. mes "The ^FF0000Red Team^000000 has "+$@redqt+"/12 Players.";
  6120. mes "The ^0066FFBlue Team^000000 has "+$@blueqt+"/12 Players.";
  6121. mes " ";
  6122. mes "Sorry both teams are full try another CTF arena.";
  6123. close;
  6124. end;
  6125.  
  6126. M_ctfhardcore:
  6127. next;
  6128. mes "[Hardcore CTF]";
  6129.  
  6130. if ($@hredwin == 1 || $@hbluewin == 1)
  6131. {
  6132. mes "";
  6133. mes "Please wait a minute while I clean the battlefield.";
  6134. close2;
  6135.  
  6136. sleep2 45000;
  6137.  
  6138. set $@hredwin, 0;
  6139. set $@hbluewin, 0;
  6140. end;
  6141. }
  6142.  
  6143. //makes player unable to join the game due to full room
  6144. if (@hmapuser >= 24)
  6145. {
  6146. goto hfullmsgclassic;
  6147. }
  6148.  
  6149. if ($@hredqt < 0)
  6150. {
  6151. set $@hredqt, 0;
  6152. }
  6153.  
  6154. if ($@hblueqt < 0)
  6155. {
  6156. set $@hblueqt, 0;
  6157. }
  6158.  
  6159. mes "The "+@redteam$+" has "+$@hredqt+"/12 Players.";
  6160. mes "The "+@blueteam$+" has "+$@hblueqt+"/12 Players.";
  6161. mes " ";
  6162. mes "What team would you like to join?";
  6163.  
  6164. menu "Blue Team",hbt,"Red Team",hrt,"Cancel",-;
  6165. close;
  6166.  
  6167. hbt:
  6168. if ($@hblueqt >= 12)
  6169. 	{
  6170. 	next;
  6171. 	mes "The "+@blueteam$+" is full";
  6172. 	next;
  6173. 	goto begin;
  6174. 	}
  6175.  
  6176. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  6177. set @team, 1;
  6178. set teamname, @blueteam$;
  6179. goto okhardcore;
  6180. end;
  6181.  
  6182. hrt:
  6183. if ($@hredqt >= 12)
  6184. 	{
  6185. 	next;
  6186. 	mes "The "+@redteam$+" is full";
  6187. 	next;
  6188. 	goto begin;
  6189. 	}
  6190.  
  6191. mapannounce "pvp_2vs2", ""+strcharinfo(0)+" has joined the Red Team.",0;
  6192. set @team, 2;
  6193. set teamname, @redteam$;
  6194. goto okhardcore;
  6195. end;
  6196.  
  6197. okhardcore:
  6198.  
  6199. set @ihardqt, getarraysize($@hardcore);
  6200. setarray $@hardcore[@ihardqt], getcharid(3);
  6201.  
  6202. set colorchange, 1;
  6203. set @playing, 1;
  6204. set @hardcore, 1;
  6205.  
  6206. if (@team == 2)
  6207. {
  6208. set $@rspawn, $@rspawn + 1;
  6209. set $@hredqt, $@hredqt +1;
  6210.  
  6211. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  6212. //if (Sex == 1)
  6213. //	{
  6214. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  6215. //		{
  6216. //		setlook 6,6;
  6217. //		setlook 7,2;
  6218. //		}
  6219. //
  6220. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  6221. //		{
  6222. //		setlook 6,6;
  6223. //		setlook 7,1;
  6224. //		}
  6225. //
  6226. //	if (Class == SuperNovice || Class == Job_Paladin)
  6227. //		{
  6228. //		setlook 6,6;
  6229. //		setlook 7,58;
  6230. //		}
  6231. //
  6232. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  6233. //		{
  6234. //		setlook 6,6;
  6235. //		setlook 7,146;
  6236. //		}
  6237. //
  6238. //	if (Class == Job_High_Priest || Class == Job_Champion)
  6239. //		{
  6240. //		setlook 6,6;
  6241. //		setlook 7,66;
  6242. //		}
  6243. //
  6244. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  6245. //		{
  6246. //		setlook 6,6;
  6247. //		setlook 7,42;
  6248. //		}
  6249. //
  6250. //	if (Class == Job_Creator)
  6251. //		{
  6252. //		setlook 6,6;
  6253. //		setlook 7,14;
  6254. //		}
  6255. //
  6256. //	if (Class == Job_Sage)
  6257. //		{
  6258. //		setlook 6,6;
  6259. //		setlook 7,18;
  6260. //		}
  6261. //
  6262. //	if (Class == Job_Professor || Class == Job_Mage)
  6263. //		{
  6264. //		setlook 6,6;
  6265. //		setlook 7,39;
  6266. //		}
  6267. //
  6268. //	if (Class == Job_Whitesmith)
  6269. //		{
  6270. //		setlook 6,6;
  6271. //		setlook 7,62;
  6272. //		}
  6273. //
  6274. //	if (Class == Job_Soul_Linker)
  6275. //		{
  6276. //		setlook 6,6;
  6277. //		setlook 7,122;
  6278. //		}
  6279. //
  6280. //	if (Class == Job_Gunslinger)
  6281. //		{
  6282. //		setlook 6,6;
  6283. //		setlook 7,26;
  6284. //		}
  6285. //	}
  6286.  
  6287. //if (Sex == 0)
  6288. //	{
  6289. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  6290. //		{
  6291. //		setlook 6,6;
  6292. //		setlook 7,2;
  6293. //		}
  6294. //
  6295. //	if (Class == Job_Crusader || Class == Job_Merchant)
  6296. //		{
  6297. //		setlook 6,6;
  6298. //		setlook 7,18;
  6299. //		}
  6300. //
  6301. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  6302. //		{
  6303. //		setlook 6,6;
  6304. //		setlook 7,42;
  6305. //		}
  6306. //
  6307. //	if (Class == Job_High_Priest)
  6308. //		{
  6309. //		setlook 6,6;
  6310. //		setlook 7,0;
  6311. //		}
  6312. //
  6313. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  6314. //		{
  6315. //		setlook 6,6;
  6316. //		setlook 7,14;
  6317. //		}
  6318. //
  6319. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  6320. //		{
  6321. //		setlook 6,6;
  6322. //		setlook 7,66;
  6323. //		}
  6324. //
  6325. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  6326. //		{
  6327. //		setlook 6,6;
  6328. //		setlook 7,58;
  6329. //		}
  6330. //	if (Class == Job_Dancer)
  6331. //		{
  6332. //		setlook 6,6;
  6333. //		setlook 7,153;
  6334. //		}
  6335. //
  6336. //	if (Class == Job_Gypsy)
  6337. //		{
  6338. //		setlook 6,6;
  6339. //		setlook 7,47;
  6340. //		}
  6341. //
  6342. //	if (Class == Job_Stalker)
  6343. //		{
  6344. //		setlook 6,6;
  6345. //		setlook 7,157;
  6346. //		}
  6347. //
  6348. //	if (Class == Job_Archer)
  6349. //		{
  6350. //		setlook 6,6;
  6351. //		setlook 7,26;
  6352. //		}
  6353. //
  6354. //	if (Class == Job_Gunslinger)
  6355. //		{
  6356. //		setlook 6,6;
  6357. //		setlook 7,26;
  6358. //		}
  6359. //	}
  6360.  
  6361. 	if ($@rspawn == 1)
  6362. 	{
  6363. 	set @rspawn, 1;
  6364. 	save "pvp_2vs2",65,47;
  6365. 	warp "pvp_2vs2",65,47;
  6366. 	}
  6367.  
  6368. 	if ($@rspawn == 2)
  6369. 	{
  6370. 	set @rspawn, 2;
  6371. 	set $@rspawn, 0;
  6372. 	save "pvp_2vs2",65,33;
  6373. 	warp "pvp_2vs2",65,33;
  6374. 	}
  6375. }
  6376.  
  6377. if (@team == 1)
  6378. {
  6379. set $@bspawn, $@bspawn + 1;
  6380. set $@hblueqt, $@hblueqt +1;
  6381.  
  6382. // "^^color^^"
  6383. //if (Sex == 1)
  6384. //	{
  6385. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  6386. //		{
  6387. //		setlook 6,5;
  6388. //		setlook 7,1;
  6389. //		}
  6390. //
  6391. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  6392. //		{
  6393. //		setlook 6,5;
  6394. //		setlook 7,2;
  6395. //		}
  6396. //
  6397. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  6398. //		{
  6399. //		setlook 6,5;
  6400. //		setlook 7,43;
  6401. //		}
  6402. //	}
  6403.  
  6404. //if (Sex == 0)
  6405. //	{
  6406. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  6407. //		{
  6408. //		setlook 6,5;
  6409. //		setlook 7,1;
  6410. //		}
  6411. //
  6412. //	if (Class == Job_Archer)
  6413. //		{
  6414. //		setlook 6,5;
  6415. //		setlook 7,0;
  6416. //		}
  6417. //
  6418. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  6419. //		{
  6420. //		setlook 6,5;
  6421. //		setlook 7,43;
  6422. //		}
  6423. //	if (Class == Job_Wizard)
  6424. //		{
  6425. //		setlook 6,5;
  6426. //		setlook 7,67;
  6427. //		}
  6428. //	}
  6429.  
  6430. 	if ($@bspawn == 1)
  6431. 	{
  6432. 	set @bspawn, 1;
  6433. 	save "pvp_2vs2",14,47;
  6434. 	warp "pvp_2vs2",14,47;
  6435. 	}
  6436.  
  6437. 	if ($@bspawn == 2)
  6438. 	{
  6439. 	set @bspawn, 2;
  6440. 	set $@bspawn, 0;
  6441. 	save "pvp_2vs2",14,33;
  6442. 	warp "pvp_2vs2",14,33;
  6443. 	}
  6444. }
  6445. percentheal 100,100;
  6446. close;
  6447.  
  6448. hfullmsgclassic:
  6449. mes "The ^FF0000Red Team^000000 has "+$@hredqt+"/12 Players.";
  6450. mes "The ^0066FFBlue Team^000000 has "+$@hblueqt+"/12 Players.";
  6451. mes " ";
  6452. mes "Sorry both teams are full try another CTF arena.";
  6453. close;
  6454.  
  6455. close;
  6456.  
  6457. ctfsingle:
  6458.  
  6459. next;
  6460. mes "[Single Flag CTF]";
  6461.  
  6462. if ($@sredwin == 1 || $@sbluewin == 1)
  6463. {
  6464. mes "";
  6465. mes "Please wait a minute while I clean the battlefield.";
  6466. close2;
  6467.  
  6468. sleep2 45000;
  6469.  
  6470. set $@sredwin, 0;
  6471. set $@sbluewin, 0;
  6472. end;
  6473. }
  6474.  
  6475. //makes player unable to join the game due to full room
  6476. if (@smapuser >= 24)
  6477. {
  6478. goto sfullmsgclassic;
  6479. }
  6480.  
  6481. if ($@sredqt < 0)
  6482. {
  6483. set $@sredqt, 0;
  6484. }
  6485.  
  6486. if ($@sblueqt < 0)
  6487. {
  6488. set $@sblueqt, 0;
  6489. }
  6490.  
  6491. mes "The "+@redteam$+" has "+$@sredqt+"/12 Players.";
  6492. mes "The "+@blueteam$+" has "+$@sblueqt+"/12 Players.";
  6493. mes " ";
  6494. mes "What team would you like to join?";
  6495.  
  6496. menu "Blue Team",sbt,"Red Team",srt,"Cancel",-;
  6497. close;
  6498.  
  6499. sbt:
  6500. if ($@sblueqt >= 12)
  6501. 	{
  6502. 	next;
  6503. 	mes "The "+@blueteam$+" is full";
  6504. 	next;
  6505. 	goto begin;
  6506. 	}
  6507.  
  6508. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  6509. set @team, 1;
  6510. set teamname, @blueteam$;
  6511. goto oksingle;
  6512. end;
  6513.  
  6514. srt:
  6515. if ($@sredqt >= 12)
  6516. 	{
  6517. 	next;
  6518. 	mes "The "+@redteam$+" is full";
  6519. 	next;
  6520. 	goto begin;
  6521. 	}
  6522.  
  6523. mapannounce "pvp_y_5-2", ""+strcharinfo(0)+" has joined the Red Team.",0;
  6524. set @team, 2;
  6525. set teamname, @redteam$;
  6526. goto oksingle;
  6527. end;
  6528.  
  6529. oksingle:
  6530.  
  6531. set @isingleqt, getarraysize($@single);
  6532. setarray $@single[@isingleqt], getcharid(3);
  6533.  
  6534. if (@smapuser == 0)
  6535. {
  6536. set $@boff, 1;
  6537. set $@roff, 0;
  6538. set $@suddendeath, 0;
  6539. setnpctimer 0, "CTF";
  6540. }
  6541.  
  6542. set colorchange, 1;
  6543. set @playing, 1;
  6544. set @single, 1;
  6545.  
  6546. if (@team == 2)
  6547. {
  6548. set $@single_rspawn, $@single_rspawn + 1;
  6549. set $@sredqt, $@sredqt +1;
  6550.  
  6551. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  6552. //if (Sex == 1)
  6553. //	{
  6554. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  6555. //		{
  6556. //		setlook 6,6;
  6557. //		setlook 7,2;
  6558. //		}
  6559. //
  6560. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  6561. //		{
  6562. //		setlook 6,6;
  6563. //		setlook 7,1;
  6564. //		}
  6565. //
  6566. //	if (Class == SuperNovice || Class == Job_Paladin)
  6567. //		{
  6568. //		setlook 6,6;
  6569. //		setlook 7,58;
  6570. //		}
  6571. //
  6572. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  6573. //		{
  6574. //		setlook 6,6;
  6575. //		setlook 7,146;
  6576. //		}
  6577. //
  6578. //	if (Class == Job_High_Priest || Class == Job_Champion)
  6579. //		{
  6580. //		setlook 6,6;
  6581. //		setlook 7,66;
  6582. //		}
  6583. //
  6584. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  6585. //		{
  6586. //		setlook 6,6;
  6587. //		setlook 7,42;
  6588. //		}
  6589. //
  6590. //	if (Class == Job_Creator)
  6591. //		{
  6592. //		setlook 6,6;
  6593. //		setlook 7,14;
  6594. //		}
  6595. //
  6596. //	if (Class == Job_Sage)
  6597. //		{
  6598. //		setlook 6,6;
  6599. //		setlook 7,18;
  6600. //		}
  6601. //
  6602. //	if (Class == Job_Professor || Class == Job_Mage)
  6603. //		{
  6604. //		setlook 6,6;
  6605. //		setlook 7,39;
  6606. //		}
  6607. //
  6608. //	if (Class == Job_Whitesmith)
  6609. //		{
  6610. //		setlook 6,6;
  6611. //		setlook 7,62;
  6612. //		}
  6613. //
  6614. //	if (Class == Job_Soul_Linker)
  6615. //		{
  6616. //		setlook 6,6;
  6617. //		setlook 7,122;
  6618. //		}
  6619. //
  6620. //	if (Class == Job_Gunslinger)
  6621. //		{
  6622. //		setlook 6,6;
  6623. //		setlook 7,26;
  6624. //		}
  6625. //	}
  6626.  
  6627. //if (Sex == 0)
  6628. //	{
  6629. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  6630. //		{
  6631. //		setlook 6,6;
  6632. //		setlook 7,2;
  6633. //		}
  6634. //
  6635. //	if (Class == Job_Crusader || Class == Job_Merchant)
  6636. //		{
  6637. //		setlook 6,6;
  6638. //		setlook 7,18;
  6639. //		}
  6640. //
  6641. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  6642. //		{
  6643. //		setlook 6,6;
  6644. //		setlook 7,42;
  6645. //		}
  6646. //
  6647. //	if (Class == Job_High_Priest)
  6648. //		{
  6649. //		setlook 6,6;
  6650. //		setlook 7,0;
  6651. //		}
  6652. //
  6653. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  6654. //		{
  6655. //		setlook 6,6;
  6656. //		setlook 7,14;
  6657. //		}
  6658. //
  6659. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  6660. //		{
  6661. //		setlook 6,6;
  6662. //		setlook 7,66;
  6663. //		}
  6664. //
  6665. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  6666. //		{
  6667. //		setlook 6,6;
  6668. //		setlook 7,58;
  6669. //		}
  6670. //	if (Class == Job_Dancer)
  6671. //		{
  6672. //		setlook 6,6;
  6673. //		setlook 7,153;
  6674. //		}
  6675. //
  6676. //	if (Class == Job_Gypsy)
  6677. //		{
  6678. //		setlook 6,6;
  6679. //		setlook 7,47;
  6680. //		}
  6681. //
  6682. //	if (Class == Job_Stalker)
  6683. //		{
  6684. //		setlook 6,6;
  6685. //		setlook 7,157;
  6686. //		}
  6687. //
  6688. //	if (Class == Job_Archer)
  6689. //		{
  6690. //		setlook 6,6;
  6691. //		setlook 7,26;
  6692. //		}
  6693. //
  6694. //	if (Class == Job_Gunslinger)
  6695. //		{
  6696. //		setlook 6,6;
  6697. //		setlook 7,26;
  6698. //		}
  6699. //	}
  6700.  
  6701. 	if ($@single_rspawn == 1)
  6702. 	{
  6703. 	set @single_rspawn, 1;
  6704. 	save "pvp_y_5-2",205,122;
  6705. 	warp "pvp_y_5-2",205,122;
  6706. 	}
  6707.  
  6708. 	if ($@single_rspawn == 2)
  6709. 	{
  6710. 	set @single_rspawn, 2;
  6711. 	set $@single_rspawn, 0;
  6712. 	save "pvp_y_5-2",205,137;
  6713. 	warp "pvp_y_5-2",205,137;
  6714. 	}
  6715. }
  6716.  
  6717. if (@team == 1)
  6718. {
  6719. set $@single_bspawn, $@single_bspawn + 1;
  6720. set $@sblueqt, $@sblueqt +1;
  6721.  
  6722. // "^^color^^"
  6723. //if (Sex == 1)
  6724. //	{
  6725. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  6726. //		{
  6727. //		setlook 6,5;
  6728. //		setlook 7,1;
  6729. //		}
  6730. //
  6731. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  6732. //		{
  6733. //		setlook 6,5;
  6734. //		setlook 7,2;
  6735. //		}
  6736. //
  6737. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  6738. //		{
  6739. //		setlook 6,5;
  6740. //		setlook 7,43;
  6741. //		}
  6742. //	}
  6743.  
  6744. //if (Sex == 0)
  6745. //	{
  6746. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  6747. //		{
  6748. //		setlook 6,5;
  6749. //		setlook 7,1;
  6750. //		}
  6751. //
  6752. //	if (Class == Job_Archer)
  6753. //		{
  6754. //		setlook 6,5;
  6755. //		setlook 7,0;
  6756. //		}
  6757. //
  6758. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  6759. //		{
  6760. //		setlook 6,5;
  6761. //		setlook 7,43;
  6762. //		}
  6763. //	if (Class == Job_Wizard)
  6764. //		{
  6765. //		setlook 6,5;
  6766. //		setlook 7,67;
  6767. //		}
  6768. //	}
  6769.  
  6770. 	if ($@single_bspawn == 1)
  6771. 	{
  6772. 	set @single_bspawn, 1;
  6773. 	save "pvp_y_5-2",58,137;
  6774. 	warp "pvp_y_5-2",58,137;
  6775. 	}
  6776.  
  6777. 	if ($@single_bspawn == 2)
  6778. 	{
  6779. 	set @single_bspawn, 2;
  6780. 	set $@single_bspawn, 0;
  6781. 	save "pvp_y_5-2",58,122;
  6782. 	warp "pvp_y_5-2",58,122;
  6783. 	}
  6784. }
  6785. percentheal 100,100;
  6786. close;
  6787.  
  6788. sfullmsgclassic:
  6789. mes "The ^FF0000Red Team^000000 has "+$@sredqt+"/12 Players.";
  6790. mes "The ^0066FFBlue Team^000000 has "+$@sblueqt+"/12 Players.";
  6791. mes " ";
  6792. mes "Sorry both teams are full try another CTF arena.";
  6793. close;
  6794. end;
  6795.  
  6796. ctfneutral:
  6797.  
  6798. next;
  6799. mes "[Neutral Flag CTF]";
  6800.  
  6801. if ($@nredwin == 1 || $@nbluewin == 1)
  6802. {
  6803. mes "";
  6804. mes "Please wait a minute while I clean the battlefield.";
  6805. close2;
  6806.  
  6807. sleep2 45000;
  6808.  
  6809. set $@nredwin, 0;
  6810. set $@nbluewin, 0;
  6811. end;
  6812. }
  6813.  
  6814. //makes player unable to join the game due to full room
  6815. if (@nmapuser >= 24)
  6816. {
  6817. goto nfullmsgclassic;
  6818. }
  6819.  
  6820. if ($@nredqt < 0)
  6821. {
  6822. set $@nredqt, 0;
  6823. }
  6824.  
  6825. if ($@nblueqt < 0)
  6826. {
  6827. set $@nblueqt, 0;
  6828. }
  6829.  
  6830. mes "The "+@redteam$+" has "+$@nredqt+"/12 Players.";
  6831. mes "The "+@blueteam$+" has "+$@nblueqt+"/12 Players.";
  6832. mes " ";
  6833. mes "What team would you like to join?";
  6834.  
  6835. menu "Blue Team",nbt,"Red Team",nrt,"Cancel",-;
  6836. close;
  6837.  
  6838. nbt:
  6839. if ($@nblueqt >= 12)
  6840. 	{
  6841. 	next;
  6842. 	mes "The "+@blueteam$+" is full";
  6843. 	next;
  6844. 	goto begin;
  6845. 	}
  6846.  
  6847. mapannounce "tha_t10", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  6848. set @team, 1;
  6849. set teamname, @blueteam$;
  6850. goto okneutral;
  6851. end;
  6852.  
  6853. nrt:
  6854. if ($@nredqt >= 12)
  6855. 	{
  6856. 	next;
  6857. 	mes "The "+@redteam$+" is full";
  6858. 	next;
  6859. 	goto begin;
  6860. 	}
  6861.  
  6862. mapannounce "tha_t10", ""+strcharinfo(0)+" has joined the Red Team.",0;
  6863. set @team, 2;
  6864. set teamname, @redteam$;
  6865. goto okneutral;
  6866. end;
  6867.  
  6868. okneutral:
  6869.  
  6870. set @ineutralqt, getarraysize($@neutral);
  6871. setarray $@neutral[@ineutralqt], getcharid(3);
  6872.  
  6873. set colorchange, 1;
  6874. set @playing, 1;
  6875. set @neutral, 1;
  6876.  
  6877. if (@team == 2)
  6878. {
  6879. set $@nredqt, $@nredqt +1;
  6880.  
  6881. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  6882. //if (Sex == 1)
  6883. //	{
  6884. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  6885. //		{
  6886. //		setlook 6,6;
  6887. //		setlook 7,2;
  6888. //		}
  6889. //
  6890. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  6891. //		{
  6892. //		setlook 6,6;
  6893. //		setlook 7,1;
  6894. //		}
  6895. //
  6896. //	if (Class == SuperNovice || Class == Job_Paladin)
  6897. //		{
  6898. //		setlook 6,6;
  6899. //		setlook 7,58;
  6900. //		}
  6901. //
  6902. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  6903. //		{
  6904. //		setlook 6,6;
  6905. //		setlook 7,146;
  6906. //		}
  6907. //
  6908. //	if (Class == Job_High_Priest || Class == Job_Champion)
  6909. //		{
  6910. //		setlook 6,6;
  6911. //		setlook 7,66;
  6912. //		}
  6913. //
  6914. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  6915. //		{
  6916. //		setlook 6,6;
  6917. //		setlook 7,42;
  6918. //		}
  6919. //
  6920. //	if (Class == Job_Creator)
  6921. //		{
  6922. //		setlook 6,6;
  6923. //		setlook 7,14;
  6924. //		}
  6925. //
  6926. //	if (Class == Job_Sage)
  6927. //		{
  6928. //		setlook 6,6;
  6929. //		setlook 7,18;
  6930. //		}
  6931. //
  6932. //	if (Class == Job_Professor || Class == Job_Mage)
  6933. //		{
  6934. //		setlook 6,6;
  6935. //		setlook 7,39;
  6936. //		}
  6937. //
  6938. //	if (Class == Job_Whitesmith)
  6939. //		{
  6940. //		setlook 6,6;
  6941. //		setlook 7,62;
  6942. //		}
  6943. //
  6944. //	if (Class == Job_Soul_Linker)
  6945. //		{
  6946. //		setlook 6,6;
  6947. //		setlook 7,122;
  6948. //		}
  6949. //
  6950. //	if (Class == Job_Gunslinger)
  6951. //		{
  6952. //		setlook 6,6;
  6953. //		setlook 7,26;
  6954. //		}
  6955. //	}
  6956.  
  6957. //if (Sex == 0)
  6958. //	{
  6959. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  6960. //		{
  6961. //		setlook 6,6;
  6962. //		setlook 7,2;
  6963. //		}
  6964. //
  6965. //	if (Class == Job_Crusader || Class == Job_Merchant)
  6966. //		{
  6967. //		setlook 6,6;
  6968. //		setlook 7,18;
  6969. //		}
  6970. //
  6971. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  6972. //		{
  6973. //		setlook 6,6;
  6974. //		setlook 7,42;
  6975. //		}
  6976. //
  6977. //	if (Class == Job_High_Priest)
  6978. //		{
  6979. //		setlook 6,6;
  6980. //		setlook 7,0;
  6981. //		}
  6982. //
  6983. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  6984. //		{
  6985. //		setlook 6,6;
  6986. //		setlook 7,14;
  6987. //		}
  6988. //
  6989. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  6990. //		{
  6991. //		setlook 6,6;
  6992. //		setlook 7,66;
  6993. //		}
  6994. //
  6995. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  6996. //		{
  6997. //		setlook 6,6;
  6998. //		setlook 7,58;
  6999. //		}
  7000. //	if (Class == Job_Dancer)
  7001. //		{
  7002. //		setlook 6,6;
  7003. //		setlook 7,153;
  7004. //		}
  7005. //
  7006. //	if (Class == Job_Gypsy)
  7007. //		{
  7008. //		setlook 6,6;
  7009. //		setlook 7,47;
  7010. //		}
  7011. //
  7012. //	if (Class == Job_Stalker)
  7013. //		{
  7014. //		setlook 6,6;
  7015. //		setlook 7,157;
  7016. //		}
  7017. //
  7018. //	if (Class == Job_Archer)
  7019. //		{
  7020. //		setlook 6,6;
  7021. //		setlook 7,26;
  7022. //		}
  7023. //
  7024. //	if (Class == Job_Gunslinger)
  7025. //		{
  7026. //		setlook 6,6;
  7027. //		setlook 7,26;
  7028. //		}
  7029. //	}
  7030.  
  7031. save "tha_t10",90,156;
  7032. warp "tha_t10",90,156;
  7033. }
  7034.  
  7035. if (@team == 1)
  7036. {
  7037. set $@nblueqt, $@nblueqt +1;
  7038.  
  7039. // "^^color^^"
  7040. //if (Sex == 1)
  7041. //	{
  7042. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  7043. //		{
  7044. //		setlook 6,5;
  7045. //		setlook 7,1;
  7046. //		}
  7047. //
  7048. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  7049. //		{
  7050. //		setlook 6,5;
  7051. //		setlook 7,2;
  7052. //		}
  7053. //
  7054. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  7055. //		{
  7056. //		setlook 6,5;
  7057. //		setlook 7,43;
  7058. //		}
  7059. //	}
  7060.  
  7061. //if (Sex == 0)
  7062. //	{
  7063. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  7064. //		{
  7065. //		setlook 6,5;
  7066. //		setlook 7,1;
  7067. //		}
  7068. //
  7069. //	if (Class == Job_Archer)
  7070. //		{
  7071. //		setlook 6,5;
  7072. //		setlook 7,0;
  7073. //		}
  7074. //
  7075. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  7076. //		{
  7077. //		setlook 6,5;
  7078. //		setlook 7,43;
  7079. //		}
  7080. //	if (Class == Job_Wizard)
  7081. //		{
  7082. //		setlook 6,5;
  7083. //		setlook 7,67;
  7084. //		}
  7085. //	}
  7086.  
  7087. save "tha_t10",167,100;
  7088. warp "tha_t10",167,100;
  7089. }
  7090. percentheal 100,100;
  7091. close;
  7092.  
  7093. nfullmsgclassic:
  7094. mes "The ^FF0000Red Team^000000 has "+$@nredqt+"/12 Players.";
  7095. mes "The ^0066FFBlue Team^000000 has "+$@nblueqt+"/12 Players.";
  7096. mes " ";
  7097. mes "Sorry both teams are full try another CTF arena.";
  7098. close;
  7099. end;
  7100.  
  7101. classicgvg:
  7102.  
  7103. next;
  7104. mes "[Classic GvG CTF]";
  7105.  
  7106. //makes player unable to join the game due to full room
  7107. if (@gmapuser >= 24)
  7108. {
  7109. goto hfullmsgclassic;
  7110. }
  7111.  
  7112. if ($@gredqt < 0)
  7113. {
  7114. set $@gredqt, 0;
  7115. }
  7116.  
  7117. if ($@gblueqt < 0)
  7118. {
  7119. set $@gblueqt, 0;
  7120. }
  7121.  
  7122. mes "The "+@redteam$+" has "+$@gredqt+"/12 Players.";
  7123. mes "The "+@blueteam$+" has "+$@gblueqt+"/12 Players.";
  7124. mes " ";
  7125. mes "What team would you like to join?";
  7126.  
  7127. menu "Blue Team",gbt,"Red Team",grt,"Cancel",-;
  7128. close;
  7129.  
  7130. gbt:
  7131. if ($@gblueqt >= 12)
  7132. 	{
  7133. 	next;
  7134. 	mes "The "+@blueteam$+" is full";
  7135. 	next;
  7136. 	goto begin;
  7137. 	}
  7138.  
  7139. mapannounce "poring_w02", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  7140. set @team, 1;
  7141. set teamname, @blueteam$;
  7142. goto okclassicgvg;
  7143. end;
  7144.  
  7145. grt:
  7146. if ($@gredqt >= 12)
  7147. 	{
  7148. 	next;
  7149. 	mes "The "+@redteam$+" is full";
  7150. 	next;
  7151. 	goto begin;
  7152. 	}
  7153.  
  7154. mapannounce "poring_w02", ""+strcharinfo(0)+" has joined the Red Team.",0;
  7155. set @team, 2;
  7156. set teamname, @redteam$;
  7157. goto okclassicgvg;
  7158. end;
  7159.  
  7160. okclassicgvg:
  7161.  
  7162. set @iclassgvgqt, getarraysize($@classicgvg);
  7163. setarray $@classicgvg[@iclassgvgqt], getcharid(3);
  7164.  
  7165. set colorchange, 1;
  7166. set @playing, 1;
  7167. set @classicgvg, 1;
  7168.  
  7169. if (@team == 2)
  7170. {
  7171. set $@gredqt, $@gredqt +1;
  7172.  
  7173. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  7174. //if (Sex == 1)
  7175. //	{
  7176. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  7177. //		{
  7178. //		setlook 6,6;
  7179. //		setlook 7,2;
  7180. //		}
  7181. //
  7182. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  7183. //		{
  7184. //		setlook 6,6;
  7185. //		setlook 7,1;
  7186. //		}
  7187. //
  7188. //	if (Class == SuperNovice || Class == Job_Paladin)
  7189. //		{
  7190. //		setlook 6,6;
  7191. //		setlook 7,58;
  7192. //		}
  7193. //
  7194. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  7195. //		{
  7196. //		setlook 6,6;
  7197. //		setlook 7,146;
  7198. //		}
  7199. //
  7200. //	if (Class == Job_High_Priest || Class == Job_Champion)
  7201. //		{
  7202. //		setlook 6,6;
  7203. //		setlook 7,66;
  7204. //		}
  7205. //
  7206. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  7207. //		{
  7208. //		setlook 6,6;
  7209. //		setlook 7,42;
  7210. //		}
  7211. //
  7212. //	if (Class == Job_Creator)
  7213. //		{
  7214. //		setlook 6,6;
  7215. //		setlook 7,14;
  7216. //		}
  7217. //
  7218. //	if (Class == Job_Sage)
  7219. //		{
  7220. //		setlook 6,6;
  7221. //		setlook 7,18;
  7222. //		}
  7223. //
  7224. //	if (Class == Job_Professor || Class == Job_Mage)
  7225. //		{
  7226. //		setlook 6,6;
  7227. //		setlook 7,39;
  7228. //		}
  7229. //
  7230. //	if (Class == Job_Whitesmith)
  7231. //		{
  7232. //		setlook 6,6;
  7233. //		setlook 7,62;
  7234. //		}
  7235. //
  7236. //	if (Class == Job_Soul_Linker)
  7237. //		{
  7238. //		setlook 6,6;
  7239. //		setlook 7,122;
  7240. //		}
  7241. //
  7242. //	if (Class == Job_Gunslinger)
  7243. //		{
  7244. //		setlook 6,6;
  7245. //		setlook 7,26;
  7246. //		}
  7247. //	}
  7248.  
  7249. //if (Sex == 0)
  7250. //	{
  7251. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  7252. //		{
  7253. //		setlook 6,6;
  7254. //		setlook 7,2;
  7255. //		}
  7256. //
  7257. //	if (Class == Job_Crusader || Class == Job_Merchant)
  7258. //		{
  7259. //		setlook 6,6;
  7260. //		setlook 7,18;
  7261. //		}
  7262. //
  7263. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  7264. //		{
  7265. //		setlook 6,6;
  7266. //		setlook 7,42;
  7267. //		}
  7268. //
  7269. //	if (Class == Job_High_Priest)
  7270. //		{
  7271. //		setlook 6,6;
  7272. //		setlook 7,0;
  7273. //		}
  7274. //
  7275. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  7276. //		{
  7277. //		setlook 6,6;
  7278. //		setlook 7,14;
  7279. //		}
  7280. //
  7281. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  7282. //		{
  7283. //		setlook 6,6;
  7284. //		setlook 7,66;
  7285. //		}
  7286. //
  7287. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  7288. //		{
  7289. //		setlook 6,6;
  7290. //		setlook 7,58;
  7291. //		}
  7292. //	if (Class == Job_Dancer)
  7293. //		{
  7294. //		setlook 6,6;
  7295. //		setlook 7,153;
  7296. //		}
  7297. //
  7298. //	if (Class == Job_Gypsy)
  7299. //		{
  7300. //		setlook 6,6;
  7301. //		setlook 7,47;
  7302. //		}
  7303. //
  7304. //	if (Class == Job_Stalker)
  7305. //		{
  7306. //		setlook 6,6;
  7307. //		setlook 7,157;
  7308. //		}
  7309. //
  7310. //	if (Class == Job_Archer)
  7311. //		{
  7312. //		setlook 6,6;
  7313. //		setlook 7,26;
  7314. //		}
  7315. //
  7316. //	if (Class == Job_Gunslinger)
  7317. //		{
  7318. //		setlook 6,6;
  7319. //		setlook 7,26;
  7320. //		}
  7321. //	}
  7322.  
  7323. save "poring_w02",170,176;
  7324. warp "poring_w02",170,176;
  7325. }
  7326.  
  7327. if (@team == 1)
  7328. {
  7329. set $@gblueqt, $@gblueqt +1;
  7330.  
  7331. // "^^color^^"
  7332. //if (Sex == 1)
  7333. //	{
  7334. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  7335. //		{
  7336. //		setlook 6,5;
  7337. //		setlook 7,1;
  7338. //		}
  7339. //
  7340. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  7341. //		{
  7342. //		setlook 6,5;
  7343. //		setlook 7,2;
  7344. //		}
  7345. //
  7346. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  7347. //		{
  7348. //		setlook 6,5;
  7349. //		setlook 7,43;
  7350. //		}
  7351. //	}
  7352.  
  7353. //if (Sex == 0)
  7354. //	{
  7355. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  7356. //		{
  7357. //		setlook 6,5;
  7358. //		setlook 7,1;
  7359. //		}
  7360. //
  7361. //	if (Class == Job_Archer)
  7362. //		{
  7363. //		setlook 6,5;
  7364. //		setlook 7,0;
  7365. //		}
  7366. //
  7367. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  7368. //		{
  7369. //		setlook 6,5;
  7370. //		setlook 7,43;
  7371. //		}
  7372. //	if (Class == Job_Wizard)
  7373. //		{
  7374. //		setlook 6,5;
  7375. //		setlook 7,67;
  7376. //		}
  7377. //	}
  7378.  
  7379. save "poring_w02",26,176;
  7380. warp "poring_w02",26,176;
  7381. }
  7382. percentheal 100,100;
  7383. close;
  7384.  
  7385. gfullmsgclassic:
  7386. mes "The ^FF0000Red Team^000000 has "+$@gredqt+"/12 Players.";
  7387. mes "The ^0066FFBlue Team^000000 has "+$@gblueqt+"/12 Players.";
  7388. mes " ";
  7389. mes "Sorry both teams are full try another CTF arena.";
  7390. close;
  7391.  
  7392. close;
  7393.  
  7394. pronteraneutral:
  7395.  
  7396. next;
  7397. mes "[Prontera Neutral Flag]";
  7398.  
  7399. //makes player unable to join the game due to full room
  7400. if (@nnmapuser >= 24)
  7401. {
  7402. goto nnfullmsgclassic;
  7403. }
  7404.  
  7405. if ($@nnredqt < 0)
  7406. {
  7407. set $@nnredqt, 0;
  7408. }
  7409.  
  7410. if ($@nnblueqt < 0)
  7411. {
  7412. set $@nnblueqt, 0;
  7413. }
  7414.  
  7415. mes "The "+@redteam$+" has "+$@nnredqt+"/12 Players.";
  7416. mes "The "+@blueteam$+" has "+$@nnblueqt+"/12 Players.";
  7417. mes " ";
  7418. mes "What team would you like to join?";
  7419.  
  7420. menu "Blue Team",nnbt,"Red Team",nnrt,"Cancel",-;
  7421. close;
  7422.  
  7423. nnbt:
  7424. if ($@nnblueqt >= 12)
  7425. 	{
  7426. 	next;
  7427. 	mes "The "+@blueteam$+" is full";
  7428. 	next;
  7429. 	goto begin;
  7430. 	}
  7431.  
  7432. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has joined the Blue Team.",0;
  7433. set @team, 1;
  7434. set teamname, @blueteam$;
  7435. goto okpronteraneutral;
  7436. end;
  7437.  
  7438. nnrt:
  7439. if ($@nnredqt >= 12)
  7440. 	{
  7441. 	next;
  7442. 	mes "The "+@redteam$+" is full";
  7443. 	next;
  7444. 	goto begin;
  7445. 	}
  7446.  
  7447. mapannounce "pvp_y_7-1", ""+strcharinfo(0)+" has joined the Red Team.",0;
  7448. set @team, 2;
  7449. set teamname, @redteam$;
  7450. goto okpronteraneutral;
  7451. end;
  7452.  
  7453. okpronteraneutral:
  7454.  
  7455. set @ipneutralqt, getarraysize($@pneutral);
  7456. setarray $@pneutral[@ipneutralqt], getcharid(3);
  7457.  
  7458. set colorchange, 1;
  7459. set @playing, 1;
  7460.  
  7461. if (@team == 2)
  7462. {
  7463. set $@nnredqt, $@nnredqt +1;
  7464.  
  7465. //changes character sprite palletes, warps, and saves player to CTF map "^^color^^"
  7466. //if (Sex == 1)
  7467. //	{
  7468. //	if (Class == Job_Thief || Class == Job_Monk || Class == Job_Acolyte || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest || Class == Job_Knight || Class == Job_High_Wizard)
  7469. //		{
  7470. //		setlook 6,6;
  7471. //		setlook 7,2;
  7472. //		}
  7473. //
  7474. //	if (Class == Novice || Class == Job_Swordsman || Class == Job_Archer || Class == Job_Merchant)
  7475. //		{
  7476. //		setlook 6,6;
  7477. //		setlook 7,1;
  7478. //		}
  7479. //
  7480. //	if (Class == SuperNovice || Class == Job_Paladin)
  7481. //		{
  7482. //		setlook 6,6;
  7483. //		setlook 7,58;
  7484. //		}
  7485. //
  7486. //	if (Class == Job_Crusader || Class == Job_Stalker || Class == Job_Blacksmith)
  7487. //		{
  7488. //		setlook 6,6;
  7489. //		setlook 7,146;
  7490. //		}
  7491. //
  7492. //	if (Class == Job_High_Priest || Class == Job_Champion)
  7493. //		{
  7494. //		setlook 6,6;
  7495. //		setlook 7,66;
  7496. //		}
  7497. //
  7498. //	if (Class == Job_Alchem || Class == Job_Lord_Knight || Class == Job_Wizard || Class == Job_Bard || Class == Job_Clown || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Taekwon || Class == Job_Star_Gladiator)
  7499. //		{
  7500. //		setlook 6,6;
  7501. //		setlook 7,42;
  7502. //		}
  7503. //
  7504. //	if (Class == Job_Creator)
  7505. //		{
  7506. //		setlook 6,6;
  7507. //		setlook 7,14;
  7508. //		}
  7509. //
  7510. //	if (Class == Job_Sage)
  7511. //		{
  7512. //		setlook 6,6;
  7513. //		setlook 7,18;
  7514. //		}
  7515. //
  7516. //	if (Class == Job_Professor || Class == Job_Mage)
  7517. //		{
  7518. //		setlook 6,6;
  7519. //		setlook 7,39;
  7520. //		}
  7521. //
  7522. //	if (Class == Job_Whitesmith)
  7523. //		{
  7524. //		setlook 6,6;
  7525. //		setlook 7,62;
  7526. //		}
  7527. //
  7528. //	if (Class == Job_Soul_Linker)
  7529. //		{
  7530. //		setlook 6,6;
  7531. //		setlook 7,122;
  7532. //		}
  7533. //
  7534. //	if (Class == Job_Gunslinger)
  7535. //		{
  7536. //		setlook 6,6;
  7537. //		setlook 7,26;
  7538. //		}
  7539. //	}
  7540.  
  7541. //if (Sex == 0)
  7542. //	{
  7543. //	if (Class == Novice ||  Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Rogue || Class == Job_Assassin_Cross || Class == Job_Priest)
  7544. //		{
  7545. //		setlook 6,6;
  7546. //		setlook 7,2;
  7547. //		}
  7548. //
  7549. //	if (Class == Job_Crusader || Class == Job_Merchant)
  7550. //		{
  7551. //		setlook 6,6;
  7552. //		setlook 7,18;
  7553. //		}
  7554. //
  7555. //	if (Class == Job_Monk || Class == Job_Knight || Class == Job_Lord_Knight || Class == Job_Whitesmith || Class == Job_Hunter || Class == Job_Sniper || Class == Job_Soul_Linker || Class == Job_Taekwon || Class == Job_Star_Gladiator || Class == Job_Mage || Class == Job_Swordsman)
  7556. //		{
  7557. //		setlook 6,6;
  7558. //		setlook 7,42;
  7559. //		}
  7560. //
  7561. //	if (Class == Job_High_Priest)
  7562. //		{
  7563. //		setlook 6,6;
  7564. //		setlook 7,0;
  7565. //		}
  7566. //
  7567. //	if (Class == Job_Champion || Class == Job_Creator || Class == Job_Sage || Class == Job_Professor)
  7568. //		{
  7569. //		setlook 6,6;
  7570. //		setlook 7,14;
  7571. //		}
  7572. //
  7573. //	if (Class == Job_Alchem || Class == Job_Wizard || Class == Job_High_Wizard)
  7574. //		{
  7575. //		setlook 6,6;
  7576. //		setlook 7,66;
  7577. //		}
  7578. //
  7579. //	if (Class == Job_Paladin || Class == Job_Blacksmith)
  7580. //		{
  7581. //		setlook 6,6;
  7582. //		setlook 7,58;
  7583. //		}
  7584. //	if (Class == Job_Dancer)
  7585. //		{
  7586. //		setlook 6,6;
  7587. //		setlook 7,153;
  7588. //		}
  7589. //
  7590. //	if (Class == Job_Gypsy)
  7591. //		{
  7592. //		setlook 6,6;
  7593. //		setlook 7,47;
  7594. //		}
  7595. //
  7596. //	if (Class == Job_Stalker)
  7597. //		{
  7598. //		setlook 6,6;
  7599. //		setlook 7,157;
  7600. //		}
  7601. //
  7602. //	if (Class == Job_Archer)
  7603. //		{
  7604. //		setlook 6,6;
  7605. //		setlook 7,26;
  7606. //		}
  7607. //
  7608. //	if (Class == Job_Gunslinger)
  7609. //		{
  7610. //		setlook 6,6;
  7611. //		setlook 7,26;
  7612. //		}
  7613. //	}
  7614.  
  7615. save "pvp_y_7-1",283,204;
  7616. warp "pvp_y_7-1",283,204;
  7617. }
  7618.  
  7619. if (@team == 1)
  7620. {
  7621. set $@nnblueqt, $@nnblueqt +1;
  7622.  
  7623. // "^^color^^"
  7624. //if (Sex == 1)
  7625. //	{
  7626. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross || Class == Job_High_Priest || Class == Job_Champion)
  7627. //		{
  7628. //		setlook 6,5;
  7629. //		setlook 7,1;
  7630. //		}
  7631. //
  7632. //	if (Class == Job_Merchant || Class == Job_Swordsman)
  7633. //		{
  7634. //		setlook 6,5;
  7635. //		setlook 7,2;
  7636. //		}
  7637. //
  7638. //	if (Class == Job_Archer || Class == Job_Mage || Class == Job_Knight || Class == Job_Wizard || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Clown || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker)
  7639. //		{
  7640. //		setlook 6,5;
  7641. //		setlook 7,43;
  7642. //		}
  7643. //	}
  7644.  
  7645. //if (Sex == 0)
  7646. //	{
  7647. //	if (Class == Job_Thief || Class == Job_Acolyte || Class == Job_SuperNovice || Class == Job_Assassin || Class == Job_Priest || Class == Job_Monk || Class == Job_Assassin_Cross)
  7648. //		{
  7649. //		setlook 6,5;
  7650. //		setlook 7,1;
  7651. //		}
  7652. //
  7653. //	if (Class == Job_Archer)
  7654. //		{
  7655. //		setlook 6,5;
  7656. //		setlook 7,0;
  7657. //		}
  7658. //
  7659. //	if (Class == Job_Mage || Class == Job_Knight || Class == Job_Hunter || Class == Job_Crusader || Class == Job_High_Wizard || Class == Job_Sniper || Class == Job_Paladin || Class == Job_Stalker || Class == Job_Gypsy || Class == Job_Taekwon || Class == Job_Ninja || Class == Job_Gunslinger || Class == Job_Star_Gladiator || Class == Job_Blacksmith || Class == Job_Whitesmith || Class == Job_Soul_Linker || Class == Job_High_Priest || Class == Job_Champion || Class == Job_Merchant || Class == Job_Swordsman || Class == Job_Dancer)
  7660. //		{
  7661. //		setlook 6,5;
  7662. //		setlook 7,43;
  7663. //		}
  7664. //	if (Class == Job_Wizard)
  7665. //		{
  7666. //		setlook 6,5;
  7667. //		setlook 7,67;
  7668. //		}
  7669. //	}
  7670.  
  7671. save "pvp_y_7-1",29,204;
  7672. warp "pvp_y_7-1",29,204;
  7673. }
  7674. percentheal 100,100;
  7675. close;
  7676.  
  7677. nnfullmsgclassic:
  7678. mes "The ^FF0000Red Team^000000 has "+$@nnredqt+"/12 Players.";
  7679. mes "The ^0066FFBlue Team^000000 has "+$@nnblueqt+"/12 Players.";
  7680. mes " ";
  7681. mes "Sorry both teams are full try another CTF arena.";
  7682. close;
  7683. end;
  7684.  
  7685. M_rules:
  7686. mes "What do you want to know about?";
  7687. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",begin;
  7688. close;
  7689.  
  7690. crrules:
  7691.  
  7692. next;
  7693. mes "The object of Capture the Flag is to steal the opposing team's flag and returning it to your base while having your flag still at your base.";
  7694. mes "Each gametype plays in a similar way.  The flags will cast agility down on the flag carrier every 5 seconds and will also follow the carriers like pets would (when they have the flag).  Each game of Capture the Flag will end with the first team that achieves 5 flag captures.";
  7695. next;
  7696. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",begin;
  7697. close;
  7698.  
  7699. crules:
  7700. next;
  7701. mes "Classic CTF is the most basic of Capture the Flag games.  PvP is on and each team must play offense and defense to win.  The flags are both on touch return.";
  7702. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",begin;
  7703. close;
  7704.  
  7705. hrules:
  7706. next;
  7707. mes "Hardcore CTF is similar to Classic CTF but with some minor tweaks.  GvG is on, each team has to play offensively and defensively, and the flag will silence the flag carrier along with agility down every 5 seconds.  The flags are both on touch return.";
  7708. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",begin;
  7709. close;
  7710.  
  7711. srules:
  7712. next;
  7713. mes "Single Flag CTF is the most complicated out of the three gametypes.  PvP is on for this gametype.  Instead of having to play offense and defense all at once there are 3 minute rounds where one team is on offense and the other is on defense.  The flags are NOT on touch return in this gametype, instead they are on 30 second respawn times.";
  7714. menu "Common Rules",crrules,"Classic CTF",crules,"Hardcore CTF",hrules,"Single Flag CTF",srules,"Back",begin;
  7715. close;
  7716.  
  7717. pstats:
  7718.  
  7719. set #kdr, #kills - #death;
  7720. set @kdr, kills - death;
  7721. set #rate, ( ((#win * 25) - (#lose *25)) + ((#kills * 4) - (#death *4)) + (#spree * 10) + (#fcapt * 5) + (#ftaken - #fdrop) + (#freturn * 3) );
  7722. set rate, ( ((win * 25) - (lose *25)) + ((kills * 4) - (death * 4)) + (spree * 10) + (fcapt * 5) + (ftaken - fdrop) + (freturn * 3) );
  7723.  
  7724. next;
  7725. mes "Wins: "+win+"";
  7726. mes "Loses: "+lose+"";
  7727. mes " ";
  7728. mes "Kills: "+kills+"";
  7729. mes "Deaths: "+death+"";
  7730. mes "Kill/Death Ratio: "+@kdr+"";
  7731. mes "Best Killing Spree: "+spree+"";
  7732. mes " ";
  7733. mes "Flags Captured: "+fcapt+"";
  7734. mes "Flags Returned: "+freturn+"";
  7735. mes "Flags Taken: "+ftaken+"";
  7736. mes "Flags Dropped: "+fdrop+"" ;
  7737. mes " ";
  7738. //mes "Rank: n/a";
  7739. mes "Overall Rating: "+rate+"";
  7740. mes "CTF POINTS: "+ctfpt+"";
  7741. mes " ";
  7742. mes "TOTAL CTF POINTS GAINED: "+tctfpt+"";
  7743.  
  7744. close;
  7745. end;
  7746.  
  7747. astat:
  7748.  
  7749. next;
  7750. mes "Wins: "+#win+"";
  7751. mes "Loses: "+#lose+"";
  7752. mes " ";
  7753. mes "Kills: "+#kills+"";
  7754. mes "Deaths: "+#death+"";
  7755. mes "Kill/Death Ratio: "+#kdr+"";
  7756. mes "Best Killing Spree: "+#spree+"";
  7757. mes " ";
  7758. mes "Flags Captured: "+#fcapt+"";
  7759. mes "Flags Returned: "+#freturn+"";
  7760. mes "Flags Taken: "+#ftaken+"";
  7761. mes "Flags Dropped: "+#fdrop+"" ;
  7762. mes " ";
  7763. //mes "Rank: n/a";
  7764. mes "Overall Rating: "+#rate+"";
  7765.  
  7766. close;
  7767. end;
  7768.  
  7769. rank:
  7770. mes "Not Implemented yet.";
  7771. close;
  7772.  
  7773.   end;
  7774.   }
  7775. }
  7776. }
  7777.  
  7778. // ================== Duplicates ========================
  7779. //prt_are01,29,150,5	duplicate(blue_ctf_healer)	Healer	829
  7780. //prt_are01,270,150,4	duplicate(red_ctf_healer)	Healer	829
  7781. //pvp_2vs2,14,39,5	duplicate(blue_ctf_healer)	Healer	829
  7782. //pvp_2vs2,65,39,4	duplicate(red_ctf_healer)	Healer	829
  7783. //pvp_y_5-2,46,130,5	duplicate(blue_ctf_healer)	Healer	829
  7784. //pvp_y_5-2,213,130,4	duplicate(red_ctf_healer)	Healer	829
  7785. //tha_t10,196,355,4	duplicate(blue_ctf_healer)	Healer	829
  7786. //tha_t10,208,16,4	duplicate(red_ctf_healer)	Healer	829
  7787. //poring_w02,23,183,5	duplicate(blue_ctf_healer)	Healer	829
  7788. //poring_w02,167,183,4	duplicate(red_ctf_healer)	Healer	829
  7789. //pvp_y_7-1,29,211,4	duplicate(blue_ctf_healer)	Healer	829
  7790. //pvp_y_7-1,282,211,4	duplicate(red_ctf_healer)	Healer	829
  7791. prt_are01,28,164,5	duplicate(escape_npc)	Leave CTF	780
  7792. prt_are01,271,164,4	duplicate(escape_npc)	Leave CTF#1	780
  7793. pvp_2vs2,9,39,5	duplicate(escape_npc)	Leave CTF#2  780
  7794. pvp_2vs2,70,39,4	duplicate(escape_npc)	Leave CTF#3  780
  7795. pvp_y_5-2,44,140,5	duplicate(escape_npc)	Leave CTF#4  780
  7796. pvp_y_5-2,213,144,4	duplicate(escape_npc)	Leave CTF#5	780
  7797. tha_t10,167,101,4	duplicate(escape_npc)	Leave CTF#6  780
  7798. tha_t10,90,159,4	duplicate(escape_npc)	Leave CTF#7  780
  7799. poring_w02,29,183,5	duplicate(escape_npc)	Leave CTF#8  780
  7800. poring_w02,173,183,4	duplicate(escape_npc)	Leave CTF#9  780
  7801. pvp_y_7-1,33,211,4	duplicate(escape_npc)	Leave CTF#10  780
  7802. pvp_y_7-1,277,211,4	duplicate(escape_npc)	Leave CTF#11  780
  7803. prt_are01,28,136,5	duplicate(Grendal)	Repair NPC	813
  7804. prt_are01,271,136,4	duplicate(Grendal)	Repair NPC#1	813
  7805. pvp_2vs2,7,39,5	duplicate(Grendal)	Repair NPC#2  813
  7806. pvp_2vs2,72,39,4	duplicate(Grendal)	Repair NPC#3  813
  7807. pvp_y_5-2,44,135,5	duplicate(Grendal)	Repair NPC#4  813
  7808. pvp_y_5-2,213,123,4	duplicate(Grendal)	Repair NPC#5	813
  7809. tha_t10,90,163,4	duplicate(Grendal)	Repair NPC#6	813
  7810. tha_t10,167,105,4	duplicate(Grendal)	Repair NPC#7  813
  7811. poring_w02,26,183,5	duplicate(Grendal)	Repair NPC#8  813
  7812. poring_w02,170,183,4	duplicate(Grendal)	Repair NPC#9  813
  7813. pvp_y_7-1,31,211,4	duplicate(Grendal)	Repair NPC #10  813
  7814. pvp_y_7-1,279,211,4	duplicate(Grendal)	Repair NPC#11	813
  7815. poring_w02,19,176,4	duplicate(left_warper)	Left Warp	836
  7816. poring_w02,163,176,4	duplicate(left_warper)	Left Warp#1  836
  7817. poring_w02,32,176,8	duplicate(right_warper)	Right Warp	836
  7818. poring_w02,176,176,8	duplicate(right_warper)	Right Warp#1  836
  7819. pvp_y_7-1,272,211,4	duplicate(red_warper)	Blue Base Gate	723¦2
  7820. pvp_y_7-1,40,211,4	duplicate(blue_warper)	Red Base Gate	723¦2
  7821. morocc,160,97,6	duplicate(CTFclient)	Capture The Flag	108
  7822. geffen,112,64,6	duplicate(CTFclient)	Capture The Flag#1  108
  7823. payon,179,104,6	duplicate(CTFclient)	Capture The Flag#2	108
  7824. alberta,115,63,6	duplicate(CTFclient)	Capture The Flag#3  108
  7825. izlude,127,118,6	duplicate(CTFclient)	Capture The Flag#4  108
  7826. aldebaran,145,119,6	duplicate(CTFclient)	Capture The Flag #5  108
  7827. comodo,202,150,6	duplicate(CTFclient)	Capture The Flag#6	108
  7828. yuno,151,183,6	duplicate(CTFclient)	Capture The Flag#7  108
  7829. amatsu,105,149,6	duplicate(CTFclient)	Capture The Flag#8	108
  7830. gonryun,156,122,6	duplicate(CTFclient)	Capture The Flag#9  108
  7831. umbala,126,136,6	duplicate(CTFclient)	Capture The Flag#10  108
  7832. louyang,213,104,6	duplicate(CTFclient)	Capture The Flag#11	108
  7833. ayothaya,212,174,6	duplicate(CTFclient)	Capture The Flag#12  108
  7834. einbroch,245,205,6	duplicate(CTFclient)	Capture The Flag#13  108
  7835. lighthalzen,167,102,6	duplicate(CTFclient)	Capture The Flag#14	108
  7836. hugel,109,75,6	duplicate(CTFclient)	Capture The Flag#15  108
  7837. rachel,112,141,6	duplicate(CTFclient)	Capture The Flag#16	108
  7838. veins,211,129,6	duplicate(CTFclient)	Capture The Flag#17  108
Viewed 870 times, submitted by unknown.