Advertisement
BOMBER1337

Casino / Blackjack

May 27th, 2013
125
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.28 KB | None | 0 0
  1. #include <a_samp>
  2. #include <sscanf2>
  3. #include <zcmd>
  4.  
  5. new Einsatz;
  6. new GZahl[MAX_PLAYERS];
  7. new Verloren[MAX_PLAYERS];
  8. new Stand[MAX_PLAYERS];
  9. new DZahl=10;
  10. new IsInBj[MAX_PLAYERS];
  11.  
  12. public OnFilterScriptInit()
  13. {
  14.     print(" ");
  15.     print("\t\t******************");
  16.     print("\t\t*  [BLACKJACK]   *");
  17.     print("\t\t*  Version 1.0   *");
  18.     print("\t\t*  Script von:   *");
  19.     print("\t\t*    BOMBER      *");
  20.     print("\t\t*  CasinoSystem  *");
  21.     print("\t\t******************");
  22.     print(" ");
  23.     return 1;
  24. }
  25. CMD:playbj(playerid,params[])
  26. {
  27.     if(IsInBj[playerid] == 1)return SendClientMessage(playerid,-1,"Du spielst bereits Blackjack!");
  28.     IsInBj[playerid] = 1;
  29.     Verloren[playerid] = playerid;
  30.     new str[128];
  31.     if(sscanf(params,"i",Einsatz))return SendClientMessage(playerid,-1,"Nutze: /PlayBj <EINSATZ$>");
  32.     if(GetPlayerMoney(playerid) < Einsatz)return SendClientMessage(playerid,-1,"Nicht genügend Geld!");
  33.     new RZahl = random(11);
  34.     GZahl[playerid] = RZahl;
  35.     format(str,sizeof(str), "Deine Zahl ist: %d Tippe /Hit um weiterzuspielen oder /Stand um stehen zu bleiben",RZahl);
  36.     SendClientMessage(playerid,-1,str);
  37.     return 1;
  38. }
  39. CMD:hit(playerid,params[])
  40. {
  41.     if(IsInBj[playerid] == 0)return SendClientMessage(playerid,-1,"Nutze zuerst: /Playbj <EINSATZ$>");
  42.     new str[128];
  43.     new RZahl=random(11);
  44.     GZahl[playerid]+=RZahl;
  45.     if(GZahl[playerid] > 21)return SendClientMessage(playerid,-1,"Du hast verloren. - Deine Zahl war {FF0000}größer{FFFFFF} als 21!"),GivePlayerMoney(playerid,-Einsatz),IsInBj[playerid]=0;
  46.     format(str,sizeof(str), "Deine Zahl ist: %d Tippe /Hit um weiterzuspielen oder /Stand um stehen zu bleiben",GZahl[playerid]);
  47.     SendClientMessage(playerid,-1,str);
  48.     if(GZahl[playerid] == 21)
  49.     {
  50.         GivePlayerMoney(playerid,Einsatz*2);
  51.         SendClientMessage(playerid,-1,"{00FF00}[BLACKJACK]{FFFFFF} - Du hast den doppelten Einsatz zurückgewonnen!");
  52.     }
  53.     return 1;
  54. }
  55. CMD:stand(playerid,params[])
  56. {
  57.     if(IsInBj[playerid] == 0)return SendClientMessage(playerid,-1,"Nutze zuerst: /Playbj <EINSATZ$>");
  58.     if(Stand[playerid] == 1)return SendClientMessage(playerid,-1,"Du bist erst stehen gebleiben, warte auf den Dealer!");
  59.     Stand[playerid]=1;
  60.     SetTimerEx("Dealer",5000,false,"i",playerid);
  61.     SendClientMessage(playerid,-1,"Warte auf {FF0000}Dealer...");
  62.     return 1;
  63. }
  64. forward Dealer(playerid);
  65. public Dealer(playerid)
  66. {
  67.     new RZahl=random(11);
  68.     DZahl += RZahl;
  69.     if(GZahl[playerid] < DZahl)
  70.     {
  71.         SendClientMessage(Verloren[playerid],-1,"Der Dealer hatte eine höhere Zahl als du! - Du hast {FF0000}verloren!");
  72.         GivePlayerMoney(Verloren[playerid],-Einsatz);
  73.         IsInBj[playerid] = 0;
  74.         Stand[playerid] = 0;
  75.     }
  76.     else if(GZahl[playerid] > DZahl && GZahl[playerid] < 21)
  77.     {
  78.         GivePlayerMoney(playerid,Einsatz);
  79.         SendClientMessage(playerid,-1,"Deine Zahl war größer als die des Dealers. - Du hast {00FF00}gewonnen!");
  80.         IsInBj[playerid] = 0;
  81.         Stand[playerid] = 0;
  82.     }
  83. }
  84. __________________________________________________________________________________________________________
  85. //Playsystem.
  86. #include <a_samp>
  87. #include <zcmd>
  88. #include <sscanf2>
  89.  
  90. #define SPIELKOSTEN 50
  91. #define JP 250
  92. new JACKPOT = SPIELKOSTEN;
  93.  
  94. CMD:play(playerid,params[])
  95. {
  96.     if(GetPlayerMoney(playerid) < SPIELKOSTEN)return SendClientMessage(playerid,-1,"Nicht genügend Geld!");
  97.     GivePlayerMoney(playerid,-SPIELKOSTEN);
  98.     new RZahl1 = random(6);
  99.     new RZahl2 = random(6);
  100.     new RZahl3 = random(6);
  101.     JACKPOT += SPIELKOSTEN;
  102.     new str[128];
  103.     if(RZahl1  == 1 && RZahl2 == 1 && RZahl3 == 1 || RZahl1 == 2 && RZahl2 == 2 && RZahl3 == 2 || RZahl1 == 3 && RZahl2 == 3 && RZahl3 == 3 ||RZahl1 == 4 && RZahl2 ==4 && RZahl3 == 4|| RZahl1 == 5 && RZahl2 == 5 && RZahl3 == 5|| RZahl1 == 6 && RZahl2 == 6 && RZahl3 == 6)
  104.     {
  105.         format(str,sizeof(str), "Du hast %d$ gewonnen! Deine Zahl: {00FF00} [%d] [%d] [%d]",JACKPOT,RZahl1,RZahl2,RZahl3);
  106.         GivePlayerMoney(playerid,JACKPOT);
  107.         SendClientMessage(playerid,-1,str);
  108.         JACKPOT = 0;
  109.     }
  110.     else
  111.     {
  112.         format(str,sizeof(str), "Du hast leider nichts gewonnen. - {00FF00}[%d] [%d] [%d]",RZahl1,RZahl2,RZahl3);
  113.         SendClientMessage(playerid,-1,str);
  114.     }
  115.     return 1;
  116. }
  117. CMD:jackpot(playerid,params[])
  118. {
  119.     new str[128];
  120.     format(str,sizeof(str), "Es befinden sich derzeit: %d$ im Jackpot!",JACKPOT);
  121.     ShowPlayerDialog(playerid,JP,DIALOG_STYLE_MSGBOX, "Jackpot",str, "OK", "");
  122.     return 1;
  123. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement