Advertisement
Guest User

Untitled

a guest
Nov 24th, 2013
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 67.25 KB | None | 0 0
  1. // ==== Registration ==== \\
  2.  
  3. // ==============================================================================
  4. // MapFlags
  5. // *********************************************************************
  6.  
  7. bat_room mapflag nomemo
  8. bat_room mapflag nowarpto
  9. bat_room mapflag nowarp
  10. bat_room mapflag nobranch
  11. bat_room mapflag nopenalty
  12. bat_room mapflag noteleport
  13. bat_room mapflag nosave SavePoint
  14.  
  15. // BattleGround Warper - Entrance
  16. // *********************************************************************
  17.  
  18. prontera,148,185,5 script CTH 811,{
  19. mes "[CTH Recruiter]";
  20. if (getgmlevel() >= 99) goto cthgm;
  21. if ($@register < 1) {
  22. set registeredna,0;
  23. mes "Registration for Capture The Heroes is closed.";
  24. close;
  25. } else
  26. if (isequipped(25456) || isequipped(25457)) goto nonono;
  27. if (registeredna == 1) {
  28. set normallook,(getlook(7));
  29. setlook 7, 244;
  30. warp "new_3-4",19,64;
  31. end;
  32. }
  33. if (registeredna == 2) {
  34. set normallook,(getlook(7));
  35. setlook 7, 90;
  36. warp "new_3-4",139,105;
  37. end;
  38. }
  39.  
  40. if (BaseLevel < 265) goto Dipwede;
  41. mes "The Capture The Heroes will start soon...";
  42. mes "I was sent here to recruit worthy warriors.";
  43. next;
  44. mes "[CTH Recruiter]";
  45. mes "The forces of good and evil , and are in need of experienced warriors like you. How would you like to lend your power to one of the forces in Anny and CG's Kingdom?";
  46. next;
  47. if( select("I Wanna Join:I Don't Want to Join") == 2 )
  48. {
  49. mes "[CTH Recruiter]";
  50. mes "I'll always be stationed here for more soldiers. Feel free to come back whenever you're interested.";
  51. close;
  52. }
  53. mes "[CTH Recruiter]";
  54. mes "I wish you luck... young warrior.";
  55. close2;
  56. goto pilina;
  57. end;
  58.  
  59. Dipwede:
  60. mes "[CTH Recruiter]";
  61. mes "I'm sorry but only elite and worthy warriors are aloud to join the Capture The Heroes...";
  62. mes "";
  63. mes "Cry Babies aren't allowed.";
  64. close;
  65.  
  66. nonono:
  67. mes "I'm Sorry but you cannot join the CTH with the Hokage/Akatsuki suit on.";
  68. close;
  69.  
  70.  
  71. pilina:
  72. if ($@register < 1) end;
  73. if ($Team == 1) goto Teamtwo;
  74. set $Team,1;
  75. set normallook,(getlook(7));
  76. setlook 7, 244;
  77. set Bat_Team,1;
  78. set registeredna,1;
  79. warp "new_3-4",19,64;
  80. sleep2 3000;
  81. dispbottom "You joined the Warriors of the Light...";
  82. end;
  83.  
  84. Teamtwo:
  85. set $Team,2;
  86. set normallook,(getlook(7));
  87. setlook 7, 90;
  88. set Bat_Team,2;
  89. set registeredna,2;
  90. warp "new_3-4",139,105;
  91. sleep2 3000;
  92. dispbottom "You joined the Warriors of the Darkness...";
  93. end;
  94.  
  95. cthgm:
  96. if (nagstartna==1) goto cthstop;
  97. mes "Hello Master. Do you want to initiate Capture the Heroes manually?";
  98. menu "Yes, please",-,"No, maybe next time",canc;
  99. set nagstartna,1;
  100. donpcevent "Flavius_BG2::OnCTHStart";
  101. close;
  102.  
  103. cthstop:
  104. mes "Hello Master, Do you want to stop Capture the Heroes?";
  105. menu "Yes, please",-,"No, maybe next time",canc;
  106. announce "Capture the Heroes has been stopped by a Game Master.",0;
  107. set $@FlaviusBG2, 2;
  108. set nagstartna,0;
  109. donpcevent "Flavius_BG2::OnMatchEnd";
  110. close;
  111.  
  112. canc:
  113. close;
  114.  
  115.  
  116. }
  117.  
  118.  
  119. // BattleGround Warper - Exit
  120. // *********************************************************************
  121.  
  122. bat_room,148,150,4 script Teleporter#bat 124,{
  123. mes "[Teleporter]";
  124. mes "Do you wish to leave the battlefield? Use my service to return to town.";
  125. next;
  126. if( select("Leave:Don't Leave") == 2 )
  127. {
  128. mes "[Teleporter]";
  129. mes "I'll be here whenever you're in need of my service.";
  130. close;
  131. }
  132.  
  133. set .@spoint$, getsavepoint(0);
  134. set .@x, getsavepoint(1);
  135. set .@y, getsavepoint(2);
  136. mes "[Teleporter]";
  137. mes "You will be sent back to " + .@spoint$ + ".";
  138. close2;
  139. warp .@spoint$, .@x, .@y;
  140. end;
  141. }
  142.  
  143. // Kafra
  144. // *********************************************************************
  145. bat_room,148,147,4 script Kafra Staff#12::kaf_bat#12 861,{
  146. cutin "kafra_09",2;
  147. callfunc "F_Kafra",0,2,1,150,0;
  148. }
  149.  
  150. // General Guillaume
  151. // *********************************************************************
  152. bat_room,160,159,3 script General Guillaume#12 420,{
  153. cutin "bat_kiyom2",2;
  154. mes "[General Guillaume]";
  155. mes "Hot-blooded adventurer, we need your ability to win this battle.";
  156. next;
  157. cutin "bat_kiyom1",2;
  158. mes "[General Guillaume]";
  159. mes "Our great king, Marcel Marollo VII, is very sick lately. His Majesty has declared that he chosen either me or Prince Croix as the next king amongst his 9 sons.";
  160. next;
  161. mes "[General Guillaume]";
  162. mes "Two kings can't share a nation!";
  163. mes "Only the one victorious from His Majesty's appointed battle will be enthroned.";
  164. next;
  165. mes "[General Guillaume]";
  166. mes "This is however, not just a battle between us. This battle will determine the future of this country. I pledge on my honor to prove that I'm the one who can protect this Maroll from outside threats.";
  167. next;
  168. if( select("Yes, I want to join you.:End Conversation") == 2 )
  169. {
  170. mes "[General Guillaume]";
  171. mes "I'll be the one who will capture the flag!";
  172. close2;
  173. cutin "",255;
  174. end;
  175. }
  176. cutin "bat_kiyom2",2;
  177. mes "[General Guillaume]";
  178. mes "Welcome to my army, comrade.";
  179. mes "Your eyes tell me that you're a soldier that I can trust.";
  180. set Bat_Team,1;
  181. next;
  182. mes "[General Guillaume]";
  183. mes "Now, go upstairs and apply for battle with your comrades. I'm sure they'll welcome you whole-heartedly!";
  184. close2;
  185. cutin "",255;
  186. end;
  187. }
  188.  
  189. // General Croix
  190. // *********************************************************************
  191. bat_room,160,140,3 script Prince Croix#12 416,{
  192. cutin "bat_crua1",2;
  193. mes "[Prince Croix]";
  194. mes "Wise adventurer, why don't you lend us your power for victory?";
  195. next;
  196. cutin "bat_crua2",2;
  197. mes "[Prince Croix]";
  198. mes "I do not wish to shed blood, but I have no choice but to fight for the possibility of peace and for the sake of my people.";
  199. next;
  200. mes "[Prince Croix]";
  201. mes "General Guillaume may have an advantage in this battle as he is the great general of Maroll, but that doesn't automatically mean he'll win. I want to win this battle so that I can grant a better future for my people.";
  202. next;
  203. if( select("Yes, I want to join you!:End Conversation") == 2 )
  204. {
  205. mes "[Prince Croix]";
  206. mes "For Maroll!";
  207. close2;
  208. cutin "",255;
  209. end;
  210. }
  211. mes "[Prince Croix]";
  212. mes "Thank you so much. I feel like I can win with the help of adventurers like you. Now, please go downstairs and join your comrades in sharpening their skills to fight the enemy!";
  213. set Bat_Team,2;
  214. close2;
  215. cutin "",255;
  216. end;
  217. }
  218.  
  219. // Time calculation Function
  220. // *********************************************************************
  221. function script Time2Str {
  222. set .@Time_Left, getarg(0) - gettimetick(2);
  223.  
  224. set .@Days, .@Time_Left / 86400;
  225. set .@Time_Left, .@Time_Left - (.@Days * 86400);
  226. set .@Hours, .@Time_Left / 3600;
  227. set .@Time_Left, .@Time_Left - (.@Hours * 3600);
  228. set .@Minutes, .@Time_Left / 60;
  229. set .@Time_Left, .@Time_Left - (.@Minutes * 60);
  230.  
  231. set .@Time$, "";
  232. if( .@Days > 1 )
  233. set .@Time$, .@Time$ + .@Days + " days, ";
  234. else if( .@Days > 0 )
  235. set .@Time$, .@Time$ + .@Days + " day, ";
  236.  
  237. if( .@Hours > 1 )
  238. set .@Time$, .@Time$ + .@Hours + " hours, ";
  239. else if( .@Hours > 0 )
  240. set .@Time$, .@Time$ + .@Hours + " hour, ";
  241.  
  242. if( .@Minutes > 1 )
  243. set .@Time$, .@Time$ + .@Minutes + " minutes, ";
  244. else if( .@Minutes > 0 )
  245. set .@Time$, .@Time$ + .@Minutes + " minute, ";
  246.  
  247. if( .@Time_Left > 1 || .@Time_Left == 0 )
  248. set .@Time$, .@Time$ + .@Time_Left + " seconds.";
  249. else if( .@Time_Left == 1 )
  250. set .@Time$, .@Time$ + .@Time_Left + " second.";
  251.  
  252. return .@Time$;
  253. }
  254.  
  255. // Guillaume Knight - Tierra Valley
  256. // *********************************************************************
  257. bat_room,159,178,5 script Guillaume Knight#31 417,{
  258. mes "[Guillaume Knight]";
  259. mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
  260. next;
  261. mes "[Guillaume Knight]";
  262. mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
  263. next;
  264. mes "[Guillaume Knight]";
  265. mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
  266. mes "";
  267. mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
  268. next;
  269. mes "[Guillaume Knight]";
  270. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  271. close;
  272. }
  273.  
  274. // Tierra Officerer - Guillaume
  275. // *********************************************************************
  276. bat_room,156,178,5 script Tierra Valley Officer#1 418,{
  277. mes "[Tierra Officer]";
  278. if( Bat_Team == 2 )
  279. {
  280. mes "Get out of here you stinky Croix!";
  281. close;
  282. }
  283.  
  284. if( Bat_Team == 0 )
  285. {
  286. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  287. close;
  288. }
  289.  
  290. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  291. next;
  292. if( select("I want to join your army!:End Conversation") == 2 )
  293. close;
  294.  
  295. mes "[Tierra Officer]";
  296. if( BG_Delay_Tick >= gettimetick(2) )
  297. {
  298. mes "You are a Deserter!!";
  299. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  300. close;
  301. }
  302. if( Tierra_BG_Tick >= gettimetick(2) )
  303. {
  304. mes "Sorry, you can't join the battle right now.";
  305. mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
  306. close;
  307. }
  308. if( BaseLevel < 80 )
  309. {
  310. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  311. close;
  312. }
  313.  
  314. mes "Good luck!";
  315. close2;
  316. warp "bat_room",85,224;
  317. end;
  318. }
  319.  
  320. // Croix Knight - Tierra Valley
  321. // *********************************************************************
  322. bat_room,159,121,1 script Croix Knight#31 413,{
  323. mes "[Croix Knight]";
  324. mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
  325. next;
  326. mes "[Croix Knight]";
  327. mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
  328. next;
  329. mes "[Croix Knight]";
  330. mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
  331. mes "";
  332. mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
  333. next;
  334. mes "[Croix Knight]";
  335. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  336. close;
  337. }
  338.  
  339. // Tierra Officer - Croix
  340. // *********************************************************************
  341. bat_room,156,121,1 script Tierra Valley Officer#2 414,{
  342. mes "[Tierra Officer]";
  343. if( Bat_Team == 1 )
  344. {
  345. mes "Get out of here you stupid Guillaume!";
  346. close;
  347. }
  348.  
  349. if( Bat_Team == 0 )
  350. {
  351. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  352. close;
  353. }
  354.  
  355. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  356. next;
  357. if( select("I want to join your army!:End Conversation") == 2 )
  358. close;
  359.  
  360. mes "[Tierra Officer]";
  361. if( BG_Delay_Tick >= gettimetick(2) )
  362. {
  363. mes "You are a Deserter!!";
  364. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  365. close;
  366. }
  367. if( Tierra_BG_Tick >= gettimetick(2) )
  368. {
  369. mes "Sorry, you can't join the battle right now.";
  370. mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
  371. close;
  372. }
  373. if( BaseLevel < 80 )
  374. {
  375. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  376. close;
  377. }
  378.  
  379. mes "Good luck!";
  380. close2;
  381. warp "bat_room",85,208;
  382. end;
  383. }
  384.  
  385. // Guillaume Knight - Tierra
  386. // *********************************************************************
  387. bat_room,175,178,5 script Guillaume Knight#32 417,{
  388. mes "[Guillaume Knight]";
  389. mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
  390. next;
  391. mes "[Guillaume Knight]";
  392. mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
  393. next;
  394. mes "[Guillaume Knight]";
  395. mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
  396. mes "";
  397. mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
  398. next;
  399. mes "[Guillaume Knight]";
  400. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  401. close;
  402. }
  403.  
  404. // Tierra Officer - Guillaume
  405. // *********************************************************************
  406. bat_room,172,178,5 script Tierra Valley Officer#3 418,{
  407. mes "[Tierra Officer]";
  408. if( Bat_Team == 2 )
  409. {
  410. mes "Get out of here you stinky Croix!";
  411. close;
  412. }
  413.  
  414. if( Bat_Team == 0 )
  415. {
  416. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  417. close;
  418. }
  419.  
  420. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  421. next;
  422. if( select("I want to join your army!:End Conversation") == 2 )
  423. close;
  424.  
  425. mes "[Tierra Officer]";
  426. if( BG_Delay_Tick >= gettimetick(2) )
  427. {
  428. mes "You are a Deserter!!";
  429. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  430. close;
  431. }
  432. if( Tierra_BG_Tick >= gettimetick(2) )
  433. {
  434. mes "Sorry, you can't join the battle right now.";
  435. mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
  436. close;
  437. }
  438. if( BaseLevel < 80 )
  439. {
  440. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  441. close;
  442. }
  443.  
  444. mes "Good luck!";
  445. close2;
  446. warp "bat_room",85,94;
  447. end;
  448. }
  449.  
  450. // Croix Knight - Tierra
  451. // *********************************************************************
  452. bat_room,175,121,1 script Croix Knight#32 413,{
  453. mes "[Croix Knight]";
  454. mes "Tierra Gorge is a very steep canyon with two forts residing in the north and south ends of the map.";
  455. next;
  456. mes "[Croix Knight]";
  457. mes "There is a ration depot for the Guillaume and Croix armies at the 11 and 8 o'clock directions.";
  458. next;
  459. mes "[Croix Knight]";
  460. mes "The battle starts at your army's ship, and the goal is to advance and destroy your enemy's rations depot faster than they can destroy yours.";
  461. mes "";
  462. mes "The army that captures the neutral flag in the center of the battlefield will be rewarded with extra regeneration points, meaning their soldiers will resurrect more than the other side, giving them an advantage.";
  463. next;
  464. mes "[Croix Knight]";
  465. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  466. close;
  467. }
  468.  
  469. // Tierra Officer - Croix
  470. // *********************************************************************
  471. bat_room,172,121,1 script Tierra Valley Officer#4 414,{
  472. mes "[Tierra Officer]";
  473. if( Bat_Team == 1 )
  474. {
  475. mes "Get out of here you stupid Guillaume!";
  476. close;
  477. }
  478.  
  479. if( Bat_Team == 0 )
  480. {
  481. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  482. close;
  483. }
  484.  
  485. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  486. next;
  487. if( select("I want to join your army!:End Conversation") == 2 )
  488. close;
  489.  
  490. mes "[Tierra Officer]";
  491. if( BG_Delay_Tick >= gettimetick(2) )
  492. {
  493. mes "You are a Deserter!!";
  494. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  495. close;
  496. }
  497. if( Tierra_BG_Tick >= gettimetick(2) )
  498. {
  499. mes "Sorry, you can't join the battle right now.";
  500. mes "You need to wait ^0000FF" + callfunc("Time2Str",Tierra_BG_Tick) + "^000000 to join again Tierra Valley.";
  501. close;
  502. }
  503. if( BaseLevel < 80 )
  504. {
  505. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  506. close;
  507. }
  508.  
  509. mes "Good luck!";
  510. close2;
  511. warp "bat_room",85,77;
  512. end;
  513. }
  514.  
  515. // Guillaune Knight - Flavius
  516. // *********************************************************************
  517. bat_room,151,178,5 script Guillaume Knight#33 417,{
  518. mes "[Guillaume Knight]";
  519. mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
  520. next;
  521. mes "[Guillaume Knight]";
  522. mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
  523. next;
  524. mes "[Guillaume Knight]";
  525. mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
  526. next;
  527. mes "[Guillaume Knight]";
  528. mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
  529. next;
  530. mes "[Guillaume Knight]";
  531. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  532. close;
  533. }
  534.  
  535. // Flavius Officerer - Guillaume
  536. // *********************************************************************
  537. bat_room,148,178,5 script Flavius Officer#1 418,{
  538. mes "[Flavius Officer]";
  539. if( Bat_Team == 2 )
  540. {
  541. mes "Get out of here you stupid Croix!";
  542. close;
  543. }
  544.  
  545. if( Bat_Team == 0 )
  546. {
  547. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  548. close;
  549. }
  550.  
  551. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  552. next;
  553. if( select("I want to join your army!:End Conversation") == 2 )
  554. close;
  555.  
  556. mes "[Flavius Officer]";
  557. if( BG_Delay_Tick >= gettimetick(2) )
  558. {
  559. mes "You are a Deserter!!";
  560. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  561. close;
  562. }
  563. if( Flavius_BG_Tick >= gettimetick(2) )
  564. {
  565. mes "Sorry, you can't join the battle right now.";
  566. mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
  567. close;
  568. }
  569. if( BaseLevel < 80 )
  570. {
  571. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  572. close;
  573. }
  574.  
  575. mes "Good luck!";
  576. close2;
  577. warp "bat_room",253,94;
  578. end;
  579. }
  580.  
  581. // Croix Knight - Flavius
  582. // *********************************************************************
  583. bat_room,151,121,1 script Croix Knight#33 413,{
  584. mes "[Croix Knight]";
  585. mes "The objective of the Flavius Battle is to score 2 points before your enemy by destroying their crystal.";
  586. next;
  587. mes "[Croix Knight]";
  588. mes "The crystals for both armies are protected by special barricades that cannot be destroyed by direct attacks.";
  589. next;
  590. mes "[Croix Knight]";
  591. mes "But they can be removed by destroying the Guardians that protect the enemy army base.";
  592. next;
  593. mes "[Croix Knight]";
  594. mes "The crystals are immune to every type of skill; your physical attacks are the only choice for destroying your enemy's crystal.";
  595. next;
  596. mes "[Croix Knight]";
  597. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  598. close;
  599. }
  600.  
  601. // Flavius Officerer - Croix
  602. // *********************************************************************
  603. bat_room,148,121,1 script Flavius Officer#2 414,{
  604. mes "[Flavius Officer]";
  605. if( Bat_Team == 1 )
  606. {
  607. mes "Get out of here you stupid Guillaume!";
  608. close;
  609. }
  610.  
  611. if( Bat_Team == 0 )
  612. {
  613. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  614. close;
  615. }
  616.  
  617. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  618. next;
  619. if( select("I want to join your army!:End Conversation") == 2 )
  620. close;
  621.  
  622. mes "[Flavius Officer]";
  623. if( BG_Delay_Tick >= gettimetick(2) )
  624. {
  625. mes "You are a Deserter!!";
  626. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  627. close;
  628. }
  629. if( Flavius_BG_Tick >= gettimetick(2) )
  630. {
  631. mes "Sorry, you can't join the battle right now.";
  632. mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius_BG_Tick) + "^000000 to join again Flavius.";
  633. close;
  634. }
  635. if( BaseLevel < 80 )
  636. {
  637. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  638. close;
  639. }
  640.  
  641. mes "Good luck!";
  642. close2;
  643. warp "bat_room",253,77;
  644. end;
  645. }
  646.  
  647. // Guillaune Knight - Flavius
  648. // *********************************************************************
  649. bat_room,167,178,5 script Guillaume Knight#34 417,{
  650. mes "[Guillaume Knight]";
  651. mes "The objective of the Flavius Battle CTF is to score 3 points before your enemy, by capture their flag.";
  652. next;
  653. mes "[Guillaume Knight]";
  654. mes "To capture a Flag you need to take the enemy flag, and bring it to your base flag.";
  655. next;
  656. mes "[Guillaume Knight]";
  657. mes "If your fase flag is captured too, you need to kill the flag carrier and take the flag back to your base.";
  658. next;
  659. mes "[Guillaume Knight]";
  660. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  661. close;
  662. }
  663.  
  664. // Flavius Officerer - Guillaume
  665. // *********************************************************************
  666. bat_room,164,178,5 script Flavius CTF Officer#3 418,{
  667. mes "[Flavius CTF Officer]";
  668. if( Bat_Team == 2 )
  669. {
  670. mes "Get out of here you stupid Croix!";
  671. close;
  672. }
  673.  
  674. if( Bat_Team == 0 )
  675. {
  676. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  677. close;
  678. }
  679.  
  680. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  681. next;
  682. if( select("I want to join your army!:End Conversation") == 2 )
  683. close;
  684.  
  685. mes "[Flavius CTF Officer]";
  686. if( BG_Delay_Tick >= gettimetick(2) )
  687. {
  688. mes "You are a Deserter!!";
  689. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  690. close;
  691. }
  692. if( Flavius2_BG_Tick >= gettimetick(2) )
  693. {
  694. mes "Sorry, you can't join the battle right now.";
  695. mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius2_BG_Tick) + "^000000 to join again Flavius CTF.";
  696. close;
  697. }
  698. if( BaseLevel < 80 )
  699. {
  700. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  701. close;
  702. }
  703.  
  704. mes "Good luck!";
  705. close2;
  706. warp "bat_room",57,94;
  707. end;
  708. }
  709.  
  710. // Croix Knight - Flavius
  711. // *********************************************************************
  712. bat_room,167,121,1 script Croix Knight#34 413,{
  713. mes "[Croix Knight]";
  714. mes "The objective of the Flavius Battle CTF is to score 3 points before your enemy, by capture their flag.";
  715. next;
  716. mes "[Croix Knight]";
  717. mes "To capture a Flag you need to take the enemy flag, and bring it to your base flag.";
  718. next;
  719. mes "[Croix Knight]";
  720. mes "If your fase flag is captured too, you need to kill the flag carrier and take the flag back to your base.";
  721. next;
  722. mes "[Croix Knight]";
  723. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  724. close;
  725. }
  726.  
  727. // Flavius Officerer - Croix
  728. // *********************************************************************
  729. bat_room,164,121,1 script Flavius CTF Officer#4 414,{
  730. mes "[Flavius CTF Officer]";
  731. if( Bat_Team == 1 )
  732. {
  733. mes "Get out of here you stupid Guillaume!";
  734. close;
  735. }
  736.  
  737. if( Bat_Team == 0 )
  738. {
  739. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  740. close;
  741. }
  742.  
  743. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  744. next;
  745. if( select("I want to join your army!:End Conversation") == 2 )
  746. close;
  747.  
  748. mes "[Flavius CTF Officer]";
  749. if( BG_Delay_Tick >= gettimetick(2) )
  750. {
  751. mes "You are a Deserter!!";
  752. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  753. close;
  754. }
  755. if( Flavius2_BG_Tick >= gettimetick(2) )
  756. {
  757. mes "Sorry, you can't join the battle right now.";
  758. mes "You need to wait ^0000FF" + callfunc("Time2Str",Flavius2_BG_Tick) + "^000000 to join again Flavius.";
  759. close;
  760. }
  761. if( BaseLevel < 80 )
  762. {
  763. mes "I'm very please you want to join our army, but I'm sorry: I can't send a rookie like you to die on the cruel battlefield";
  764. close;
  765. }
  766.  
  767. mes "Good luck!";
  768. close2;
  769. warp "bat_room",57,77;
  770. end;
  771. }
  772.  
  773. // Guillaume Knight - KvM
  774. // *********************************************************************
  775. bat_room,143,178,5 script Guillaume Knight#35 417,{
  776. mes "[Guillaume Knight]";
  777. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  778. next;
  779. mes "[Guillaume Knight]";
  780. mes "The first team to lose all their soldiers loses.";
  781. next;
  782. mes "[Guillaume Knight]";
  783. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  784. next;
  785. mes "[Guillaume Knight]";
  786. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  787. close;
  788. }
  789.  
  790. // KvM Officerer - Guillaume
  791. // *********************************************************************
  792. bat_room,140,178,5 script KVM-A [80-99] Officer#1 418,{
  793. mes "[KVM A Officer]";
  794. if( Bat_Team == 2 )
  795. {
  796. mes "Get out of here you stinky Croix!";
  797. close;
  798. }
  799.  
  800. if( Bat_Team == 0 )
  801. {
  802. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  803. close;
  804. }
  805.  
  806. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  807. next;
  808. if( select("I want to join your army!:End Conversation") == 2 )
  809. close;
  810.  
  811. mes "[KVM A Officer]";
  812. if( BG_Delay_Tick >= gettimetick(2) )
  813. {
  814. mes "You are a Deserter!!";
  815. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  816. close;
  817. }
  818. if( KVMA_BG_Tick >= gettimetick(2) )
  819. {
  820. mes "Sorry, you can't join the battle right now.";
  821. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM A.";
  822. close;
  823. }
  824. if( BaseLevel < 80 )
  825. {
  826. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  827. close;
  828. }
  829.  
  830. mes "Good luck!";
  831. close2;
  832. warp "bat_room",253,224;
  833. end;
  834. }
  835.  
  836. // Croix Knight - KvM
  837. // *********************************************************************
  838. bat_room,143,121,1 script Croix Knight#35 413,{
  839. mes "[Croix Knight]";
  840. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  841. next;
  842. mes "[Croix Knight]";
  843. mes "The first team to lose all their soldiers loses.";
  844. next;
  845. mes "[Croix Knight]";
  846. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  847. next;
  848. mes "[Croix Knight]";
  849. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  850. close;
  851. }
  852.  
  853. // KvM Officer - Croix
  854. // *********************************************************************
  855. bat_room,140,121,1 script KVM-A [80-99] Officer#2 414,{
  856. mes "[KVM A Officer]";
  857. if( Bat_Team == 1 )
  858. {
  859. mes "Get out of here you stupid Guillaume!";
  860. close;
  861. }
  862.  
  863. if( Bat_Team == 0 )
  864. {
  865. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  866. close;
  867. }
  868.  
  869. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  870. next;
  871. if( select("I want to join your army!:End Conversation") == 2 )
  872. close;
  873.  
  874. mes "[KVM A Officer]";
  875. if( BG_Delay_Tick >= gettimetick(2) )
  876. {
  877. mes "You are a Deserter!!";
  878. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  879. close;
  880. }
  881. if( KVMA_BG_Tick >= gettimetick(2) )
  882. {
  883. mes "Sorry, you can't join the battle right now.";
  884. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM A.";
  885. close;
  886. }
  887. if( BaseLevel < 80 )
  888. {
  889. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  890. close;
  891. }
  892.  
  893. mes "Good luck!";
  894. close2;
  895. warp "bat_room",253,208;
  896. end;
  897. }
  898.  
  899. // Guillaume Knight - KvM
  900. // *********************************************************************
  901. bat_room,135,178,5 script Guillaume Knight#36 417,{
  902. mes "[Guillaume Knight]";
  903. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  904. next;
  905. mes "[Guillaume Knight]";
  906. mes "The first team to lose all their soldiers loses.";
  907. next;
  908. mes "[Guillaume Knight]";
  909. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  910. next;
  911. mes "[Guillaume Knight]";
  912. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  913. close;
  914. }
  915.  
  916. // KvM Officerer - Guillaume
  917. // *********************************************************************
  918. bat_room,132,178,5 script KVM-B [80-99] Officer#1 418,{
  919. mes "[KVM B Officer]";
  920. if( Bat_Team == 2 )
  921. {
  922. mes "Get out of here you stinky Croix!";
  923. close;
  924. }
  925.  
  926. if( Bat_Team == 0 )
  927. {
  928. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  929. close;
  930. }
  931.  
  932. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  933. next;
  934. if( select("I want to join your army!:End Conversation") == 2 )
  935. close;
  936.  
  937. mes "[KVM B Officer]";
  938. if( BG_Delay_Tick >= gettimetick(2) )
  939. {
  940. mes "You are a Deserter!!";
  941. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  942. close;
  943. }
  944. if( KVMB_BG_Tick >= gettimetick(2) )
  945. {
  946. mes "Sorry, you can't join the battle right now.";
  947. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM B.";
  948. close;
  949. }
  950. if( BaseLevel < 80 )
  951. {
  952. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  953. close;
  954. }
  955.  
  956. mes "Good luck!";
  957. close2;
  958. warp "bat_room",225,224;
  959. end;
  960. }
  961.  
  962. // Croix Knight - KvM
  963. // *********************************************************************
  964. bat_room,135,121,1 script Croix Knight#36 413,{
  965. mes "[Croix Knight]";
  966. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  967. next;
  968. mes "[Croix Knight]";
  969. mes "The first team to lose all their soldiers loses.";
  970. next;
  971. mes "[Croix Knight]";
  972. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  973. next;
  974. mes "[Croix Knight]";
  975. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  976. close;
  977. }
  978.  
  979. // KvM Officer - Croix
  980. // *********************************************************************
  981. bat_room,132,121,1 script KVM-B [80-99] Officer#2 414,{
  982. mes "[KVM B Officer]";
  983. if( Bat_Team == 1 )
  984. {
  985. mes "Get out of here you stupid Guillaume!";
  986. close;
  987. }
  988.  
  989. if( Bat_Team == 0 )
  990. {
  991. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  992. close;
  993. }
  994.  
  995. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  996. next;
  997. if( select("I want to join your army!:End Conversation") == 2 )
  998. close;
  999.  
  1000. mes "[KVM B Officer]";
  1001. if( BG_Delay_Tick >= gettimetick(2) )
  1002. {
  1003. mes "You are a Deserter!!";
  1004. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  1005. close;
  1006. }
  1007. if( KVMB_BG_Tick >= gettimetick(2) )
  1008. {
  1009. mes "Sorry, you can't join the battle right now.";
  1010. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM B.";
  1011. close;
  1012. }
  1013. if( BaseLevel < 80 )
  1014. {
  1015. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  1016. close;
  1017. }
  1018.  
  1019. mes "Good luck!";
  1020. close2;
  1021. warp "bat_room",225,208;
  1022. end;
  1023. }
  1024.  
  1025. // Guillaume Knight - KvM
  1026. // *********************************************************************
  1027. bat_room,127,178,5 script Guillaume Knight#37 417,{
  1028. mes "[Guillaume Knight]";
  1029. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  1030. next;
  1031. mes "[Guillaume Knight]";
  1032. mes "The first team to lose all their soldiers loses.";
  1033. next;
  1034. mes "[Guillaume Knight]";
  1035. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  1036. next;
  1037. mes "[Guillaume Knight]";
  1038. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  1039. close;
  1040. }
  1041.  
  1042. // KvM Officerer - Guillaume
  1043. // *********************************************************************
  1044. bat_room,124,178,5 script KVM-C [80-99] Officer#1 418,{
  1045. mes "[KVM C Officer]";
  1046. if( Bat_Team == 2 )
  1047. {
  1048. mes "Get out of here you stinky Croix!";
  1049. close;
  1050. }
  1051.  
  1052. if( Bat_Team == 0 )
  1053. {
  1054. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  1055. close;
  1056. }
  1057.  
  1058. mes "Hello " + strcharinfo(0) + ", let's show the power of the Guillaume Army to those stinky Croixs!";
  1059. next;
  1060. if( select("I want to join your army!:End Conversation") == 2 )
  1061. close;
  1062.  
  1063. mes "[KVM C Officer]";
  1064. if( BG_Delay_Tick >= gettimetick(2) )
  1065. {
  1066. mes "You are a Deserter!!";
  1067. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  1068. close;
  1069. }
  1070. if( KVMC_BG_Tick >= gettimetick(2) )
  1071. {
  1072. mes "Sorry, you can't join the battle right now.";
  1073. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM C.";
  1074. close;
  1075. }
  1076. if( BaseLevel < 80 )
  1077. {
  1078. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  1079. close;
  1080. }
  1081.  
  1082. mes "Good luck!";
  1083. close2;
  1084. warp "bat_room",197,224;
  1085. end;
  1086. }
  1087.  
  1088. // Croix Knight - KvM
  1089. // *********************************************************************
  1090. bat_room,127,121,1 script Croix Knight#37 413,{
  1091. mes "[Croix Knight]";
  1092. mes "To win the Battle of Kriger Von Midgard you and your team must kill all the other opponents before all of you die.";
  1093. next;
  1094. mes "[Croix Knight]";
  1095. mes "The first team to lose all their soldiers loses.";
  1096. next;
  1097. mes "[Croix Knight]";
  1098. mes "Since you cannot come back to battle after you die, taking care on the battlefield is essential.";
  1099. next;
  1100. mes "[Croix Knight]";
  1101. mes "Are you ready for battle? Then apply with the recruiter next to me!";
  1102. close;
  1103. }
  1104.  
  1105. // KvM Officer - Croix
  1106. // *********************************************************************
  1107. bat_room,124,121,1 script KVM-C [80-99] Officer#2 414,{
  1108. mes "[KVM C Officer]";
  1109. if( Bat_Team == 1 )
  1110. {
  1111. mes "Get out of here you stupid Guillaume!";
  1112. close;
  1113. }
  1114.  
  1115. if( Bat_Team == 0 )
  1116. {
  1117. mes "Please sign up for an army with Prince Croix or General Guillaume!";
  1118. close;
  1119. }
  1120.  
  1121. mes "Hello " + strcharinfo(0) + ", let's show the power of the Croix Army to those stinky Guillaumes!";
  1122. next;
  1123. if( select("I want to join your army!:End Conversation") == 2 )
  1124. close;
  1125.  
  1126. mes "[KVM C Officer]";
  1127. if( BG_Delay_Tick >= gettimetick(2) )
  1128. {
  1129. mes "You are a Deserter!!";
  1130. mes "Because of running away, you need to wait ^0000FF" + callfunc("Time2Str",BG_Delay_Tick) + "^000000 to join again a BattleGround.";
  1131. close;
  1132. }
  1133. if( KVMC_BG_Tick >= gettimetick(2) )
  1134. {
  1135. mes "Sorry, you can't join the battle right now.";
  1136. mes "You need to wait ^0000FF" + callfunc("Time2Str",KvM_BG_Tick) + "^000000 to join KvM C.";
  1137. close;
  1138. }
  1139. if( BaseLevel < 80 )
  1140. {
  1141. mes "I'm very please you want to join our army, but I'm sorry: This arena is for players with baselevel from 80 to 99.";
  1142. close;
  1143. }
  1144.  
  1145. mes "Good luck!";
  1146. close2;
  1147. warp "bat_room",197,208;
  1148. end;
  1149. }
  1150.  
  1151. // Guard Dummy
  1152. // *********************************************************************
  1153.  
  1154. bat_room,161,141,3 script Prince Croix's Aid::bat_aid 415,{ end; }
  1155. bat_room,161,139,3 duplicate(bat_aid) Prince Croix's Aid::bat_aid2 415
  1156. bat_room,161,160,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid3 419
  1157. bat_room,161,158,3 duplicate(bat_aid) General Guillaume's Aid::bat_aid4 419
  1158.  
  1159. // Flags
  1160. // *********************************************************************
  1161.  
  1162. - script Light Camp#bat 973,{ end; }
  1163. - script Dark Camp#bat 974,{ end; }
  1164.  
  1165.  
  1166.  
  1167.  
  1168. // Badges Repairman
  1169. // *********************************************************************
  1170.  
  1171. bat_room,138,144,5 script Repairman#bg2 99,{
  1172. callfunc "repairmain","Repairman";
  1173. end;
  1174. }
  1175.  
  1176. // Badges Exchange
  1177. // *********************************************************************
  1178.  
  1179. bat_room,160,150,3 script Erundek#31 109,{
  1180. mes "[Erundek]";
  1181. mes "Welcome, mighty warrior.";
  1182. mes "What can I do for you today ?";
  1183. next;
  1184. switch( select("Check the Catalog","Exchange Bravery Badges","Exchange Valor Badges","Exchange Heroism Badges","Hmm, nothing I guess.") )
  1185. {
  1186. case 1:
  1187. mes "[Erundek]";
  1188. mes "We have many items, so please take a look and purchase deliberately.";
  1189. close2;
  1190. Readbook 11010,1;
  1191. end;
  1192. case 5:
  1193. mes "[Erundek]";
  1194. mes "As you wish.";
  1195. mes "See you later.";
  1196. close;
  1197. case 2: // Bravery Badges
  1198. mes "[Erundek]";
  1199. mes "So you want to exchange ^0000FFBravery Badges^000000 from the Battle of Tierra Valley.";
  1200. mes "What kind of item do you want to exchange?";
  1201. next;
  1202. deletearray .@Item_DB[0],127;
  1203. set .@Badge, 7828;
  1204.  
  1205. switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
  1206. {
  1207. case 1: setarray .@Item_DB[0],13036,13411,1425,1632,1634,1543,1924,1978,1574,1824,1183,1380,13305,1279,1739,13108,13172; set .@Value, 100; break;
  1208. case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
  1209. case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
  1210. case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
  1211. case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
  1212. }
  1213.  
  1214. break;
  1215. case 3: // Valor Badges
  1216. mes "[Erundek]";
  1217. mes "So you want to exchange ^FF0000Valor Badges^000000 from the Battle of Flavius.";
  1218. mes "What kind of item do you want to exchange?";
  1219. next;
  1220. deletearray .@Item_DB[0],127;
  1221. set .@Badge, 7829;
  1222.  
  1223. switch( select("Weapons:Garment:Footgear:Armor:Accessory") )
  1224. {
  1225. case 1: setarray .@Item_DB[0],13037,13410,1633,1635,1542,1923,1977,1575,1823,1184,1482,1379,13306,1280,1738,13171,13173,13174; set .@Value, 100; break;
  1226. case 2: setarray .@Item_DB[0],2538,2539,2540; set .@Value, 50; break;
  1227. case 3: setarray .@Item_DB[0],2435,2436,2437; set .@Value, 50; break;
  1228. case 4: setarray .@Item_DB[0],2376,2377,2378,2379,2380,2381,2382; set .@Value, 80; break;
  1229. case 5: setarray .@Item_DB[0],2720,2721,2722,2723,2724,2725,2733; set .@Value, 500; break;
  1230. }
  1231.  
  1232. break;
  1233. case 4: // Heroism Badge
  1234. mes "[Erundek]";
  1235. mes "So you want to exchange ^FFA500Heroism Badges^000000 from the Battle of Kriger Von Midgard.";
  1236. mes "This shop is not available at the moment.";
  1237. close;
  1238. }
  1239.  
  1240. mes "[Erundek]";
  1241. mes "What item do you want to exchange?";
  1242. mes "If you are not sure, check the catalog.";
  1243. next;
  1244.  
  1245. set .@Menu$, "";
  1246. set .@Count, getarraysize(.@Item_DB);
  1247. for( set .@i, 0; .@i < .@Count; set .@i, .@i + 1 )
  1248. set .@Menu$, .@Menu$ + getitemname(.@Item_DB[.@i]) + ":";
  1249.  
  1250. set .@Item_ID, .@Item_DB[select(.@Menu$) - 1];
  1251.  
  1252. mes "[Erundek]";
  1253. mes "Would you like to exchange ^FF0000" + .@Value + " " + getitemname(.@Badge) + "^000000 for a ^0000FF" + getitemname(.@Item_ID) + "^000000?";
  1254. next;
  1255. mes "Remember, Battleground Reward Items are ^FF0000Character Bound^000000.";
  1256. mes "Are you sure you want this item?";
  1257. next;
  1258.  
  1259. if( select("Yes:No") == 2 )
  1260. {
  1261. mes "[Erundek]";
  1262. mes "Do you need more time to check the items?";
  1263. close;
  1264. }
  1265.  
  1266. if( countitem(.@Badge) < .@Value )
  1267. {
  1268. mes "[Erundek]";
  1269. mes "I'm sorry, but you don't have enough badges to exchange.";
  1270. close;
  1271. }
  1272.  
  1273. delitem .@Badge,.@Value;
  1274. getitem .@Item_ID,1;
  1275. mes "[Erundek]";
  1276. mes "Thank you for exchanging.";
  1277. close;
  1278. }
  1279.  
  1280.  
  1281. // === System === \\
  1282.  
  1283. new_3-4,19,69,5 script Registration::Fl2R_Guillaume 418,{
  1284. end;
  1285. OnInit:
  1286. waitingroom "Enter Arena Here",40,"Flavius_BG2::OnGuillaumeJoin",1;
  1287. end;
  1288. OnEnterBG:
  1289. set $@FlaviusBG2_id1, waitingroom2bg("bat_room",197,94,"Flavius_BG2::OnGuillaumeQuit","");
  1290. end;
  1291. }
  1292.  
  1293. new_3-4,139,108,5 script Registration::Fl2R_Croix 414,{
  1294. end;
  1295. OnInit:
  1296. waitingroom "Enter Arena Here",40,"Flavius_BG2::OnCroixJoin",1;
  1297. end;
  1298. OnEnterBG:
  1299. set $@FlaviusBG2_id2, waitingroom2bg("bat_room",197,77,"Flavius_BG2::OnCroixQuit","");
  1300. end;
  1301. }
  1302.  
  1303. // Battleground Engine
  1304. // *********************************************************************
  1305.  
  1306. - script Flavius_BG2 -1,{
  1307. end;
  1308.  
  1309. OnClock0430:
  1310. OnCTHStop:
  1311. set nagstartna,0;
  1312. if ($@Guillaume_Score > $@Croix_Score) goto Guillawin;
  1313. if ($@Guillaume_Score < $@Croix_Score) goto Croixwin;
  1314. if ($@Guillaume_Score == $@Croix_Score) goto Nowinner;
  1315. end;
  1316.  
  1317.  
  1318.  
  1319. OnClock0410:
  1320. OnCTHStart:
  1321. announce "[The Capture The Heroes will start in 4 Minutes]... Please go to Prontera for Registration.",0;
  1322. stopnpctimer;
  1323. set $@Guillaume_Score, 0;
  1324. set $@Croix_Score, 0;
  1325. set $@FlaviusBG2_Victory, 0;
  1326. set $@anuncioF4,0;
  1327. set $@anuncioF3,0;
  1328. set $@RedFlagTaken, 0;
  1329. set $@Red_Flag_Carrier$,0;
  1330. set $@BlueFlagTaken, 0;
  1331. set $@Blue_Flag_Carrier$,0;
  1332. set $@RedFlagFalse, 0;
  1333. set $@BlueFlagFalse, 0;
  1334. // NPC's
  1335.  
  1336. disablenpc "Dark Reward#fl2";
  1337. disablenpc "Therapist in Battle#1";
  1338. disablenpc "Therapist in Battle#2";
  1339. disablenpc "Lucifer of the Dark";
  1340. disablenpc "Freyja of the Light";
  1341. disablenpc "Freyja of the Light#1";
  1342. disablenpc "Lucifer of the Dark#1";
  1343. set $@register,1;
  1344. set $@FlaviusBG2, 0;
  1345. if( $@FlaviusBG2_id1 ) { bg_destroy $@FlaviusBG2_id1; set $@FlaviusBG2_id1, 0; }
  1346. if( $@FlaviusBG2_id2 ) { bg_destroy $@FlaviusBG2_id2; set $@FlaviusBG2_id2, 0; }
  1347. sleep 1000;
  1348. mapwarp "bat_b02","prontera",155,179;
  1349. mapwarp "new_2-4","prontera",155,179;
  1350. sleep 2000;
  1351. bg_updatescore "bat_b02",0,0;
  1352. sleep 60000;
  1353. if( $@FlaviusBG2==2 ) end;
  1354. announce "The Capture The Heroes registration will close in 3 Minutes... Please go to Prontera for Registration.",0;
  1355. sleep 60000;
  1356. if( $@FlaviusBG2==2 ) end;
  1357. announce "The Capture The Heroes registration will close in 2 Minutes... Please go to Prontera for Registration.",0;
  1358. sleep 60000;
  1359. if( $@FlaviusBG2==2 ) end;
  1360. announce "The Capture The Heroes registration will close in 1 Minute... Please go to Prontera for Registration.",0;
  1361. sleep 30000;
  1362. if( $@FlaviusBG2==2 ) end;
  1363. announce "The Capture The Heroes registration will close in 30 Seconds... Please go to Prontera for Registration.",0;
  1364. sleep 20000;
  1365. if( $@FlaviusBG2==2 ) end;
  1366. announce "Registration has Ended.",0;
  1367. set $@register,0;
  1368. goto Simulan;
  1369. end;
  1370.  
  1371. Simulan:
  1372. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1373. sleep 2000;
  1374. if( $@FlaviusBG2==2 ) end;
  1375. announce "Please get inside the pubs to enter the Arena, You have 30 seconds to prepare.",0;
  1376. sleep 20000;
  1377. if( $@FlaviusBG2==2 ) end;
  1378. announce "10 Seconds Before Starting, Please Don't Exit the Pubs.",0;
  1379. sleep 7000;
  1380. if( $@FlaviusBG2==2 ) end;
  1381. announce "3",0;
  1382. sleep 1000;
  1383. if( $@FlaviusBG2==2 ) end;
  1384. announce "2",0;
  1385.  
  1386. sleep 1000;
  1387. if( $@FlaviusBG2==2 ) end;
  1388. announce "1",0;
  1389. donpcevent "Flavius_BG2::OnReadyCheck";
  1390. end;
  1391.  
  1392.  
  1393. OnInit:
  1394. setcell "bat_room",201,94,194,90,cell_landprotector,1;
  1395. setcell "bat_room",201,81,194,74,cell_landprotector,1;
  1396. setcell "bat_b02",333,153,326,145,cell_landprotector,1;
  1397. setcell "bat_b02",57,145,65,155,cell_landprotector,1;
  1398. setcell "bat_b02",304,235,319,214,cell_landprotector,1;
  1399. setcell "bat_b02",76,85,99,64,cell_landprotector,1;
  1400. disablenpc "Dark Reward#fl2";
  1401. disablenpc "Therapist in Battle#1";
  1402. disablenpc "Therapist in Battle#2";
  1403. disablenpc "Lucifer of the Dark";
  1404. disablenpc "Freyja of the Light";
  1405. disablenpc "Freyja of the Light#1";
  1406. disablenpc "Lucifer of the Dark#1";
  1407. set nagstartna,0;
  1408. end;
  1409.  
  1410. OnPCLoginEvent:
  1411. if ($@register < 1) set registeredna,0;
  1412. end;
  1413.  
  1414.  
  1415. OnGuillaumeQuit:
  1416. OnCroixQuit:
  1417. if ( $@Blue_Flag_Carrier$ == strcharinfo(0) || $@Red_Flag_Carrier$ == strcharinfo(0)){
  1418.  
  1419. if( Bat_Team == 1) {
  1420. if( $@BlueFlagTaken == 1 ){
  1421. mapannounce "bat_b02","Lucifer of the Dark has been freed.",bc_map,0xFF0000;
  1422. getmapxy (mapname$,.@mapx,.@mapy,0,strcharinfo(0));
  1423. movenpc "Lucifer of the Dark#1",.@mapx,.@mapy;
  1424. set $@BlueFlagFalse, 1;
  1425. set $@BlueFlagTaken, 0;
  1426. set $@Blue_Flag_Carrier$,0;
  1427. sleep 4000;
  1428. enablenpc "Lucifer of the Dark#1";
  1429. end;
  1430. }
  1431. }
  1432. if( Bat_Team == 2) {
  1433. if( $@RedFlagTaken == 1 ){
  1434. mapannounce "bat_b02","Freyja of the Light has been freed.",bc_map,0x0000FF;
  1435. getmapxy (mapname$,.@mapx,.@mapy,0,strcharinfo(0));
  1436. movenpc "Freyja of the Light#1",.@mapx,.@mapy;
  1437. set $@RedFlagFalse, 1;
  1438. set $@RedFlagTaken, 0;
  1439. set $@Red_Flag_Carrier$,0;
  1440. sleep 4000;
  1441. enablenpc "Freyja of the Light#1";
  1442. end;
  1443. }
  1444. }
  1445. }
  1446. set BG_Delay_Tick, gettimetick(2) + 1200;
  1447. end;
  1448.  
  1449. OnGuillaumeJoin:
  1450. OnCroixJoin:
  1451. if( $@FlaviusBG2 == 1 ){
  1452. if( $@GuillC < 30 && $@CroiC < 30){
  1453. set .@Guillaume, getwaitingroomstate(0,"Fl2R_Guillaume");
  1454. set .@Croix, getwaitingroomstate(0,"Fl2R_Croix");
  1455. if (.@Guillaume!=0 && .@Croix!=0){
  1456. set $@GuillC, ($@GuillC + 1);
  1457. set $@CroiC, ($@CroiC + 1);
  1458. waitingroom2bg_single($@FlaviusBG2_id1,"bat_b02",311,224,"Fl2R_Guillaume");
  1459. waitingroom2bg_single($@FlaviusBG2_id2,"bat_b02",87,75,"Fl2R_Croix");
  1460. mapannounce "new_3-4","Capture The Heroes: " + $@GuillC + "/40, C: " + $@CroiC + "/40 in Progress!",1,0x610B5E;
  1461. end;
  1462. }
  1463. }
  1464. }
  1465. end;
  1466.  
  1467. OnReadyCheck:
  1468. if( $@FlaviusBG2 )
  1469. end;
  1470. set .@Guillaume, getwaitingroomstate(0,"Fl2R_Guillaume");
  1471. set .@Croix, getwaitingroomstate(0,"Fl2R_Croix");
  1472.  
  1473.  
  1474. // BG Variables
  1475. set $@FlaviusBG2, 1;
  1476. set $@FlaviusBG2_Victory, 0;
  1477. set $@Guillaume_Score, 0;
  1478. set $@Croix_Score, 0;
  1479. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1480. set $@BlueFlagTaken, 0;
  1481. set $@Blue_Flag_Carrier$,0;
  1482. set $@RedFlagTaken, 0;
  1483. set $@Red_Flag_Carrier$,0;
  1484. set $@RedFlagFalse, 0;
  1485. set $@BlueFlagFalse, 0;
  1486.  
  1487. // Prepare NPC
  1488. donpcevent "#gfl2_respawn::OnBGStart";
  1489. donpcevent "#cfl2_respawn::OnBGStart";
  1490. enablenpc "Therapist in Battle#1";
  1491. disablenpc "Therapist in Battle#2";
  1492. disablenpc "Dark Reward#fl2";
  1493. // Build and Warp Teams
  1494. donpcevent "Fl2R_Guillaume::OnEnterBG";
  1495. donpcevent "Fl2R_Croix::OnEnterBG";
  1496. // Vamos contando
  1497. set $@GuillC, 10;
  1498. set $@CroiC, 10;
  1499. announce "Capture The Heroes has started!",0;
  1500. initnpctimer;
  1501. // Start Match!!
  1502.  
  1503. OnRoundStart:
  1504. if( $@FlaviusBG2 != 1 ) end;
  1505.  
  1506. areapercentheal "bat_b02",382,2,397,17,100,100;
  1507. areapercentheal "bat_b02",2,282,17,297,100,100;
  1508. bg_warp $@FlaviusBG2_id1,"bat_b02",311,224;
  1509. bg_warp $@FlaviusBG2_id2,"bat_b02",87,75;
  1510. sleep 2000;
  1511. movenpc "Lucifer of the Dark",62,149;
  1512. movenpc "Freyja of the Light",328,150;
  1513. movenpc "Freyja of the Light#1",391,14;
  1514. movenpc "Lucifer of the Dark#1",391,15;
  1515. enablenpc "Lucifer of the Dark";
  1516. enablenpc "Freyja of the Light";
  1517. if( $@FlaviusBG2 != 1 ) end;
  1518. announce "The Capture The Heroes has begun!!",0;
  1519. sleep 5000;
  1520. if( $@FlaviusBG2==2 ) end;
  1521. mapannounce "bat_b02","Capture the Enemy's Heroes and bring it to your Hero to score points.",0;
  1522. sleep 10000;
  1523. if( $@FlaviusBG2==2 ) end;
  1524. mapannounce "bat_b02","The First Team to score the Most Points win!!!.",0;
  1525. sleep 600000;
  1526. if( $@FlaviusBG2==2 ) end;
  1527. donpcevent "Flavius_BG2::OnMatchEnd";
  1528. end;
  1529.  
  1530.  
  1531. OnPCDieEvent:
  1532. if ( $@Blue_Flag_Carrier$ == strcharinfo(0) || $@Red_Flag_Carrier$ == strcharinfo(0)){
  1533.  
  1534. if( Bat_Team == 1) {
  1535. if( $@BlueFlagTaken == 1 ){
  1536. mapannounce "bat_b02", "Lucifer of the Dark has been freed!!!",bc_map,0xFF0000;
  1537. getmapxy (mapname$,.@mapx,.@mapy,0,strcharinfo(0));
  1538. movenpc "Lucifer of the Dark#1",.@mapx,.@mapy;
  1539. set $@BlueFlagFalse, 1;
  1540. set $@BlueFlagTaken, 0;
  1541. set $@Blue_Flag_Carrier$,0;
  1542. sleep 2000;
  1543. enablenpc "Lucifer of the Dark#1";
  1544. sleep 10000;
  1545. if ($@nahawakanluci == 0){
  1546. movenpc "Lucifer of the Dark#1",155,119;
  1547. set $@nahawakanluci,0;
  1548. end;
  1549. }
  1550.  
  1551. end;
  1552. }
  1553. }
  1554. if( Bat_Team == 2) {
  1555. if( $@RedFlagTaken == 1 ){
  1556. mapannounce "bat_b02", "Freyja of the Light has been freed!!!",bc_map,0x0000FF;
  1557. getmapxy (mapname$,.@mapx,.@mapy,0,strcharinfo(0));
  1558. movenpc "Freyja of the Light#1",.@mapx,.@mapy;
  1559. set $@RedFlagFalse, 1;
  1560. set $@RedFlagTaken, 0;
  1561. set $@Red_Flag_Carrier$,0;
  1562. sleep 2000;
  1563. enablenpc "Freyja of the Light#1";
  1564. sleep 10000;
  1565. if ($@nahawakanfreya == 0){
  1566. movenpc "Freyja of the Light#1",243,182;
  1567. set $@nahawakanfreya,0;
  1568. end;
  1569. }
  1570. }
  1571. }
  1572. }
  1573. end;
  1574.  
  1575.  
  1576.  
  1577. OnMatchEnd:
  1578. set $@FlaviusBG2, 2;
  1579. stopnpctimer;
  1580. movenpc "Freyja of the Light",391,15;
  1581. movenpc "Lucifer of the Dark",391,14;
  1582. movenpc "Freyja of the Light#1",392,15;
  1583. movenpc "Lucifer of the Dark#1",392,14;
  1584. disablenpc "Lucifer of the Dark";
  1585. disablenpc "Freyja of the Light";
  1586. disablenpc "Freyja of the Light#1";
  1587. disablenpc "Lucifer of the Dark#1";
  1588. donpcevent "#gfl2_respawn::OnBGStop";
  1589. donpcevent "#cfl2_respawn::OnBGStop";
  1590. disablenpc "Therapist in Battle#1";
  1591. disablenpc "Therapist in Battle#2";
  1592. enablenpc "Battle Reward#fl2";
  1593. sleep 2000;
  1594. mapwarp "bat_b02","new_2-4",51,191;
  1595. mapwarp "bat_room","new_2-4",51,191;
  1596. sleep 3000;
  1597. mapannounce "bat_b02","Capture The Heroes will close in 1 minute!",1,0x610B5E;
  1598. initnpctimer;
  1599. end;
  1600.  
  1601. OnTimer30000:
  1602. if( $@FlaviusBG2 == 2 )
  1603. mapannounce "bat_b02","Capture The Heroes will close in 30 seconds!",1,0x610B5E;
  1604. end;
  1605. OnTimer50000:
  1606. if( $@FlaviusBG2 == 2 )
  1607. mapannounce "bat_b02","Capture The Heroes will close in 10 seconds!",1,0x610B5E;
  1608. end;
  1609.  
  1610. OnTimer60000:
  1611. if( $@FlaviusBG2 != 2 )
  1612. end;
  1613. OnReset:
  1614. stopnpctimer;
  1615. set $@Guillaume_Score, 0;
  1616. set $@Croix_Score, 0;
  1617. set $@anuncioF4,0;
  1618. set $@anuncioF3,0;
  1619. set $@RedFlagTaken, 0;
  1620. set $@Red_Flag_Carrier$,0;
  1621. set $@BlueFlagTaken, 0;
  1622. set $@Blue_Flag_Carrier$,0;
  1623. set $@RedFlagFalse, 0;
  1624. set $@BlueFlagFalse, 0;
  1625. // NPC's
  1626. disablenpc "Dark Reward#fl2";
  1627. disablenpc "Therapist in Battle#1";
  1628. disablenpc "Therapist in Battle#2";
  1629. disablenpc "Lucifer of the Dark";
  1630. disablenpc "Freyja of the Light";
  1631. disablenpc "Freyja of the Light#1";
  1632. disablenpc "Lucifer of the Dark#1";
  1633. if( $@FlaviusBG2_id1 ) { bg_destroy $@FlaviusBG2_id1; set $@FlaviusBG2_id1, 0; }
  1634. if( $@FlaviusBG2_id2 ) { bg_destroy $@FlaviusBG2_id2; set $@FlaviusBG2_id2, 0; }
  1635. sleep 1000;
  1636. mapwarp "bat_room","new_2-4",51,191;
  1637. sleep 1000;
  1638. mapwarp "bat_b02","new_2-4",51,191;
  1639. sleep 2000;
  1640. bg_updatescore "bat_b02",0,0;
  1641. set $@FlaviusBG2, 0;
  1642. end;
  1643.  
  1644.  
  1645. Guillawin:
  1646. announce "The Warriors of the Light has won the Capture The Heroes!",0;
  1647. set $@FlaviusBG2_Victory, 1;
  1648. donpcevent "Flavius_BG2::OnMatchEnd";
  1649. end;
  1650.  
  1651. Croixwin:
  1652. announce "The Warriors of the Dark has won the Capture The Heroes!",0;
  1653. set $@FlaviusBG2_Victory, 2;
  1654. donpcevent "Flavius_BG2::OnMatchEnd";
  1655. end;
  1656.  
  1657. Nowinner:
  1658. announce "The Capture The Heroes has ended. There are no victors!",0;
  1659. set $@FlaviusBG2_Victory, 3;
  1660. donpcevent "Flavius_BG2::OnMatchEnd";
  1661. end;
  1662.  
  1663. }
  1664.  
  1665. // Banderas estaticas :3
  1666.  
  1667. bat_b02,328,150,5 script Freyja of the Light 1751,1,1,{
  1668. end;
  1669. OnTouch:
  1670. if( Bat_Team == 2 ){
  1671. set @hp, (Hp * 100 / MaxHp);
  1672. if (@hp < 50) goto notenafhp;
  1673. set $@RedFlagTaken, 1;
  1674. set $@Red_Flag_Carrier$,strcharinfo(0);
  1675. mapannounce "bat_b02", "[ "+$@Red_Flag_Carrier$+" ] kidnapped Freyja of the Light",bc_map,0xFF0000;
  1676. disablenpc "Freyja of the Light";
  1677. movenpc "Freyja of the Light",391,15;
  1678. callsub OnRedFlagCarrier;
  1679. end;
  1680.  
  1681. notenafhp:
  1682. announce "You cannot kidnap the Hero. Your HP is below 50%, Please Make sure that your HP is above 50% to successfully kidnap the Hero.",3;
  1683. end;
  1684. }
  1685.  
  1686. if( $@BlueFlagTaken == 1 && $@Blue_Flag_Carrier$ == strcharinfo(0) ){
  1687. mapannounce "bat_b02", "[ "+$@Blue_Flag_Carrier$+" ] successfully devoured Lucifer of the Dark",bc_map,0x0000FF;
  1688. set @banderas,@banderas + 1;
  1689. set $@BlueFlagTaken, 0;
  1690. set $@Blue_Flag_Carrier$,0;
  1691. if( set($@Guillaume_Score, $@Guillaume_Score + 1) < 100 )
  1692. {
  1693. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1694.  
  1695. disablenpc "Lucifer of the Dark";
  1696. disablenpc "Freyja of the Light";
  1697. disablenpc "Freyja of the Light#1";
  1698. disablenpc "Lucifer of the Dark#1";
  1699. movenpc "Lucifer of the Dark",62,149;
  1700. movenpc "Freyja of the Light",328,150;
  1701. movenpc "Freyja of the Light#1",391,14;
  1702. movenpc "Lucifer of the Dark#1",391,15;
  1703. sleep 5000;
  1704. mapannounce "bat_b02","The Heroes have been set to their Bases!!",bc_map,0xFFFF00;
  1705. enablenpc "Lucifer of the Dark";
  1706. enablenpc "Freyja of the Light";
  1707. }
  1708. else
  1709. {
  1710. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1711. mapannounce "bat_b02","The Warriors of the Light has won the Capture The Heroes!",1,0x0000FF;
  1712. set $@FlaviusBG2_Victory, 1;
  1713. donpcevent "Flavius_BG2::OnMatchEnd";
  1714. }
  1715. }
  1716. end;
  1717.  
  1718. OnRedFlagCarrier:
  1719. if($@RedFlagTaken == 1) {
  1720. if($@Red_Flag_Carrier$ == strcharinfo(0)) {
  1721.  
  1722. sc_end SC_CLOAKING;
  1723. sc_end SC_CHASEWALK;
  1724. sc_end SC_HIDING;
  1725. sc_start 297,2000,1;
  1726. sc_start SC_ROKISWEIL,1200000,1;
  1727. emotion e_hlp,1;
  1728. percentheal -7,0;
  1729. specialeffect2 58;
  1730. sleep2 2000;
  1731. goto OnRedFlagCarrier;}}
  1732. sc_end 297;
  1733. sc_end SC_ROKISWEIL;
  1734. end;
  1735. }
  1736.  
  1737.  
  1738. bat_b02,62,149,5 script Lucifer of the Dark 1916,1,1,{
  1739. end;
  1740. OnTouch:
  1741. if( Bat_Team == 1 ){
  1742. set @hp2, (Hp * 100 / MaxHp);
  1743. if (@hp2 < 50) goto notenafhp2;
  1744. set $@BlueFlagTaken, 1;
  1745. set $@Blue_Flag_Carrier$,strcharinfo(0);
  1746. mapannounce "bat_b02", "[ "+$@Blue_Flag_Carrier$+" ] kidnapped Lucifer of the Dark",bc_map,0x0000FF;
  1747. disablenpc "Lucifer of the Dark";
  1748. movenpc "Lucifer of the Dark",391,14;
  1749. callsub OnBlueFlagCarrier;
  1750. end;
  1751.  
  1752. notenafhp2:
  1753. announce "You cannot kidnap the Hero. Your HP is below 50%, Please Make sure that your HP is above 50% to successfully kidnap the Hero.",3;
  1754. end;
  1755. }
  1756.  
  1757. if( $@RedFlagTaken == 1 && $@Red_Flag_Carrier$ == strcharinfo(0) ){
  1758. mapannounce "bat_b02", "[ "+$@Red_Flag_Carrier$+" ] successfully devoured Freyja of the Light",bc_map,0xFF0000;
  1759. set @banderas,@banderas + 1;
  1760. set $@RedFlagTaken, 0;
  1761. set $@Red_Flag_Carrier$,0;
  1762. if( set($@Croix_Score, $@Croix_Score + 1) < 100 )
  1763. {
  1764. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1765.  
  1766. disablenpc "Lucifer of the Dark";
  1767. disablenpc "Freyja of the Light";
  1768. disablenpc "Freyja of the Light#1";
  1769. disablenpc "Lucifer of the Dark#1";
  1770. movenpc "Lucifer of the Dark",62,149;
  1771. movenpc "Freyja of the Light",328,150;
  1772. movenpc "Freyja of the Light#1",391,14;
  1773. movenpc "Lucifer of the Dark#1",391,15;
  1774. sleep 5000;
  1775. mapannounce "bat_b02","The Heroes have been set to their Bases!!",bc_map,0xFFFF00;
  1776. enablenpc "Lucifer of the Dark";
  1777. enablenpc "Freyja of the Light";
  1778. }
  1779. else
  1780. {
  1781. bg_updatescore "bat_b02",$@Guillaume_Score,$@Croix_Score;
  1782. mapannounce "bat_b02","The Warriors of the Dark has won the Capture The Heroes!",1,0xFF0000;
  1783. set $@FlaviusBG2_Victory, 2;
  1784. donpcevent "Flavius_BG2::OnMatchEnd";
  1785. }
  1786. }
  1787. end;
  1788.  
  1789. OnBlueFlagCarrier:
  1790. if($@BlueFlagTaken == 1) {
  1791. if($@Blue_Flag_Carrier$ == strcharinfo(0)) {
  1792.  
  1793. sc_end SC_CLOAKING;
  1794. sc_end SC_CHASEWALK;
  1795. sc_end SC_HIDING;
  1796. sc_start 297,2000,1;
  1797. sc_start SC_ROKISWEIL,1200000,1;
  1798. emotion e_hlp,1;
  1799. percentheal -7,0;
  1800. specialeffect2 58;
  1801. sleep2 2000;
  1802. goto OnBlueFlagCarrier;}}
  1803. sc_end 297;
  1804. sc_end SC_ROKISWEIL;
  1805. end;
  1806.  
  1807. }
  1808.  
  1809. //Banderas que dropean al morir, y se mueven :3!
  1810. bat_b02,390,13,5 script Lucifer of the Dark#1 1916,1,1,{
  1811. end;
  1812. OnTouch:
  1813. if( Bat_Team == 1 ){
  1814. set $@nahawakanluci,1;
  1815. set $@BlueFlagFalse, 0;
  1816. set $@BlueFlagTaken, 1;
  1817. set $@Blue_Flag_Carrier$,strcharinfo(0);
  1818. mapannounce "bat_b02","[ "+$@Blue_Flag_Carrier$+" ] kidnapped Lucifer of the Dark!!!",bc_map,0xFF0000;
  1819. disablenpc "Lucifer of the Dark#1";
  1820. movenpc "Lucifer of the Dark#1",390,13;
  1821. callsub OnBlueFlagCarrier;
  1822. end;
  1823. }
  1824. if( Bat_Team == 2 ){
  1825. set $@Blue_Returned$,strcharinfo(0);
  1826. mapannounce "bat_b02","[ "+$@Blue_Returned$+" ] rescued Lucifer of the Dark...",bc_map,0xFF0000;
  1827. set $@nahawakanluci,1;
  1828. set $@Blue_Returned$,0;
  1829. set $@BlueFlagFalse, 0;
  1830. disablenpc "Lucifer of the Dark#1";
  1831. movenpc "Lucifer of the Dark#1",390,13;
  1832. movenpc "Lucifer of the Dark",62,149;
  1833. enablenpc "Lucifer of the Dark";
  1834. end;
  1835. }
  1836. end;
  1837.  
  1838. OnBlueFlagCarrier:
  1839. if($@BlueFlagTaken == 1) {
  1840. if($@Blue_Flag_Carrier$ == strcharinfo(0)) {
  1841. sc_end SC_CLOAKING;
  1842. sc_end SC_CHASEWALK;
  1843. sc_end SC_HIDING;
  1844. sc_start 297,2000,1;
  1845. sc_start SC_ROKISWEIL,1200000,1;
  1846. emotion e_hlp,1;
  1847. percentheal -7,0;
  1848. specialeffect2 58;
  1849. sleep2 2000;
  1850. goto OnBlueFlagCarrier;}}
  1851. sc_end 297;
  1852. sc_end SC_ROKISWEIL;
  1853. end;
  1854. }
  1855.  
  1856. bat_b02,390,14,5 script Freyja of the Light#1 1751,1,1,{
  1857. end;
  1858. OnTouch:
  1859. if( Bat_Team == 2 ){
  1860. set $@nahawakanfreya,1;
  1861. set $@RedFlagFalse, 0;
  1862. set $@RedFlagTaken, 1;
  1863. set $@Red_Flag_Carrier$,strcharinfo(0);
  1864. mapannounce "bat_b02", "[ "+$@Red_Flag_Carrier$+" ] kidnapped Freyja of the Light!!!",bc_map,0x0000FF;
  1865. disablenpc "Freyja of the Light#1";
  1866. movenpc "Freyja of the Light#1",390,13;
  1867. callsub OnRedFlagCarrier;
  1868. end;
  1869. }
  1870. if( Bat_Team == 1 ){
  1871. set $@Red_Returned$,strcharinfo(0);
  1872. mapannounce "bat_b02","[ "+$@Red_Returned$+" ] rescued Freyja of the Light...",bc_map,0x0000FF;
  1873. set $@nahawakanfreya,1;
  1874. set $@Red_Returned$,0;
  1875. set $@RedFlagFalse, 0;
  1876. disablenpc "Freyja of the Light#1";
  1877. movenpc "Freyja of the Light#1",390,14;
  1878. movenpc "Freyja of the Light",328,150;
  1879. enablenpc "Freyja of the Light";
  1880. end;
  1881. }
  1882. end;
  1883.  
  1884. OnRedFlagCarrier:
  1885. if($@RedFlagTaken == 1) {
  1886. if($@Red_Flag_Carrier$ == strcharinfo(0)) {
  1887. sc_end SC_CLOAKING;
  1888. sc_end SC_CHASEWALK;
  1889. sc_end SC_HIDING;
  1890. sc_start 297,2000,1;
  1891. sc_start SC_ROKISWEIL,1200000,1;
  1892. emotion e_hlp,1;
  1893. percentheal -7,0;
  1894. specialeffect2 58;
  1895. sleep2 2000;
  1896. goto OnRedFlagCarrier;}}
  1897. sc_end 297;
  1898. sc_end SC_ROKISWEIL;
  1899. end;
  1900. }
  1901.  
  1902. // Map View de las banderas.
  1903.  
  1904. - script viewmapred -,{
  1905. end;
  1906. OnPCLoadMapEvent:
  1907. OnViewRed:
  1908. getmapxy .@MAPNAME$,@X,@Y,0,strcharinfo(0);
  1909. if(.@MAPNAME$ == "bat_b02") {
  1910.  
  1911. if($@FlaviusBG2 == 2) {
  1912. viewpoint 2,.yE,.yE,1,0x0000ff;
  1913. end;}
  1914. if($@FlaviusBG2 == 1) {
  1915.  
  1916. if ($@RedFlagFalse == 1) {
  1917. getmapxy(.mapES$, .xE, .yE,1,"Freyja of the Light#1");
  1918. viewpoint 1,.xE,.yE,1,0x0000ff;
  1919. sleep2 1000;
  1920. goto OnViewRed;
  1921. }
  1922. if ($@RedFlagTaken == 1) {
  1923. getmapxy(.mapES$, .xE, .yE,0,$@Red_Flag_Carrier$);
  1924. viewpoint 1,.xE,.yE,1,0x0000ff;
  1925. sleep2 1000;
  1926. goto OnViewRed;
  1927. }
  1928. }
  1929. getmapxy(.mapES$, .xE, .yE,1,"Freyja of the Light");
  1930. viewpoint 1,.xE,.yE,1,0x0000ff;
  1931. sleep2 1000;
  1932. goto OnViewRed;
  1933.  
  1934. }
  1935. end;
  1936. }
  1937.  
  1938. - script viewmapblue -,{
  1939. end;
  1940. OnPCLoadMapEvent:
  1941. OnViewBlue:
  1942. getmapxy .@MAPNAME$,@X,@Y,0,strcharinfo(0);
  1943. if(.@MAPNAME$ == "bat_b02") {
  1944. if($@FlaviusBG2 == 2) {
  1945. viewpoint 2,.yEE,.yEE,2,0xff0000;
  1946. end;}
  1947. if($@FlaviusBG2 == 1) {
  1948.  
  1949. if ($@BlueFlagFalse == 1) {
  1950. getmapxy(.mapEES$, .xEE, .yEE,1,"Lucifer of the Dark#1");
  1951. viewpoint 1,.xEE,.yEE,2,0xff0000;
  1952. sleep2 1000;
  1953. goto OnViewBlue;
  1954. }
  1955. if ($@BlueFlagTaken == 1) {
  1956. getmapxy(.mapEES$, .xEE, .yEE,0,$@Blue_Flag_Carrier$);
  1957. viewpoint 1,.xEE,.yEE,2,0xff0000;
  1958. sleep2 1000;
  1959. goto OnViewBlue;
  1960. }
  1961. }
  1962. getmapxy(.mapEES$, .xEE, .yEE,1,"Lucifer of the Dark");
  1963. viewpoint 1,.xEE,.yEE,2,0xff0000;
  1964. sleep2 1000;
  1965. goto OnViewBlue;
  1966.  
  1967. }
  1968. end;
  1969. }
  1970.  
  1971.  
  1972.  
  1973. // Battleground rewards
  1974. // *********************************************************************
  1975.  
  1976. new_2-4,51,191,5 script Battle Reward#fl2 851,{
  1977. if( $@FlaviusBG2_Victory == Bat_Team )
  1978. { // Victory
  1979. mes "[Swandery]";
  1980. mes "Blessed Warrior";
  1981. mes "Let's enjoy our glorious victory!";
  1982. mes "" + strcharinfo(0) + ", its a sign reflecting victory";
  1983. getitem 7829,10;
  1984. set registeredna,0;
  1985. warp "prontera",155,179;
  1986. end;
  1987. }
  1988. else
  1989. { // Derrota
  1990. mes "[Swandery]";
  1991. mes "You lost, but you're dedicated to this battle.";
  1992. mes "This is a reward for your great dedication!";
  1993. mes "Just take this defeat a lesson, and later you would definitely learn.";
  1994. set registeredna,0;
  1995. getitem 741,1;
  1996. warp "prontera",155,179;
  1997. end;
  1998. }
  1999.  
  2000. set Flavius2_BG_Tick, gettimetick(2) + 300;
  2001. getitem 25454, .@Reward;
  2002. if(.@rewardb != 0) {
  2003. dispbottom "You've won "+.@rewardb+" extra medals for captured heroes";
  2004. getitem 25454,.@rewardb;}
  2005. setlook 7,normallook;
  2006. set registeredna,0;
  2007. bg_leave;
  2008. warp "prontera",155,179;
  2009. end;
  2010. }
  2011.  
  2012.  
  2013.  
  2014. // Battleground Therapist
  2015. // *********************************************************************
  2016.  
  2017. bat_room,197,97,5 script Therapist in Battle#1 95,{
  2018. mes "[Therapist in battle]";
  2019. mes "Just close your eyes, and take a deep breathe.";
  2020. mes "You can be free from pain.";
  2021. percentheal 100,100;
  2022. sc_start SC_MAGNIFICAT,300000,5;
  2023. specialeffect2 312;
  2024. close;
  2025. }
  2026.  
  2027. bat_room,197,74,1 script Therapist in battle#2 95,{
  2028. mes "[Therapist in battle]";
  2029. mes "Just close your eyes, and take a deep breathe.";
  2030. mes "You can be free from pain.";
  2031. percentheal 100,100;
  2032. sc_start SC_MAGNIFICAT,300000,5;
  2033. specialeffect2 312;
  2034. close;
  2035. }
  2036.  
  2037. // Battleground Respawn
  2038. // *********************************************************************
  2039.  
  2040. bat_room,197,97,0 script #gfl2_respawn 139,{
  2041. end;
  2042.  
  2043. OnBGStart:
  2044. initnpctimer;
  2045. end;
  2046.  
  2047. OnBGStop:
  2048. stopnpctimer;
  2049. end;
  2050.  
  2051. OnTimer24000:
  2052. misceffect 83;
  2053. end;
  2054.  
  2055. OnTimer25000:
  2056. areapercentheal "bat_room",201,98,194,90,100,100;
  2057. areawarp "bat_room",201,98,194,90,"bat_b02",311,224;
  2058. initnpctimer;
  2059. end;
  2060. }
  2061.  
  2062. bat_b02,197,74,0 script #cfl2_respawn 139,{
  2063. end;
  2064.  
  2065. OnBGStart:
  2066. initnpctimer;
  2067. end;
  2068.  
  2069. OnBGStop:
  2070. stopnpctimer;
  2071. end;
  2072.  
  2073. OnTimer24000:
  2074. misceffect 83;
  2075. end;
  2076.  
  2077. OnTimer25000:
  2078. areapercentheal "bat_room",201,81,194,73,100,100;
  2079. areawarp "bat_room",201,81,194,73,"bat_b02",87,75;
  2080. initnpctimer;
  2081. end;
  2082. }
  2083.  
  2084. // Flags
  2085. // *********************************************************************
  2086.  
  2087. bat_b02,304,231,1 duplicate(Light Camp#bat) Light Camp#bat32 973
  2088. bat_b02,319,231,1 duplicate(Light Camp#bat) Light Camp#bat33 973
  2089. bat_b02,304,218,1 duplicate(Light Camp#bat) Light Camp#bat34 973
  2090. bat_b02,319,218,1 duplicate(Light Camp#bat) Light Camp#bat35 973
  2091. bat_b02,304,231,1 duplicate(Light Camp#bat) Light Camp#bat36 973
  2092. bat_b02,304,231,1 duplicate(Light Camp#bat) Light Camp#bat37 973
  2093. bat_b02,335,142,1 duplicate(Light Camp#bat) Light Camp#bat38 973
  2094. bat_b02,335,157,1 duplicate(Light Camp#bat) Light Camp#bat39 973
  2095. bat_b02,390,16,1 duplicate(Light Camp#bat) Light Camp#bat40 973
  2096. bat_b02,292,163,1 duplicate(Light Camp#bat) Light Camp#bat41 973
  2097. bat_b02,292,136,1 duplicate(Light Camp#bat) Light Camp#bat42 973
  2098. bat_b02,241,185,1 duplicate(Light Camp#bat) Light Camp#bat43 973
  2099. bat_b02,247,179,1 duplicate(Light Camp#bat) Light Camp#bat44 973
  2100.  
  2101. bat_b02,96,81,1 duplicate(Dark Camp#bat) Dark Camp#bat30 974
  2102. bat_b02,96,68,1 duplicate(Dark Camp#bat) Dark Camp#bat31 974
  2103. bat_b02,79,81,1 duplicate(Dark Camp#bat) Dark Camp#bat32 974
  2104. bat_b02,79,68,1 duplicate(Dark Camp#bat) Dark Camp#bat33 974
  2105. bat_b02,96,81,1 duplicate(Dark Camp#bat) Dark Camp#bat34 974
  2106. bat_b02,96,81,1 duplicate(Dark Camp#bat) Dark Camp#bat35 974
  2107. bat_b02,59,164,1 duplicate(Dark Camp#bat) Dark Camp#bat36 974
  2108. bat_b02,59,137,1 duplicate(Dark Camp#bat) Dark Camp#bat37 974
  2109. bat_b02,10,296,1 duplicate(Dark Camp#bat) Dark Camp#bat38 974
  2110. bat_b02,110,162,1 duplicate(Dark Camp#bat) Dark Camp#bat39 974
  2111. bat_b02,110,137,1 duplicate(Dark Camp#bat) Dark Camp#bat40 974
  2112. bat_b02,152,120,1 duplicate(Dark Camp#bat) Dark Camp#bat41 974
  2113. bat_b02,158,114,1 duplicate(Dark Camp#bat) Dark Camp#bat42 974
  2114.  
  2115. // MapFlags
  2116. // *********************************************************************
  2117.  
  2118. new_3-4 mapflag nomemo
  2119. new_3-4 mapflag nosave SavePoint
  2120. new_3-4 mapflag noteleport
  2121. new_3-4 mapflag nowarp
  2122. new_3-4 mapflag noreturn
  2123. new_3-4 mapflag nobranch
  2124. new_3-4 mapflag nopenalty
  2125. new_3-4 mapflag nowarpto
  2126. new_2-4 mapflag nowarp
  2127. new_2-4 mapflag nowarpto
  2128. new_2-4 mapflag nomemo
  2129. new_2-4 mapflag nosave SavePoint
  2130. new_2-4 mapflag noteleport
  2131. new_2-4 mapflag nowarp
  2132. new_2-4 mapflag noreturn
  2133. new_2-4 mapflag nobranch
  2134. new_2-4 mapflag nopenalty
  2135. bat_b02 mapflag battleground 2
  2136. bat_b02 mapflag nomemo
  2137. bat_b02 mapflag nocommand
  2138. bat_b02 mapflag nosave SavePoint
  2139. bat_b02 mapflag noteleport
  2140. bat_b02 mapflag nowarp
  2141. bat_b02 mapflag nowarpto
  2142. bat_b02 mapflag noreturn
  2143. bat_b02 mapflag nobranch
  2144. bat_b02 mapflag nopenalty
  2145. bat_b02 mapflag loadevent
  2146. splendide mapflag noskill
  2147. bat_a02 mapflag nowarpto
  2148. que_bingo mapflag nowarp
  2149. que_bingo mapflag nowarpto
  2150. que_bingo mapflag noreturn
  2151. que_bingo mapflag nobranch
  2152. que_bingo mapflag noteleport
  2153. que_bingo mapflag nopenalty
  2154. sec_pri mapflag nowarp
  2155. sec_pri mapflag nowarpto
  2156. sec_pri mapflag noreturn
  2157. sec_pri mapflag nobranch
  2158. sec_pri mapflag noteleport
  2159. sec_pri mapflag nopenalty
  2160. prontera mapflag restricted 1
  2161. guild_vs1 mapflag nomemo
  2162. guild_vs1 mapflag noteleport
  2163. guild_vs1 mapflag nowarp
  2164. guild_vs1 mapflag noreturn
  2165. guild_vs1 mapflag nobranch
  2166. guild_vs1 mapflag nowarpto
  2167. guild_vs2 mapflag nomemo
  2168. guild_vs2 mapflag noteleport
  2169. guild_vs2 mapflag nowarp
  2170. guild_vs2 mapflag noreturn
  2171. guild_vs2 mapflag nobranch
  2172. guild_vs2 mapflag nowarpto
  2173. poring_w01 mapflag restricted 2
  2174. prt_gld mapflag pvp off
  2175. alde_gld mapflag pvp off
  2176. pay_gld mapflag pvp off
  2177. job3_war02 mapflag nowarp
  2178. job3_war02 mapflag nowarpto
  2179. //prontera mapflag autotrade no
  2180. //morocc mapflag autotrade no
  2181. //geffen mapflag autotrade no
  2182. //payon mapflag autotrade no
  2183. //alberta mapflag autotrade no
  2184. //izlude mapflag autotrade no
  2185. //aldebaran mapflag autotrade no
  2186. //lutie mapflag autotrade no
  2187. //comodo mapflag autotrade no
  2188. //yuno mapflag autotrade no
  2189. //amatsu mapflag autotrade no
  2190. //gonryun mapflag autotrade no
  2191. //umbala mapflag autotrade no
  2192. //niflheim mapflag autotrade no
  2193. //louyang mapflag autotrade no
  2194. //ayothaya mapflag autotrade no
  2195. //enbroch mapflag autotrade no
  2196. //lighthalzen mapflag autotrade no
  2197. //einbech mapflag autotrade no
  2198. //hugel mapflag autotrade no
  2199. //rachel mapflag autotrade no
  2200. //veins mapflag autotrade no
  2201. //moscovia mapflag autotrade no
  2202. //splendide mapflag autotrade no
  2203. prontera mapflag novending
  2204. morocc mapflag novending
  2205. geffen mapflag novending
  2206. payon mapflag novending
  2207. alberta mapflag novending
  2208. izlude mapflag novending
  2209. aldebaran mapflag novending
  2210. xmas mapflag novending
  2211. comodo mapflag novending
  2212. yuno mapflag novending
  2213. amatsu mapflag novending
  2214. gonryun mapflag novending
  2215. umbala mapflag novending
  2216. niflheim mapflag novending
  2217. louyang mapflag novending
  2218. ayothaya mapflag novending
  2219. einbroch mapflag novending
  2220. lighthalzen mapflag novending
  2221. einbech mapflag novending
  2222. hugel mapflag novending
  2223. rachel mapflag novending
  2224. veins mapflag novending
  2225. moscovia mapflag novending
  2226. gef_tower mapflag nowarpto
  2227. gef_tower mapflag nowarp
  2228.  
  2229.  
  2230.  
  2231. bat_b02,87,85,3 script Healer#boa1 81,{
  2232. if (Bat_Team == 1) end;
  2233. if ( $@Blue_Flag_Carrier$ == strcharinfo(0) || $@Red_Flag_Carrier$ == strcharinfo(0)) end;
  2234. percentheal 100,100;
  2235. sc_start SC_BLESSING,300000,10;
  2236. sc_start SC_INCREASEAGI,300000,10;
  2237. sc_start SC_MAGNIFICAT,300000,5;
  2238. close;
  2239. }
  2240.  
  2241. bat_b02,313,235,3 script Healer#boa2 81,{
  2242. if (Bat_Team == 2) end;
  2243. if ( $@Blue_Flag_Carrier$ == strcharinfo(0) || $@Red_Flag_Carrier$ == strcharinfo(0)) end;
  2244. percentheal 100,100;
  2245. sc_start SC_BLESSING,300000,10;
  2246. sc_start SC_INCREASEAGI,300000,10;
  2247. sc_start SC_MAGNIFICAT,300000,5;
  2248. close;
  2249.  
  2250.  
  2251. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement