private bool PlaceBet(){
var res = DiceWebAPI.PlaceBet(Session, decimal.Parse("-0.00000100"), 0, 499499, 333, Currency);
if (!res.Success) { return false; }
string s= res.Secret.ToString();
string b= Session[Currency].Balance.ToString("0.00000000");
return true;
}
Topic: [Help needed] 999dice.com bet bot (Api problems) [VB.net] (Read 1029 times)
//C# code
private void BetComplete(IAsyncResult ar) {
}
private void PlaceBet(){
IAsyncResult res1 = DiceWebAPI.BeginPlaceBet(Session, decimal.Parse("-0.01000000"), 0, 499499, 333, Currency, BetComplete, null);
while (!res1.IsCompleted)
{
Thread.Sleep(1);
}
var res2 = DiceWebAPI.EndPlaceBet(res1);
if (!res2.Success) { MessageBox.Show("error1"); return; }
var s = res2.Secret;
}
private void BetComplete(IAsyncResult ar) {
}
private void PlaceBet(){
IAsyncResult res1 = DiceWebAPI.BeginPlaceBet(Session, decimal.Parse("-0.01000000"), 0, 499499, 333, Currency, BetComplete, null);
while (!res1.IsCompleted)
{
Thread.Sleep(1);
}
var res2 = DiceWebAPI.EndPlaceBet(res1);
if (!res2.Success) { MessageBox.Show("error1"); return; }
var s = res2.Secret;
}
so here is my problem...
i just can't figure out how to start betting
some help maybe?
i just can't figure out how to start betting
Code:
Try
Dim callBack As System.AsyncCallback
Dim bet As Dice.Client.Web.PlaceBetResponse = DiceWebAPI.BeginPlaceBet(send.Session, payin, 0, 499499, Rnd(), Currencies.Doge, callBack, Nothing)
MsgBox(bet.Success)
While bet.Success = False
End While
If bet.Success = True Then
InputBox("", "", bet.BetId)
Process.Start("https://www.999dice.com/Bets/?b=" & bet.BetId)
payout = (bet.PayOut - Math.Round((My.Settings.balance * 1000000) / 100000))
MsgBox("Bet payin: " & payin & vbNewLine & "Payout: " & bet.PayOut)
profit_text = profit_text + (bet.PayOut - payin)
profit.Text = "Profit: " & profit_text
End If
Catch ex As Exception
MsgBox(ex.Message)
End Try
some help maybe?
Jump to: