yuhsing

Untitled

Jun 5th, 2013
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.96 KB | None | 0 0
  1.  
  2.  
  3. prontera,111,181,5 script Roulette 757,{
  4. mes "You want to play ^FF0000Rock,Paper,Scissor^000000 Game with me ?";
  5. mes "You can gain some surprising Reward if you beat me ^FF0000"+.Win+" out of "+.Round+"^000000 game";
  6. if( select("YES:NO") == 1 ){
  7. for( set .@r,0; .@r < .Round; set .@r,.@r + 1 ){
  8. next;
  9. mes "Round : ^FF0000"+( .@r + 1 )+" / "+.Round+"^000000";
  10. set .@Choice,select(" ~ ROCK: ~ PAPER: ~ SCISSOR");
  11. if( .@Choice == rand(1,3) ){
  12. mes "You WIN !!";
  13. set .@Win,.@Win + 1;
  14. }else{
  15. mes "You LOSE !!";
  16. }
  17. }
  18. mes "Your Total Win : ^FF0000"+.@Win+" out of "+.Round+"^000000 game";
  19. if( .@Win >= .Win ){
  20. set .@RPS,rand( .item_size );
  21. getitem .Item[.@RPS],.Count[.@RPS];
  22. }
  23. }
  24. close;
  25.  
  26. OnInit:
  27. // Required Winning Rounds
  28. set .Win,8;
  29. // Maximum Game Round
  30. set .Round,10;
  31.  
  32. // Rewards + Amounts
  33. setarray .Item,501,502,503,504,505,506,507;
  34. setarray .Count,1,2,3,4,5,6,7;
  35. set .item_size,getarraysize(.Item);
  36. end;
  37. }
Add Comment
Please, Sign In to add comment