Advertisement
Guest User

Untitled

a guest
Nov 17th, 2019
189
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.65 KB | None | 0 0
  1. veil,116,147,3 script Reward NPC::accreg 864,{
  2. if ( .gepard ) .@unique_id$ = get_unique_id();
  3. query_sql("SELECT COUNT(DISTINCT `"+.tbl$+"`) FROM `login`", .@c );
  4. if ( .@c > $total_account_reg ) $total_account_reg = .@c;
  5. mes "We currently have "+ $total_account_reg +" Legitimate Accounts registered in MetaRO.";
  6. mes "Rewards will be given if we reach:";
  7. mes "~ 50 registered accounts";
  8. mes "~ 300 registered accounts";
  9. mes "~ 500 registered accounts";
  10. mes "~ 1000 registered accounts";
  11. mes "~ 1001 registered accounts";
  12. next;
  13. mes "What do you want to do?";
  14. next;
  15. switch(select("Open Reward List",( $total_account_reg >= 50 && !#CLAIMRWD50 ) ? "Claim reward - 50 Accounts":"",( $total_account_reg >= 300 && !#CLAIMRWD300 ) ? "Claim reward - 300 Accounts":"",( $total_account_reg >= 500 && !#CLAIMRWD500 ) ? "Claim reward - 500 Accounts":"",( $total_account_reg >= 1000 && !#CLAIMRWD1000 ) ? "Claim reward - 1000 Accounts":"",( $total_account_reg > 1000 && !#CLAIMRWD1001 ) ? "Claim reward - 1001 Accounts":"","Nothing")) {
  16. case 1:
  17. mes "Which one you'd like to view?";
  18. next;
  19. switch(select("50 Account registered","300 Account registered","500 Account registered","1000 Account registered","1001 Account registered")) {
  20. case 1: .@select = 50; break;
  21. case 2: .@select = 300; break;
  22. case 3: .@select = 500; break;
  23. case 4: .@select = 1000; break;
  24. case 5: .@select = 1001; break;
  25. }
  26. mes "You will get:";
  27. if ( .@select == 1001 ) {
  28. mes "~ "+ .reg1001 +" Cashpoints";
  29. close;
  30. }
  31. for (.@i = 0; .@i < getarraysize(getd(".reg"+.@select)); .@i+=2)
  32. mes "~ "+ getd(".reg"+.@select+"["+(.@i+1)+"]") +" "+ getitemname(getd(".reg"+.@select+"["+.@i+"]"));
  33. close;
  34.  
  35. case 2: callsub OnGetItem, 50; break;
  36. case 3: callsub OnGetItem, 300; break;
  37. case 4: callsub OnGetItem, 500; break;
  38. case 5: callsub OnGetItem, 1000; break;
  39. case 6: callsub OnGetItem, 1001; break;
  40. default:
  41. close;
  42. }
  43. close;
  44.  
  45. OnGetItem:
  46. .@var = getarg(0);
  47. if ( getd("$"+ .@var +"_"+ .@unique_id$) && .gepard ) {
  48. mes "You've claimed your reward with another account.";
  49. close;
  50. }
  51. if ( .@var == 1001 ) {
  52. #CASHPOINTS += getd(".reg"+.@var+"[0]");
  53. dispbottom "You received "+ getd(".reg"+.@var+"[0]") +" Cashpoints. Total : "+ #CASHPOINTS +" Cashpoints.";
  54. } else {
  55. for (.@i = 0; .@i < getarraysize(getd(".reg"+.@var)); .@i+=2)
  56. getitem getd(".reg"+.@var+"["+.@i+"]"), getd(".reg"+.@var+"["+(.@i+1)+"]");
  57. }
  58. mes "Here you go!";
  59. set getd("#CLAIMRWD"+.@var), 1;
  60. if ( .gepard ) setd "$"+ .@var +"_"+ .@unique_id$, 1;
  61. close;
  62.  
  63. OnInit:
  64. // If you want to use Gepard Last Unique ID,
  65. // set to true.. If just the IP, set to false.
  66. .gepard = true;
  67.  
  68. if ( .gepard ) .tbl$ = "last_unique_id"; else .tbl$ = "last_ip" ;
  69.  
  70. query_sql("SELECT COUNT(DISTINCT `"+.tbl$+"`) FROM `login`", .@c );
  71.  
  72. if ( .@c > $total_account_reg ) $total_account_reg = .@c;
  73.  
  74. waitingroom "Current Accounts Registered: "+ $total_account_reg, 0;
  75.  
  76. // Item rewards
  77. setarray .reg50, // 50 accounts
  78. 16268,1, // ELITE_BOX_SUPPLY
  79. 12103,1, // ADV_FIELD_MANUAL
  80. 42088,10; // BUBBLE_GUM
  81. setarray .reg300, // 300 accounts
  82. 16268,1, // ELITE_BOX_SUPPLY
  83. 13550,10, // ADV_FIELD_MANUAL
  84. 17162,1, // BUBBLE_GUM
  85. 13710,1; // INSURANCE
  86. setarray .reg500, // 500 accounts
  87. 42088,10, // RESET_STONE???? Check ID
  88. 12103,5, // NEUTRALIZER???? Check ID
  89. 16268,1, // ELITE_BOX_SUPPLY
  90. 13550,10; // HE_MANUAL
  91. setarray .reg1000, // 1000 accounts
  92. 6320,5, // RESET_STONE???? Check ID
  93. 16268,2, // NEUTRALIZER???? Check ID
  94. 12103,5, // ELITE_BOX_SUPPLY
  95. 42088,20; // HE_MANUAL
  96. setarray .reg1001, // 1001 accounts
  97. 5888; // CASHPOINTS
  98. end;
  99. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement