yuhsing

Untitled

Dec 6th, 2012
49
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.17 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. OnMinute00:
  37. .round = 0;
  38. OnPrepare:
  39. .status = 1;
  40. deletearray .gambler$;
  41. deletearray .bet_selected;
  42. for( .@i = 3; .@i > 0; .@i-- ){
  43. announce "Roulette Game is about to start within "+.@i+" Minutes...please register yourself and place the bet..",0;
  44. sleep 60000;
  45. }
  46. .status = 2;
  47. npctalk "Okay..Bet Disabled..start Rolling..";
  48. donpcevent strnpcinfo(0)+"::OnStart";
  49. end;
  50.  
  51. OnStart:
  52. initnpctimer;
  53. emotion e_go;
  54. announce "** Roulette started **",0;
  55. while( 1 ){
  56. .@timer = getnpctimer(0);
  57.  
  58. if( .i++ > .@wheel_size ) .i = 0;
  59. delwaitingroom;
  60. waitingroom " Rolled : "+.roulette_wheel[.i]+" ",0;
  61. sleep( .@timer / 50 ) + 1;
  62. if( .@timer >= .max_roll_second ) break;
  63. }
  64. stopnpctimer;
  65. emotion e_grat;
  66. announce "The Rolled Number is... * "+.roulette_wheel[.i]+" *",0;
  67. .status = 0;
  68. sleep 5000;
  69. delwaitingroom;
  70. if( .round++ <= .max_round ) donpcevent strnpcinfo(0)+"::OnPrepare";
  71. end;
  72.  
  73. // return calculated Payout value ...
  74. function getPayout {
  75. switch( getarg(0) ){
  76. Case 0:
  77. Case 1:
  78. Case 2:
  79. Case 3:
  80. Case 4:
  81. Case 5:
  82. Case 6:
  83. Case 7:
  84. Case 8:
  85. Case 9:
  86. Case 10:
  87. Case 11:
  88. Case 12:
  89. Case 13:
  90. Case 14:
  91. Case 15:
  92. Case 16:
  93. Case 17:
  94. Case 18:
  95. Case 19:
  96. }
  97. return;
  98. }
Advertisement
Add Comment
Please, Sign In to add comment