yuhsing

Untitled

Dec 6th, 2012
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.19 KB | None | 0 0
  1.  
  2.  
  3. prontera,155,181,5 script Sample#time 757,{
  4. function getPayout;
  5.  
  6.  
  7. if( !.Status ){
  8. mes "Roulette is 1 type of casino game.";
  9. }else if( .Status == 2 ){
  10. mes "Please wait for the result ... ";
  11. }else{
  12. mes "Register ?";
  13. if( select("Yes:No") == 1 ){
  14. mes "Please select your bet...";
  15.  
  16. .@size = getarraysize( .gambler$ );
  17.  
  18. .bet_selected[ .@size ] = select( implode( .bet_name$,":" ) ) - 1;
  19. .gambler$[ .@size ] = strcharinfo(0);
  20.  
  21. mes "You have selected "+.bet_name$[ .bet_selected[.@i] ]+" bet.";
  22. }
  23. }
  24. close;
  25.  
  26. OnInit:
  27. .max_roll_second = 20;
  28. .max_round = 5;
  29.  
  30.  
  31. setarray .bet_name$[0],"0","Straight Up","Basket","Street","Corner","Top Line","Six Line","1st Column","2nd Column","3rd Column","1st Dozen","2nd Dozen","3rd Dozen","Odd","Even","Red","Black","1 to 18","19 to 36";
  32. setarray .roulette_wheel[0],0,32,15,19,4,21,2,25,17,34,6,27,13,36,11,30,8,23,10,5,24,16,33,1,20,14,31,9,22,18,29,7,28,12,35,3,26;
  33. .@wheel_size = getarraysize( .roulette_wheel );
  34. end;
  35.  
  36. // OnWhisperGlobal:
  37. OnMinute00:
  38. .round = 0;
  39. OnPrepare:
  40. .status = 1;
  41. deletearray .gambler$;
  42. deletearray .bet_selected;
  43. for( .@i = 3; .@i > 0; .@i-- ){
  44. announce "Roulette Game is about to start within "+.@i+" Minutes...please register yourself and place the bet..",0;
  45. sleep 60000;
  46. }
  47. .status = 2;
  48. npctalk "Okay..Bet Disabled..start Rolling..";
  49. donpcevent strnpcinfo(0)+"::OnStart";
  50. end;
  51.  
  52. OnStart:
  53. initnpctimer;
  54. emotion e_go;
  55. announce "** Roulette started **",0;
  56. while( 1 ){
  57. .@timer = getnpctimer(0);
  58.  
  59. if( .i++ > .@wheel_size ) .i = 0;
  60. delwaitingroom;
  61. waitingroom " Rolled : "+.roulette_wheel[.i]+" ",0;
  62. sleep( .@timer / 50 ) + 1;
  63. if( .@timer >= .max_roll_second ) break;
  64. }
  65. stopnpctimer;
  66. emotion e_grat;
  67. announce "The Rolled Number is... * "+.roulette_wheel[.i]+" *",0;
  68. .status = 0;
  69. sleep 5000;
  70. delwaitingroom;
  71. if( .round++ <= .max_round ) donpcevent strnpcinfo(0)+"::OnPrepare";
  72. end;
  73.  
  74. // return calculated Payout value ...
  75. function getPayout {
  76. switch( getarg(0) ){
  77. Case 0:
  78. Case 1:
  79. Case 2:
  80. Case 3:
  81. Case 4:
  82. Case 5:
  83. Case 6:
  84. Case 7:
  85. Case 8:
  86. Case 9:
  87. Case 10:
  88. Case 11:
  89. Case 12:
  90. Case 13:
  91. Case 14:
  92. Case 15:
  93. Case 16:
  94. Case 17:
  95. Case 18:
  96. Case 19:
  97. }
  98. return;
  99. }
Advertisement
Add Comment
Please, Sign In to add comment