yuhsing

Untitled

Jul 18th, 2013
170
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.06 KB | None | 0 0
  1.  
  2.  
  3. prontera,155,181,5 script Sample 757,{
  4. set .@guild_id,getcharid(2);
  5.  
  6. if( !.@guild_id ){
  7. mes "You dont have a guild.";
  8. }else if( getguildmasterid( .@guild_id ) == getcharid(0) ){
  9. mes "Select your Castle...";
  10. set .@i,select( .castle_menu$ ) - 1;
  11. if( $castle_reward & .@i << 2 ){
  12. mes "You already claimed this.";
  13. }else{
  14. mes "Here's your items...";
  15. getitem 512,100;
  16. getitem 512,100;
  17. getitem 512,100;
  18. set $castle_reward,$castle_reward + ( .@i << 2 );
  19. }
  20. }else{
  21. mes "Nothing i can do for you..";
  22. }
  23. close;
  24.  
  25.  
  26. OnAgitEnd;
  27. set $castle_reward,0;
  28. end;
  29.  
  30. OnInit:
  31. setarray .castle$,
  32. aldeg_cas01,
  33. aldeg_cas02,
  34. aldeg_cas03,
  35. aldeg_cas04,
  36. aldeg_cas05,
  37. gefg_cas01,
  38. gefg_cas02,
  39. gefg_cas03,
  40. gefg_cas04,
  41. gefg_cas05,
  42. payg_cas01,
  43. payg_cas02,
  44. payg_cas03,
  45. payg_cas04,
  46. payg_cas05,
  47. prtg_cas01,
  48. prtg_cas02,
  49. prtg_cas03,
  50. prtg_cas04,
  51. prtg_cas05;
  52. set .castle_size,getarraysize( .castle$ );
  53. for( set .@i,0; .@i < .castle_size; set .@i,.@i + 1 )
  54. set .castle_menu$,.castle_menu$ + getcastlename( .castle$[.@i] ) +":";
  55. end;
  56. }
Advertisement
Add Comment
Please, Sign In to add comment