newbi problem

[laffo16]

dim $cash, $leavetablechips

$cash = InputBox("Question", "Enter table with (X) cash", 10, "", 240, 124)
if @error = 1 Then
    Exit
EndIf

$leavetablechips = InputBox("Question", "Leave table if chips are less then (X)", 7, "", 240, 124)
if @error = 1 Then
    Exit
EndIf

if $leavetablechips > $cash Then
    MsgBox(0, "error - exit launch", "chips brought to table are less then leave table chip count.")
    MsgBox(0, "", "if " & $leavetablechips & " > " & $cash & " then exit")
    Exit
EndIf

i dont understand why i'm getting the msgbox pop up error when i run this. If 7 > 10 then msgsbox & exit. for some reason i dont understand i'm getting the msgbox & exit.

however when if i use this code:

dim $cash, $leavetablechips

$cash = 10
$leavetablechips = 7

if $leavetablechips > $cash Then
    MsgBox(0, "error - exit launch", "chips brought to table are less then leave table chip count.")
    MsgBox(0, "", "if " & $leavetablechips & " > " & $cash & " then exit")
    Exit
EndIf

it works fine. where am i going wrong? thank you

[Gigglestick]

Side note... WTF is a "newbi"? Multiple Newbies?

[Jos]

dim $cash, $leavetablechips

$cash = 10
$leavetablechips = 7

if $leavetablechips > $cash Then
    MsgBox(0, "error - exit launch", "chips brought to table are less then leave table chip count.")
    MsgBox(0, "", "if " & $leavetablechips & " > " & $cash & " then exit")
    Exit
EndIf

it works fine. where am i going wrong? thank you

YOu are doing an Alphanumeric test which compares characters ...not values:

dim $cash, $leavetablechips

$cash = "10"
$leavetablechips = "7"

if $leavetablechips > $cash Then
    MsgBox(0, "error - exit launch", "chips brought to table are less then leave table chip count.")
    MsgBox(0, "", "if " & $leavetablechips & " > " & $cash & " then exit")
    Exit
EndIf

Use Number() to convert the typed characters to a real value

Edited October 6, 2006 by JdeB

[cppman]

Side note... WTF is a "newbi"? Multiple Newbies?

hahah.. "newbi"..

*cough* anyways..

Just like Jdeb said, but i took to long to reply

Global $cash, $leavetablechips

$cash = Int(InputBox("Question", "Enter table with (X) cash", 10))
if @error = 1 Then
    Exit
EndIf

$leavetablechips = Int(InputBox("Question", "Leave table if chips are less then (X)", 7))
if @error = 1 Then
    Exit
EndIf

if $leavetablechips > $cash Then
    MsgBox(0, "error - exit launch", "chips brought to table are less then leave table chip count.")
    MsgBox(0, "", "if " & $leavetablechips & " > " & $cash & " then exit")
    Exit
EndIf

Edited October 6, 2006 by CHRIS95219

[laffo16]

thank u