API tools faq
paste
Advertisement
Ryuuji

emistry stage

Ryuuji
Dec 27th, 2013
72
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 7.39 KB | None | 0 0
raw download clone embed print report
  1. guild_vs5,50,50,5 script Stage Game 437,{
  2.  
  3.  
  4. // Monster ID / Amount Initiating ( Check db/Mob_db.txt || db/Mob_db2.txt )
  5.  
  6. setarray .Stage[0],
  7.  
  8. 1001,10, // Stage 1 + Amount
  9.  
  10. 1002,12, // Stage 2 + Amount
  11.  
  12. 1004,14, // Stage 3 + Amount
  13.  
  14. 1005,16, // Stage 4 + Amount
  15.  
  16. 1007,18, // etc......
  17.  
  18. 1008,20, //
  19.  
  20. 1058,30; // Final Stage ( Max. ~64 Rounds )
  21.  
  22.  
  23.  
  24. // Reward ID / Amount Initiating ( Check db/Item_db.txt || db/Item_db2.txt )
  25. setarray .Reward[0],
  26.  
  27. 607,10, // Reward 1 + Amount
  28.  
  29. 608,5, // Reward 2 + Amount
  30.  
  31. 501,3, // etc......
  32.  
  33. 512,1; // Last Reward 1 ( Max. ~64 Items )
  34.  
  35.  
  36. // MapFlags Initiating ( Check db/Cont.txt )
  37.  
  38. setarray .MapFlags[0],0,1,2,3,4,5,11,13,14,15,22,29,30,31,32,33,34,35,38,41,43,44,47,49;
  39.  
  40.  
  41.  
  42. for( set .@mf,0; .@mf < getarraysize( .MapFlags ); set .@mf,.@mf + 1 ){
  43.  
  44. setmapflag strcharinfo(3),.MapFlags[.@mf];
  45.  
  46. }
  47.  
  48.  
  49.  
  50. if( mobcount( strcharinfo(3),"all" ) > 0 || .Level > 0){
  51. dispbottom "Just Kill All the Monster to Win the Game...";
  52.  
  53. end;
  54.  
  55. }
  56.  
  57. set .Level,0;
  58. announce "[Level "+( (.Level/2)+1 )+"] : [ "+.Stage[.Level+1]+" x "+getmonsterinfo( .Stage[.Level],0)+" ]",bc_all,0x37FDFC;
  59.  
  60. monster strcharinfo(3),0,0,"[Slave] "+getmonsterinfo( .Stage[.Level],0)+"",.Stage[.Level],.Stage[.Level+1],strnpcinfo(0)+"::OnMobKill";
  61.  
  62. delwaitingroom;
  63.  
  64. waitingroom "Left ["+mobcount( strcharinfo(3),strnpcinfo(0)+"::OnMobKill" )+"] Monster",0;
  65.  
  66. end;
  67.  
  68.  
  69.  
  70. OnMobKill:
  71.  
  72. delwaitingroom;
  73.  
  74. if( mobcount( strcharinfo(3),strnpcinfo(0)+"::OnMobKill" ) == 0 && .Level < ( getarraysize( .Stage ) - 5 ) ){
  75.  
  76. set .Level,.Level + 2;
  77.  
  78. waitingroom "["+((( getarraysize( .Stage )/2 ) - .Level/2) - 1)+"] Rounds to Go.",0;
  79.  
  80. for( set .@t,5; .@t > 0; set .@t,.@t - 1 ){
  81.  
  82. announce "[Level "+( (.Level/2)+1 )+"] in "+.@t+" Seconds",bc_map,0x4EEE94,0,35;
  83.  
  84. sleep2 1000;
  85.  
  86. }
  87.  
  88. announce "[Level "+( (.Level/2)+1 )+"] : [ "+.Stage[.Level+1]+" x "+getmonsterinfo( .Stage[.Level],0)+" ]",bc_all,0x37FDFC;
  89.  
  90. monster strcharinfo(3),0,0,"[Slave] "+getmonsterinfo( .Stage[.Level],0)+"",.Stage[.Level],.Stage[.Level+1],strnpcinfo(0)+"::OnMobKill";
  91.  
  92. }else if( mobcount( strcharinfo(3),strnpcinfo(0)+"::OnMobKill" ) == 0 && .Level >= ( getarraysize( .Stage ) - 5 ) ){
  93.  
  94. set .Level,.Level + 2;
  95.  
  96. announce "BOSS Stage",bc_map,0xFF0000,0,90;
  97.  
  98. specialeffect 563;
  99.  
  100. sleep2 2000;
  101.  
  102. for( set .@t,5; .@t > 0; set .@t,.@t - 1 ){
  103.  
  104. specialeffect 563;
  105.  
  106. announce "BOSS STAGE in "+.@t+" Seconds",bc_map,0xFF0000,0,60;
  107.  
  108. sleep2 1000;
  109.  
  110. }
  111.  
  112. announce "[Level "+( (.Level/2)+1 )+"] : [ "+.Stage[.Level+1]+" x "+getmonsterinfo( .Stage[.Level],0)+" ]",bc_all,0x37FDFC;
  113.  
  114. monster strcharinfo(3),0,0,"[BOSS] "+getmonsterinfo( .Stage[.Level],0)+"",.Stage[.Level],.Stage[.Level+1],strnpcinfo(0)+"::OnBossKill";
  115.  
  116. }
  117.  
  118. delwaitingroom;
  119.  
  120. waitingroom "Left ["+mobcount( strcharinfo(3),strnpcinfo(0)+"::On"+( ( .Level-2 ) > ( getarraysize( .Stage ) - 5 ) ? "BossKill":"MobKill") )+"] Monster",0;
  121.  
  122. end;
  123.  
  124.  
  125.  
  126. OnBossKill:
  127.  
  128. delwaitingroom;
  129.  
  130. if( mobcount( strcharinfo(3),strnpcinfo(0)+"::OnBossKill" ) > 0 ){
  131.  
  132. waitingroom "Left ["+mobcount( strcharinfo(3),strnpcinfo(0)+"::OnBossKill")+"] Monster",0;
  133.  
  134. end;
  135.  
  136. }else{
  137.  
  138. delwaitingroom;
  139.  
  140. waitingroom "REWARD TIME",0;
  141.  
  142. specialeffect 709;
  143.  
  144. announce "Congratulation to Team [ "+getpartyname( getcharid(1) )+" ] who had just finished the Stage Game. ",0;
  145.  
  146. getpartymember getcharid(1),1;
  147.  
  148. getpartymember getcharid(1),2;
  149.  
  150. set @Location$,strcharinfo(3);
  151.  
  152. for ( set .@i, 0; .@i < $@partymembercount; set .@i, .@i +1 ){
  153.  
  154. if ( isloggedin($@partymemberaid[.@i]) ){
  155.  
  156. attachrid $@partymemberaid[.@i];
  157.  
  158. if( strcharinfo(3) == @Location$ ){
  159.  
  160. unittalk getcharid(3),"Yeehaaa !! We Beat ALL the Monster !!!";
  161.  
  162. unitemote getcharid(3),e_heh;
  163.  
  164. specialeffect2 709;
  165.  
  166. for( set .@a,0; .@a < getarraysize( .Reward ); set .@a,.@a + 2 ){
  167.  
  168. getitem .Reward[.@a],.Reward[.@a+1], $@partymemberaid[.@i];
  169.  
  170. }
  171.  
  172. dispbottom "Gained those items as Reward for Finishing Stage Game";
  173.  
  174. }
  175.  
  176. }
  177.  
  178. }
  179.  
  180. sleep2 5000;
  181.  
  182. mapwarp strcharinfo(3),"prontera",155,180;
  183.  
  184. set .Level,0;
  185.  
  186. delwaitingroom;
  187.  
  188. }
  189.  
  190. OnInit:
  191.  
  192. waitingroom " Click Me",0;
  193.  
  194. end;
  195.  
  196.  
  197.  
  198. }
  199.  
  200.  
  201.  
  202. prontera,146,188,5 script Stage Game#Register 794,{
  203.  
  204.  
  205. while(1){
  206.  
  207. mes "Hello, i am ^FF0000Stage Game Manager^000000. How can i help you ?";
  208.  
  209. mes "^0000FFRegistration Status^000000 : "+( getmapusers(.Map$) > 0 ?"^FF0000OFF":"^00FF00ON")+"^000000";
  210.  
  211. mes "(^FF0000Only Leader can Register^000000)";
  212.  
  213. mes "";
  214.  
  215. mes "It is In ^FF0000BETA Test^000000.";
  216.  
  217. next;
  218.  
  219. switch(select("^00FF00Stage Game Information^000000",
  220.  
  221. ( getmapusers(.Map$) > 0 || getcharid(0) != getpartyleader( getcharid(1),2 ) )?"":"^0000FFRegister for Stage Game^000000",
  222.  
  223. ( getmapusers(.Map$) < 1 || getgmlevel() < 60 )?"":"^FF0000Reset Stage Game^000000")) {
  224.  
  225.  
  226.  
  227. Case 1:
  228.  
  229. mes "^FF0000Stage Game^000000 is a small game that have alot of monster to be kill from round to round.";
  230.  
  231. mes "With every increase or round you manage to reach, the monster could be stronger than before.";
  232.  
  233. next;
  234.  
  235. mes "You could win up some ^0000FFUnique^000000 prize upon you finished the whole ^FF0000Stage Game^000000";
  236.  
  237. next;
  238.  
  239. mes "In order to ^0000FFRegister^000000 for ^FF0000Stage Game^000000, all your party member must meet the ^0000FFRequirements^000000";
  240.  
  241. next;
  242.  
  243. mes "[ ^00FF00Requirements^000000 ]";
  244.  
  245. mes "^0000FFBase Level^000000 : "+.Level+" Level";
  246.  
  247. mes "^0000FFZeny^000000 : "+.Zeny+" Zeny ";
  248.  
  249. mes "^0000FFParty Members^000000 : "+.PartyMember+" Members";
  250.  
  251. mes "(^FF0000Level / Zeny only Applied on Leader ^000000 )";
  252.  
  253. next;
  254.  
  255. break;
  256.  
  257. Case 2:
  258.  
  259. // if( getgmlevel() < 80 ){
  260.  
  261. // mes "Stage Game is under Debugging Development. Simple Game but Hard ";
  262.  
  263. // close;
  264.  
  265. // }
  266.  
  267. getpartymember getcharid(1),1;
  268.  
  269. getpartymember getcharid(1),2;
  270.  
  271. set @Count,0;
  272.  
  273. for ( set .@i, 0; .@i < $@partymembercount; set .@i, .@i +1 ){
  274.  
  275. if ( isloggedin($@partymemberaid[.@i]) ){
  276.  
  277. set @Count,@Count+1;
  278.  
  279. }
  280.  
  281. }
  282.  
  283. if( @Count < .PartyMember || BaseLevel < .Level || Zeny < .Zeny ){
  284.  
  285. mes "[ ^00FF00Requirements^000000 ]";
  286.  
  287. mes "^0000FFBase Level^000000 : "+.Level+" Level";
  288.  
  289. mes "^0000FFZeny^000000 : "+.Zeny+" Zeny ";
  290.  
  291. mes "^0000FFParty Members^000000 : "+.PartyMember+" Members";
  292.  
  293. mes "(^FF0000Level / Zeny only Applied on Leader ^000000 )";
  294.  
  295. close;
  296.  
  297. }else{
  298.  
  299. set Zeny, Zeny - .Zeny;
  300.  
  301. mes "Your party will now be warped into the Destination to start the Game.";
  302.  
  303. dispbottom "Click on the NPC inside to start the game.";
  304.  
  305. delwaitingroom "Stage Game";
  306.  
  307. close2;
  308.  
  309. announce "Team [ "+getpartyname( getcharid(1) )+"] has joined STAGE GAME.",0;
  310.  
  311. warpparty .Map$,0,0,getcharid(1);
  312.  
  313. killmonster .Map$,"All";
  314.  
  315. set getvariableofnpc(.Level,"Stage Game"),0;
  316.  
  317. end;
  318.  
  319. }
  320.  
  321. Case 3:
  322.  
  323. mes "The Game has been Reset.";
  324.  
  325. killmonster .Map$,"All";
  326.  
  327. mapwarp .Map$,"prontera",155,180;
  328.  
  329. announce "A GM has RESET the Stage Game, Sorry for the Incovenience.",0;
  330.  
  331. set getvariableofnpc(.Level,"Stage Game"),0;
  332.  
  333. delwaitingroom "Stage Game";
  334.  
  335. next;
  336.  
  337. break;
  338.  
  339. }
  340.  
  341. }
  342.  
  343. close;
  344.  
  345.  
  346. OnInit:
  347.  
  348. OnWhisperGlobal:
  349.  
  350. set .Level,254;
  351.  
  352. set .Zeny,100000000;
  353.  
  354. set .PartyMember,1;
  355.  
  356. set .Map$,"guild_vs5";
  357.  
  358.  
  359.  
  360. while( 1 ){
  361.  
  362. delwaitingroom;
  363.  
  364. waitingroom ( getmapusers(.Map$) > 0 ? " NOT":" " )+" Available",0;
  365.  
  366. sleep 1000;
  367.  
  368. }
  369.  
  370. end;
  371.  
  372. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!