Advertisement
Guest User

Untitled

a guest
Jan 24th, 2019
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.05 KB | None | 0 0
  1. //####################################################
  2. //# ™ #
  3. //# ####### ###### ### ### ### ### ### ### #
  4. //# ### ### ### ### ### ### ### ### ### #
  5. //# ##### ### ### #### #### ##### #
  6. //# ## ### ### ### ### ### ### ### #
  7. //# ## ###### ### ### ### ### ### #
  8. //# #
  9. //####################################################
  10. //v1.0: Allows changing suits to 3rd classes; #
  11. //v1.1: Added Xmas and Summer suits; #
  12. //v1.2: Added support to baby 3rd class suits. #
  13. //####################################################
  14. que_temsky,49,133,5 script Class Suits 485,{
  15.  
  16. OnCommand:
  17.  
  18. if(!vip_status(VIP_STATUS_ACTIVE)) {
  19. message strcharinfo(0),"This service is only avaiaible to VIP players.";
  20. end;
  21. }
  22.  
  23. // Settings
  24. set .@mode, 1; // Set it as following: 0 - Transcendent 2nd to 3rd class suits ; 1 - Transcendent 2nd to normal and baby 3rd class, also 3rd to baby 3rd; 2 - Transcendent 2nd to 3rd class suits and xmas, summer suits; 3 - 2nd to normal and baby 3rd class, also normal 3rd to baby 3rd plus xmas,summer.
  25.  
  26. if (.@mode == 0) goto normal;
  27. if (.@mode == 1) goto babies;
  28. if (.@mode == 2) goto misc;
  29. if (.@mode == 3) goto babymisc;
  30.  
  31. normal:
  32. mes "[^00FF00Acesso VIP^000000]";
  33. mes "Então, deseja mudar sua aparência?";
  34. menu "Mudar para aparência 3rd.",thirdclass,"Voltar para o normal.",reset;
  35.  
  36. babies:
  37. mes "[^00FF00Acesso VIP^000000]";
  38. mes "Então, deseja mudar sua aparência?";
  39. menu "Mudar para aparência 3rd.",thirdclass,"Mudar para aparência 3rd baby.",babythirdclass,"Voltar para o normal.",reset;
  40.  
  41. misc:
  42. mes "[^00FF00Acesso VIP^000000]";
  43. mes "Então, deseja mudar sua aparência?";
  44. menu "Mudar para aparência 3rd.",thirdclass,"Extra suits",miscsuits,"Voltar para o normal.",reset;
  45.  
  46. babymisc:
  47. mes "[^00FF00Acesso VIP^000000]";
  48. mes "So, wanna change your appearance?";
  49. menu "Mudar para aparência 3rd.",thirdclass,"Mudar para aparência 3rd baby.",babythirdclass,"Extra suits",miscsuits,"Reset appearance",reset;
  50.  
  51. thirdclass:
  52. if(class == Job_Lord_Knight) { changebase 4060; close; end; }
  53. if(class == Job_Assassin_Cross) { changebase 4065; close; end; }
  54. if(class == Job_Paladin) { changebase 4073; close; end; }
  55. if(class == Job_Whitesmith) { changebase 4064; close; end; }
  56. if(class == Job_Creator) { changebase 4078; close; end; }
  57. if(class == Job_Stalker) { changebase 4079; close; end; }
  58. if(class == Job_Professor) { changebase 4074; close; end; }
  59. if(class == Job_Gypsy) { changebase 4076; close; end; }
  60. if(class == Job_Champion) { changebase 4077; close; end; }
  61. if(class == Job_Sniper) { changebase 4062; close; end; }
  62. if(class == Job_Clown) { changebase 4075; close; end; }
  63. if(class == Job_High_Wizard) { changebase 4061; close; end; }
  64. if(class == Job_High_Priest) { changebase 4063; close; end; }
  65. else { next; mes "[Suit Provider]"; mes "I'm sorry, but your class is not supported."; close; end; }
  66.  
  67. babythirdclass:
  68. if(class == Job_Lord_Knight) { changebase 4096; close; end; }
  69. if(class == Job_Assassin_Cross) { changebase 4101; close; end; }
  70. if(class == Job_Paladin) { changebase 4102; close; end; }
  71. if(class == Job_Whitesmith) { changebase 4100; close; end; }
  72. if(class == Job_Creator) { changebase 4107; close; end; }
  73. if(class == Job_Stalker) { changebase 4108; close; end; }
  74. if(class == Job_Professor) { changebase 4103; close; end; }
  75. if(class == Job_Gypsy) { changebase 4105; close; end; }
  76. if(class == Job_Champion) { changebase 4106; close; end; }
  77. if(class == Job_Sniper) { changebase 4098; close; end; }
  78. if(class == Job_Clown) { changebase 4104; close; end; }
  79. if(class == Job_High_Wizard) { changebase 4097; close; end; }
  80. if(class == Job_High_Priest) { changebase 4099; close; end; }
  81. if(class == Job_Rune_Knight_T) { changebase 4096; close; end; }
  82. if(class == Job_Guillotine_Cross_T) { changebase 4101; close; end; }
  83. if(class == Job_Royal_Guard_T) { changebase 4102; close; end; }
  84. if(class == Job_Mechanic_T) { changebase 4100; close; end; }
  85. if(class == Job_Genetic_T) { changebase 4107; close; end; }
  86. if(class == Job_Shadow_Chaser_T) { changebase 4108; close; end; }
  87. if(class == Job_Sorcerer_T) { changebase 4103; close; end; }
  88. if(class == Job_Wanderer_T) { changebase 4105; close; end; }
  89. if(class == Job_Sura_T) { changebase 4106; close; end; }
  90. if(class == Job_Ranger_T) { changebase 4098; close; end; }
  91. if(class == Job_Minstrel_T) { changebase 4104; close; end; }
  92. if(class == Job_Warlock_T) { changebase 4097; close; end; }
  93. if(class == Job_Arch_Bishop_T) { changebase 4099; close; end; }
  94. else { next; mes "[Suit Provider]"; mes "I'm sorry, but your class is not supported."; close; end; }
  95.  
  96. reset:
  97. changebase Class;
  98. close;
  99. end;
  100.  
  101. miscsuits:
  102. next;
  103. mes "[Suit Provider]";
  104. mes "Which of the suits would you like to use?";
  105. menu "Xmas suit",xmas,"Summer suit",summer;
  106.  
  107. xmas:
  108. changebase 26;
  109. close;
  110. end;
  111.  
  112. summer:
  113. changebase 27;
  114. close;
  115. end;
  116.  
  117. OnInit:
  118.  
  119. bindatcmd "visual","Class Suits::OnCommand";
  120. end;
  121.  
  122. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement