Advertisement
Guest User

dice

a guest
Jan 16th, 2017
84
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.85 KB | None | 0 0
  1. @echo off
  2. title Dice
  3. MODE CON COLS=40 LINES=10
  4.  
  5. :run
  6. color E0
  7. cls
  8. echo Enter starting cash
  9. set /p start=
  10. if /i %start% gtr 32767 goto error
  11. if /i %start% lss 1 goto error
  12.  
  13. :setbetamount
  14. color E0
  15. cls
  16. echo Enter betting amount
  17. set /p betamount=
  18.  
  19. :begin
  20. set /a swag= %random% %% 100 +1
  21. set /a swag= %random%
  22. cls
  23. echo Rolling
  24. ping 1.1.1.1 -n 1 -w 500> nul
  25. cls
  26. echo Rolling.
  27. ping 1.1.1.1 -n 1 -w 500> nul
  28. cls
  29. echo Rolling..
  30. ping 1.1.1.1 -n 1 -w 500> nul
  31. cls
  32. echo Rolling...
  33. ping 1.1.1.1 -n 1 -w 500> nul
  34. cls
  35. echo You rolled a %swag%
  36. if %swag% GTR 51 goto win
  37. else
  38. :lose
  39. echo You lose.
  40. echo Better luck next time!
  41. pause>nul
  42. goto run
  43.  
  44.  
  45.  
  46.  
  47.  
  48.  
  49.  
  50.  
  51.  
  52.  
  53.  
  54. :win
  55. color 27
  56. echo You win!
  57. echo Congratulations!
  58. pause>nul
  59. goto run
  60.  
  61.  
  62. :error
  63. cls
  64. color 47
  65. echo Number is not between 1 and 32767.
  66. ping localhost -n >nul 2
  67. goto start
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement