Sign in to follow this  
Followers 0
jbh5000

Help with Nesting IF, While, ETC....

3 posts in this topic

#1 ·  Posted (edited)

I am fairly new to this, but have figured most of it out on my own.

I am having a problem with nesting some functions. It seems the first function that is nested is executed, but it never makes it to the next function.

Any sugesstions or erros that you may see would be appreciated.

Thanks

HotKeySet ( "{PAUSE}", "stop" )

$numberoftables = InputBox("Question", "How Many Tables Do You Want to Play? The Max is 16", "12", "", _
    -1, -1, 0, 0)
startftp()
Sleep (15000)
Global $slot1 = 0,$slot2 = 0,$slot3 = 0,$slot4 = 0,$slot5 = 0,$slot6 = 0,$slot7 = 0,$slot8 = 0,$slot9 = 0,$slot10 = 0,$slot11 = 0,$slot12 = 0,$slot13 = 0,$slot14 = 0,$slot15 = 0,$slot16 = 0, $tableX=1330,$tableY=0, $seated1X=0, $seated1Y=0,$sitdown1X=0,$sitdown1Y=0,  $seated2X=0,$seated2Y=0,$sitdown2X=0,$sitdown2Y=0,  $seated3X=0,$seated3Y=0,$sitdown3X=0,$sitdown3Y=0,  $seated4X=0,$seated4Y=0,$sitdown4X=0,$sitdown4Y=0, $seated5X=0,$seated5Y=0,$sitdown5X=0,$sitdown5Y=0,   $seated6X=0,$seated6Y=0,$sitdown6X=0,$sitdown6Y=0, $seated7X=0,$seated7Y=0,$sitdown7X=0,$sitdown7Y=0, $seated8X=0,$seated8Y=0,$sitdown8X=0,$sitdown8Y=0, $seated9X=0,$seated9Y=0,$sitdown9X=0,$sitdown9Y=0, $seattakenpopupX=0,$seattakenpopupY=0, $seattakenpopupcloseX=0,$seattakenpopupcloseY=0,$tablecloseX=0, $tablecloseY=0,  $buyinopenX=0,$buyinopenY=0,    $buyinX=0,$buyinY=0

IF countopentables()<$numberoftables Then

While  countopentables()<$numberoftables
        setopentables()
    
        If $slot1=0 Then
            While $slot1=0
            slot1monitor()
            WEnd
        EndIf
        If $slot2=0 Then
            While $slot2=0
            slot1monitor()
            WEnd
        EndIf
            If $slot3=0 Then
            While $slot3=0
            slot1monitor()
            WEnd
        EndIf
        If $slot4=0 Then
            While $slot4=0
            slot1monitor()
            WEnd
        EndIf
        If $slot5=0 Then
            While $slot5=0
            slot1monitor()
            WEnd
        EndIf
        If $slot6=0 Then
            While $slot6=0
            slot1monitor()
            WEnd
        EndIf
        If $slot7=0 Then
            While $slot7=0
            slot1monitor()
            WEnd
        EndIf
        If $slot8=0 Then
            While $slot8=0
            slot1monitor()
            WEnd
        EndIf
        If $slot9=0 Then
            While $slot9=0
            slot1monitor()
            WEnd
        EndIf
        If $slot10=0 Then
            While $slot10=0
            slot1monitor()
            WEnd
        EndIf
        If $slot11=0 Then
            While $slot11=0
            slot1monitor()
            WEnd
        EndIf
        If $slot12=0 Then
            While $slot12=0
            slot1monitor()
            WEnd
        EndIf
    
    
    opentable()
    Sleep (10000)
WEnd

EndIf







Func countopentables()
    
    $openwindowsarray = WinList()
$tableOpened=0
For $i = 1 to $openwindowsarray[0][0]
    $title="No Limit"      
    $result1 = StringInStr($openwindowsarray[$i][0], "No Limit")
    if ($result1 >0) Then
        $tableOpened=$tableOpened+1
    EndIf
    Next
Return $tableOpened

EndFunc


Func startftp()
    Run ("C:\Documents and Settings\XXXXXX.exe")

Sleep (10000)
Send ("{Enter}")

Sleep (3000)

WinMove ( "Full Tilt Poker -", "", 0, 0,200,200)

EndFunc

Func opentable()
    Sleep (1500)
    Sleep (1500)
    MouseClick("left", 290, 340, 3)
EndFunc

Func setopentables()
    If PixelGetColor (1330, 180)=0x004E98 Then
         Global $slot1=0
     Else
        Global $slot1=1 
    EndIf
    If PixelGetColor (1810, 190)=0x004E98 Then
         Global $slot2=0
         Else
        Global $slot2=1 
         
    EndIf
    If PixelGetColor (2300, 180)=0x004E98 Then
         Global $slot3=0
         Else
        Global $slot3=1 
    EndIf
    If PixelGetColor (2770, 180)=0x004E98 Then
         Global $slot4=0
         Else
        Global $slot4=1 
    EndIf
    If PixelGetColor (1314, 550)=0x004E98 Then
         Global $slot5=0
         Else
        Global $slot5=1 
    EndIf
    If PixelGetColor (1800, 545)=0x004E98 Then
         Global $slot6=0
         Else
        Global $slot6=1 
    EndIf
    If PixelGetColor (2300, 540)=0x004E98 Then
         Global $slot7=0
         Else
        Global $slot7=1 
    EndIf
    If PixelGetColor (2780, 538)=0x004E98 Then
         Global $slot8=0
         Else
        Global $slot8=1 
    EndIf
    If PixelGetColor (1335, 896)=0x004E98 Then
         Global $slot9=0
         Else
        Global $slot9=1 
    EndIf
    If PixelGetColor (1820, 895)=0x004E98 Then
         Global $slot10=0
         Else
        Global $slot10=1    
    EndIf
    If PixelGetColor (2293, 894)=0x004E98 Then
         Global $slot11=0
         Else
        Global $slot11=1    
    EndIf
    If PixelGetColor (2774, 897)=0x004E98 Then
         Global $slot12=0
         Else
        Global $slot12=1    
    EndIf
    If PixelGetColor (0, 0)=0x004E98 Then
         Global $slot13=0
         Else
        Global $slot13=1    
    EndIf
    If PixelGetColor (0, 0)=0x004E98 Then
         Global $slot14=0
         Else
        Global $slot14=1    
    EndIf
    If PixelGetColor (0, 0)=0x004E98 Then
         Global $slot15=0
         Else
        Global $slot15=1    
    EndIf
    If PixelGetColor (0, 0)=0x004E98 Then
         Global $slot16=0
         Else
        Global $slot16=1    
    EndIf
EndFunc

Func slot1monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1330, 180)<>0x004E98
    
    IF PixelGetColor (1330, 180)<>0x004E98 Then
            $tableX=1330 
            $tableY=180
            $seated1X=1353
            $seated1Y=059
            $sitdown1X=1337
            $sitdown1Y=55
            $seated2X=1465
            $seated2Y=105
            $sitdown2X=1445
            $sitdown2Y=103
            $seated3X=1486
            $seated3Y=197
            $sitdown3X=1465
            $sitdown3Y=190
            $seated4X=1395
            $seated4Y=257
            $sitdown4X=1376
            $sitdown4Y=252
            $seated5X=1286
            $seated5Y=274
            $sitdown5X=1266
            $sitdown5Y=271
            $seated6X=1167
            $seated6Y=260
            $sitdown6X=1148
            $sitdown6Y=256
            $seated7X=1083
            $seated7Y=197
            $sitdown7X=1060
            $sitdown7Y=190
            $seated8X=1097
            $seated8Y=103
            $sitdow8X=1081
            $sitdown8Y=100
            $seated9X=1210
            $seated9Y=060
            $sitdown9X=1191
            $sitdown9Y=54
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=1488
            $tablecloseY=-22    
            $buyinopenX=1380
            $buyinopenY=300
            $buyinX=1225
            $buyinY=308     
            
        Sleep (500)
        sitdown()
        
            Sleep (5000)
            table1sitoutconfirm()
            
            
    EndIf       
EndFunc

Func tbl1sitout()
    While PixelGetColor (1330, 180)<>0x004E98
            table1sitoutconfirm()
            Sleep (500)
            WEnd
    EndFunc



Func slot2monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1810, 190)<>0x004E98   
    IF PixelGetColor (1810, 190)<>0x004E98 Then
            $tableX=1810
            $tableY=190
            $seated1X=1840
            $seated1Y=059
            $sitdown1X=1818
            $sitdown1Y=054
            $seated2X=1949
            $seated2Y=103
            $sitdown2X=1925
            $sitdown2Y=100
            $seated3X=1968
            $seated3Y=195
            $sitdown3X=1950
            $sitdown3Y=190
            $seated4X=1628
            $seated4Y=257
            $sitdown4X=1858
            $sitdown4Y=254
            $seated5X=1758
            $seated5Y=274
            $sitdown5X=1745
            $sitdown5Y=271
            $seated6X=1648
            $seated6Y=256
            $sitdown6X=1631
            $sitdown6Y=255
            $seated7X=1567
            $seated7Y=194
            $sitdown7X=1540
            $sitdown7Y=191
            $seated8X=1581
            $seated8Y=105
            $sitdow8X=1560
            $sitdown8Y=098
            $seated9X=1688
            $seated9Y=057
            $sitdown9X=1669
            $sitdown9Y=057
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=1973
            $tablecloseY=-24
            $buyinopenX=1850
            $buyinopenY=300
            $buyinX=1705
            $buyinY=310
            
            Sleep (500)
            sitdown()
            While PixelGetColor (1810, 190)<>0x004E98
            table2sitoutconfirm()
            Sleep (500)
            WEnd
    EndIf       
EndFunc
Func slot3monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2300, 180)<>0x004E98
    
    IF PixelGetColor (2300, 180)<>0x004E98 Then
            $tableX=2300
            $tableY=190
            $seated1X=2316
            $seated1Y=060
            $sitdown1X=2302
            $sitdown1Y=053
            $seated2X=2426
            $seated2Y=105
            $sitdown2X=2406
            $sitdown2Y=103
            $seated3X=2446
            $seated3Y=196
            $sitdown3X=2425
            $sitdown3Y=1902
            $seated4X=2357
            $seated4Y=257
            $sitdown4X=2336
            $sitdown4Y=253
            $seated5X=2247
            $seated5Y=273
            $sitdown5X=2223
            $sitdown5Y=273
            $seated6X=2127
            $seated6Y=260
            $sitdown6X=2104
            $sitdown6Y=257
            $seated7X=2044
            $seated7Y=197
            $sitdown7X=2017
            $sitdown7Y=190
            $seated8X=2061
            $seated8Y=105
            $sitdow8X=2038
            $sitdown8Y=101
            $seated9X=2166
            $seated9Y=058
            $sitdown9X=2149
            $sitdown9Y=057
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=2447
            $tablecloseY=-22
            $buyinopenX=2330
            $buyinopenY=308
            $buyinX=2179
            $buyinY=308
            
            Sleep (500)     
            sitdown()
            While PixelGetColor (2300, 180)<>0x004E98
            table3sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf       
EndFunc
Func slot4monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2770, 180)<>0x004E98
    
    IF PixelGetColor (2770, 180)<>0x004E98 Then
            $tableX=2770
            $tableY=180
            $seated1X=2801
            $seated1Y=060
            $sitdown1X=2782
            $sitdown1Y=053
            $seated2X=2906
            $seated2Y=105
            $sitdown2X=2886
            $sitdown2Y=100
            $seated3X=2922
            $seated3Y=195
            $sitdown3X=2904
            $sitdown3Y=190
            $seated4X=2841
            $seated4Y=259
            $sitdown4X=2818
            $sitdown4Y=254
            $seated5X=2725
            $seated5Y=273
            $sitdown5X=2705
            $sitdown5Y=268
            $seated6X=2609
            $seated6Y=261
            $sitdown6X=2588
            $sitdown6Y=256
            $seated7X=2521
            $seated7Y=196
            $sitdown7X=2502
            $sitdown7Y=195
            $seated8X=2540
            $seated8Y=103
            $sitdow8X=2523
            $sitdown8Y=103
            $seated9X=2649
            $seated9Y=058
            $sitdown9X=2629
            $sitdown9Y=054
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=2928
            $tablecloseY=-24
            $buyinopenX=2808
            $buyinopenY=302
            $buyinX=2661
            $buyinY=307
            
            Sleep (500)         
            sitdown()
            While PixelGetColor (2770, 180)<>0x004E98
            table4sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf
EndFunc
Func slot5monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1314, 550)<>0x004E98
    
    IF PixelGetColor (1314, 550)<>0x004E98 Then
            $tableX=1314
            $tableY=550
            $seated1X=1361
            $seated1Y=419
            $sitdown1X=1340
            $sitdown1Y=408
            $seated2X=1465
            $seated2Y=464
            $sitdown2X=1448
            $sitdown2Y=463
            $seated3X=1485
            $seated3Y=556
            $sitdown3X=1465
            $sitdown3Y=550
            $seated4X=1400
            $seated4Y=620
            $sitdown4X=1376
            $sitdown4Y=609
            $seated5X=1286
            $seated5Y=632
            $sitdown5X=1263
            $sitdown5Y=631
            $seated6X=1167
            $seated6Y=617
            $sitdown6X=1145
            $sitdown6Y=611
            $seated7X=1083
            $seated7Y=551
            $sitdown7X=1064
            $sitdown7Y=551
            $seated8X=1100
            $seated8Y=463
            $sitdow8X=1078
            $sitdown8Y=455
            $seated9X=1208
            $seated9Y=417
            $sitdown9X=1193
            $sitdown9Y=415
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=1486
            $tablecloseY=336
            $buyinopenX=1369
            $buyinopenY=648
            $buyinX=1222
            $buyinY=650
            
            Sleep (500) 
            sitdown()
            While PixelGetColor (1314, 550)<>0x004E98
            table5sitoutconfirm()
            Sleep (500)
            WEnd
            
    EndIf       
EndFunc
Func slot6monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1800, 545)<>0x004E98
    
    IF PixelGetColor (1800, 545)<>0x004E98 Then
            $tableX=1800
            $tableY=545
            $seated1X=1836
            $seated1Y=419
            $sitdown1X=1814
            $sitdown1Y=411
            $seated2X=1946
            $seated2Y=460
            $sitdown2X=1923
            $sitdown2Y=458
            $seated3X=1966
            $seated3Y=555
            $sitdown3X=1939
            $sitdown3Y=549
            $seated4X=1880
            $seated4Y=620
            $sitdown4X=1850
            $sitdown4Y=613
            $seated5X=1765
            $seated5Y=630
            $sitdown5X=1742
            $sitdown5Y=630
            $seated6X=1650
            $seated6Y=620
            $sitdown6X=1623
            $sitdown6Y=611
            $seated7X=1563
            $seated7Y=554
            $sitdown7X=1537
            $sitdown7Y=549
            $seated8X=1576
            $seated8Y=464
            $sitdow8X=1555
            $sitdown8Y=455
            $seated9X=1688
            $seated9Y=416
            $sitdown9X=1668
            $sitdown9Y=413
            $seattakenpopupX=0
            $seattakenpopupY=0
            $seattakenpopupcloseX=0
            $seattakenpopupcloseY=0
            $tablecloseX=1966
            $tablecloseY=336
            $buyinopenX=1854
            $buyinopenY=654
            $buyinX=1700
            $buyinY=650
            
            Sleep (500) 
            sitdown()           
            While PixelGetColor (1800, 545)<>0x004E98
            table6sitoutconfirm()
            Sleep (500)
            WEnd            
            
    EndIf       
EndFunc
Func slot7monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2300, 540)<>0x004E98
    
    IF PixelGetColor (2300, 540)<>0x004E98 Then
            $tableX=2300
            $tableY=540
            $seated1X=2323
            $seated1Y=419
            $sitdown1X=2297
            $sitdown1Y=415
            $seated2X=2425
            $seated2Y=463
            $sitdown2X=2405
            $sitdown2Y=458
            $seated3X=2446
            $seated3Y=553
            $sitdown3X=2421
            $sitdown3Y=549
            $seated4X=2360
            $seated4Y=618
            $sitdown4X=2329
            $sitdown4Y=614
            $seated5X=2246
            $seated5Y=635
            $sitdown5X=2219
            $sitdown5Y=629
            $seated6X=2128
            $seated6Y=617
            $sitdown6X=2107
            $sitdown6Y=612
            $seated7X=2043
            $seated7Y=554
            $sitdown7X=2026
            $sitdown7Y=548
            $seated8X=2060
            $seated8Y=460
            $sitdow8X=2043
            $sitdown8Y=462
            $seated9X=2167
            $seated9Y=418
            $sitdown9X=2146
            $sitdown9Y=417
            $seattakenpopupX=0
            $seattakenpopupY=0
            $seattakenpopupcloseX=0
            $seattakenpopupcloseY=0
            $tablecloseX=2447
            $tablecloseY=333
            $buyinopenX=2344
            $buyinopenY=653
            $buyinX=2177
            $buyinY=647
            
            Sleep (500)         
            sitdown()
            While PixelGetColor (2300, 540)<>0x004E98
            table7sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf       
EndFunc
Func slot8monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2780, 538)<>0x004E98
    
    IF PixelGetColor (2780, 538)<>0x004E98 Then
            $tableX=2780
            $tableY=538
            $seated1X=2804
            $seated1Y=419
            $sitdown1X=2778
            $sitdown1Y=410
            $seated2X=2903
            $seated2Y=461
            $sitdown2X=2889
            $sitdown2Y=455
            $seated3X=2927
            $seated3Y=554
            $sitdown3X=2899
            $sitdown3Y=543
            $seated4X=2839
            $seated4Y=615
            $sitdown4X=2816
            $sitdown4Y=612
            $seated5X=2724
            $seated5Y=631
            $sitdown5X=2699
            $sitdown5Y=631
            $seated6X=2607
            $seated6Y=618
            $sitdown6X=2581
            $sitdown6Y=609
            $seated7X=2522
            $seated7Y=552
            $sitdown7X=2503
            $sitdown7Y=544
            $seated8X=2540
            $seated8Y=460
            $sitdow8X=2514
            $sitdown8Y=454
            $seated9X=2649
            $seated9Y=419
            $sitdown9X=2631
            $sitdown9Y=409
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=2925
            $tablecloseY=330
            $buyinopenX=2813
            $buyinopenY=651
            $buyinX=2662
            $buyinY=650
            
            Sleep (500)         
            sitdown()
            While PixelGetColor (2780, 538)<>0x004E98
            table8sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf       
EndFunc
Func slot9monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1335, 896)<>0x004E98
    
    IF PixelGetColor (1335, 896)<>0x004E98 Then
            $tableX=1335
            $tableY=896
            $seated1X=1358
            $seated1Y=777
            $sitdown1X=1336
            $sitdown1Y=770
            $seated2X=1465
            $seated2Y=823
            $sitdown2X=1441
            $sitdown2Y=810
            $seated3X=1484
            $seated3Y=914
            $sitdown3X=1460
            $sitdown3Y=906
            $seated4X=1399
            $seated4Y=978
            $sitdown4X=1376
            $sitdown4Y=967
            $seated5X=1286
            $seated5Y=992
            $sitdown5X=1260
            $sitdown5Y=975
            $seated6X=1165
            $seated6Y=976
            $sitdown6X=1150
            $sitdown6Y=969
            $seated7X=1081
            $seated7Y=912
            $sitdown7X=1056
            $sitdown7Y=904
            $seated8X=1100
            $seated8Y=821
            $sitdow8X=1076
            $sitdown8Y=814
            $seated9X=1212
            $seated9Y=778
            $sitdown9X=1182
            $sitdown9Y=771
            $seattakenpopupX= 0
            $seattakenpopupY= 0
            $seattakenpopupcloseX= 0
            $seattakenpopupcloseY= 0
            $tablecloseX=1486
            $tablecloseY=694
            $buyinopenX=1373
            $buyinopenY=1008
            $buyinX=1218
            $buyinY=996
            
            Sleep (500)         
            sitdown()
            While PixelGetColor (1335, 896)<>0x004E98
            table9sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf   
EndFunc
Func slot10monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (1820, 895)<>0x004E98
    
    IF PixelGetColor (1820, 895)<>0x004E98 Then
            $tableX=1820
            $tableY=895
            $seated1X=1838
            $seated1Y=773
            $sitdown1X=1814
            $sitdown1Y=768
            $seated2X=1944
            $seated2Y=821
            $sitdown2X=1926
            $sitdown2Y=824
            $seated3X=1966
            $seated3Y=915
            $sitdown3X=1938
            $sitdown3Y=908
            $seated4X=1877
            $seated4Y=978
            $sitdown4X=1858
            $sitdown4Y=976
            $seated5X=1766
            $seated5Y=992
            $sitdown5X=1735
            $sitdown5Y=999
            $seated6X=1644
            $seated6Y=978
            $sitdown6X=1616
            $sitdown6Y=972
            $seated7X=1563
            $seated7Y=915
            $sitdown7X=1543
            $sitdown7Y=905
            $seated8X=1579
            $seated8Y=821
            $sitdow8X=1555
            $sitdown8Y=821
            $seated9X=1687
            $seated9Y=777
            $sitdown9X=1661
            $sitdown9Y=773
            $seattakenpopupX=0
            $seattakenpopupY=0
            $seattakenpopupcloseX=0
            $seattakenpopupcloseY=0
            $tablecloseX=1968
            $tablecloseY=687
            $buyinopenX=1867
            $buyinopenY=1024
            $buyinX=1696
            $buyinY=997
            
            Sleep (500)     
            sitdown()
            While PixelGetColor (1820, 895)<>0x004E98
            table10sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf   
EndFunc
Func slot11monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2293, 894)<>0x004E98
    
    IF PixelGetColor (2293, 894)<>0x004E98 Then
            $tableX=2293
            $tableY=894
            $seated1X=2320
            $seated1Y=776
            $sitdown1X=2291
            $sitdown1Y=770
            $seated2X=2427
            $seated2Y=823
            $sitdown2X=2402
            $sitdown2Y=817
            $seated3X=2442
            $seated3Y=911
            $sitdown3X=2425
            $sitdown3Y=906
            $seated4X=2359
            $seated4Y=974
            $sitdown4X=2336
            $sitdown4Y=973
            $seated5X=2247
            $seated5Y=993
            $sitdown5X=2217
            $sitdown5Y=990
            $seated6X=2129
            $seated6Y=977
            $sitdown6X=2114
            $sitdown6Y=974
            $seated7X=2044
            $seated7Y=914
            $sitdown7X=2013
            $sitdown7Y=908
            $seated8X=2064
            $seated8Y=822
            $sitdow8X=2044
            $sitdown8Y=815
            $seated9X=2168
            $seated9Y=776
            $sitdown9X=2139
            $sitdown9Y=767
            $seattakenpopupX=0
            $seattakenpopupY=0
            $seattakenpopupcloseX=0
            $seattakenpopupcloseY=0
            $tablecloseX=2445
            $tablecloseY=693
            $buyinopenX=2318
            $buyinopenY=1012
            $buyinX=2178
            $buyinY=996
            
            Sleep (500)         
            sitdown()
            While PixelGetColor (2293, 894)<>0x004E98
            table11sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf       
EndFunc
Func slot12monitor()
    Do  
        Sleep(500)
    Until PixelGetColor (2774, 897)<>0x004E98
    
    IF PixelGetColor (2774, 897)<>0x004E98 Then
            $tableX=2774
            $tableY=897
            $seated1X=2800
            $seated1Y=778
            $sitdown1X=2775
            $sitdown1Y=771
            $seated2X=2901
            $seated2Y=818
            $sitdown2X=2886
            $sitdown2Y=819
            $seated3X=2927
            $seated3Y=912
            $sitdown3X=2901
            $sitdown3Y=905
            $seated4X=2838
            $seated4Y=978
            $sitdown4X=2812
            $sitdown4Y=972
            $seated5X=2725
            $seated5Y=989
            $sitdown5X=2703
            $sitdown5Y=987
            $seated6X=2611
            $seated6Y=978
            $sitdown6X=2586
            $sitdown6Y=969
            $seated7X=2521
            $seated7Y=913
            $sitdown7X=2496
            $sitdown7Y=908
            $seated8X=2540
            $seated8Y=823
            $sitdow8X=2517
            $sitdown8Y=814
            $seated9X=2649
            $seated9Y=776
            $sitdown9X=2621
            $sitdown9Y=767
            $seattakenpopupX=0
            $seattakenpopupY=0
            $seattakenpopupcloseX=0
            $seattakenpopupcloseY=0
            $tablecloseX=2924
            $tablecloseY=690
            $buyinopenX=2816
            $buyinopenY=1024
            $buyinX=2662
            $buyinY=997
            
            Sleep (500)     
            sitdown()
            While PixelGetColor (2774, 897)<>0x004E98
            table12sitoutconfirm()
            Sleep (500)
            WEnd            
    EndIf       
EndFunc
Func slot13monitor()
    
    If PixelGetColor (1560, 230)=0x004E98 Then
        opentable() 
            If PixelGetColor (1620, 100)<>0x000000 And PixelGetColor (1620, 100)<>0xF5F5F5  Then
            MouseClick("left", 1600, 100, 1)
            ElseIf PixelGetColor (1725, 148)<>0x000000 And PixelGetColor (1725, 148)<>0xF5F5F5  Then
            MouseClick("left", 1700, 150, 1)
            ElseIf PixelGetColor (1748, 240)<>0x000000 And PixelGetColor (1748, 240)<>0xF5F5F5  Then
            MouseClick("left", 1720, 235, 1)
            ElseIf PixelGetColor (1660, 305)<>0x000000 And PixelGetColor (1660, 305)<>0xF5F5F5  Then
            MouseClick("left", 1630, 300, 1)
            ElseIf PixelGetColor (1550, 320)<>0x000000 And PixelGetColor (1550, 320)<>0xF5F5F5  Then
            MouseClick("left", 1520, 308, 1)
            ElseIf  PixelGetColor (1430, 305)<>0x000000 And PixelGetColor (1430, 305)<>0xF5F5F5 Then
            MouseClick("left", 1405, 300, 1)
            ElseIf  PixelGetColor (1340, 241)<>0x000000 And PixelGetColor (1340, 241)<>0xF5F5F5 Then
            MouseClick("left", 1320, 230, 1)
            ElseIf  PixelGetColor (1360, 150)<>0x000000 And PixelGetColor (1360, 150)<>0xF5F5F5 Then
            MouseClick("left", 1335, 140, 1)
            ElseIf  PixelGetColor (1470, 100)<>0x000000 And PixelGetColor (1470, 100)<>0xF5F5F5 Then
            MouseClick("left", 1444, 095, 1)
            EndIf
    
    EndIf

EndFunc
Func slot14monitor()
    
    If PixelGetColor (1560, 230)=0x004E98 Then
        opentable() 
            If PixelGetColor (1620, 100)<>0x000000 And PixelGetColor (1620, 100)<>0xF5F5F5  Then
            MouseClick("left", 1600, 100, 1)
            ElseIf PixelGetColor (1725, 148)<>0x000000 And PixelGetColor (1725, 148)<>0xF5F5F5  Then
            MouseClick("left", 1700, 150, 1)
            ElseIf PixelGetColor (1748, 240)<>0x000000 And PixelGetColor (1748, 240)<>0xF5F5F5  Then
            MouseClick("left", 1720, 235, 1)
            ElseIf PixelGetColor (1660, 305)<>0x000000 And PixelGetColor (1660, 305)<>0xF5F5F5  Then
            MouseClick("left", 1630, 300, 1)
            ElseIf PixelGetColor (1550, 320)<>0x000000 And PixelGetColor (1550, 320)<>0xF5F5F5  Then
            MouseClick("left", 1520, 308, 1)
            ElseIf  PixelGetColor (1430, 305)<>0x000000 And PixelGetColor (1430, 305)<>0xF5F5F5 Then
            MouseClick("left", 1405, 300, 1)
            ElseIf  PixelGetColor (1340, 241)<>0x000000 And PixelGetColor (1340, 241)<>0xF5F5F5 Then
            MouseClick("left", 1320, 230, 1)
            ElseIf  PixelGetColor (1360, 150)<>0x000000 And PixelGetColor (1360, 150)<>0xF5F5F5 Then
            MouseClick("left", 1335, 140, 1)
            ElseIf  PixelGetColor (1470, 100)<>0x000000 And PixelGetColor (1470, 100)<>0xF5F5F5 Then
            MouseClick("left", 1444, 095, 1)
            EndIf
    
    EndIf

EndFunc
Func slot15monitor()
    
    If PixelGetColor (1560, 230)=0x004E98 Then
        opentable() 
            If PixelGetColor (1620, 100)<>0x000000 And PixelGetColor (1620, 100)<>0xF5F5F5  Then
            MouseClick("left", 1600, 100, 1)
            ElseIf PixelGetColor (1725, 148)<>0x000000 And PixelGetColor (1725, 148)<>0xF5F5F5  Then
            MouseClick("left", 1700, 150, 1)
            ElseIf PixelGetColor (1748, 240)<>0x000000 And PixelGetColor (1748, 240)<>0xF5F5F5  Then
            MouseClick("left", 1720, 235, 1)
            ElseIf PixelGetColor (1660, 305)<>0x000000 And PixelGetColor (1660, 305)<>0xF5F5F5  Then
            MouseClick("left", 1630, 300, 1)
            ElseIf PixelGetColor (1550, 320)<>0x000000 And PixelGetColor (1550, 320)<>0xF5F5F5  Then
            MouseClick("left", 1520, 308, 1)
            ElseIf  PixelGetColor (1430, 305)<>0x000000 And PixelGetColor (1430, 305)<>0xF5F5F5 Then
            MouseClick("left", 1405, 300, 1)
            ElseIf  PixelGetColor (1340, 241)<>0x000000 And PixelGetColor (1340, 241)<>0xF5F5F5 Then
            MouseClick("left", 1320, 230, 1)
            ElseIf  PixelGetColor (1360, 150)<>0x000000 And PixelGetColor (1360, 150)<>0xF5F5F5 Then
            MouseClick("left", 1335, 140, 1)
            ElseIf  PixelGetColor (1470, 100)<>0x000000 And PixelGetColor (1470, 100)<>0xF5F5F5 Then
            MouseClick("left", 1444, 095, 1)
            EndIf
    
    EndIf

EndFunc
Func slot16monitor()
    
    If PixelGetColor (1560, 230)=0x004E98 Then
        opentable() 
            If PixelGetColor (1620, 100)<>0x000000 And PixelGetColor (1620, 100)<>0xF5F5F5  Then
            MouseClick("left", 1600, 100, 1)
            ElseIf PixelGetColor (1725, 148)<>0x000000 And PixelGetColor (1725, 148)<>0xF5F5F5  Then
            MouseClick("left", 1700, 150, 1)
            ElseIf PixelGetColor (1748, 240)<>0x000000 And PixelGetColor (1748, 240)<>0xF5F5F5  Then
            MouseClick("left", 1720, 235, 1)
            ElseIf PixelGetColor (1660, 305)<>0x000000 And PixelGetColor (1660, 305)<>0xF5F5F5  Then
            MouseClick("left", 1630, 300, 1)
            ElseIf PixelGetColor (1550, 320)<>0x000000 And PixelGetColor (1550, 320)<>0xF5F5F5  Then
            MouseClick("left", 1520, 308, 1)
            ElseIf  PixelGetColor (1430, 305)<>0x000000 And PixelGetColor (1430, 305)<>0xF5F5F5 Then
            MouseClick("left", 1405, 300, 1)
            ElseIf  PixelGetColor (1340, 241)<>0x000000 And PixelGetColor (1340, 241)<>0xF5F5F5 Then
            MouseClick("left", 1320, 230, 1)
            ElseIf  PixelGetColor (1360, 150)<>0x000000 And PixelGetColor (1360, 150)<>0xF5F5F5 Then
            MouseClick("left", 1335, 140, 1)
            ElseIf  PixelGetColor (1470, 100)<>0x000000 And PixelGetColor (1470, 100)<>0xF5F5F5 Then
            MouseClick("left", 1444, 095, 1)
            EndIf
    
    EndIf

EndFunc
Func monitoropenslots()
    While $slot1==0
        slot1monitor()
    WEnd
EndFunc
Func sitdown()
    Do  
        Sleep(500)
    Until PixelGetColor ($tableX, $tableY)<>0x004E98
    
    IF PixelGetColor ($tableX, $tableY)<>0x004E98 Then
            Sleep(500)
            If PixelGetColor ($seated1X, $seated1Y)<>0x000000 And PixelGetColor ($seated1X, $seated1Y)<>0xF5F5F5    Then
            MouseClick("left", $sitdown1X, $sitdown1Y, 1)
            ElseIf PixelGetColor ($seated2X, $seated2Y)<>0x000000 And PixelGetColor ($seated2X, $seated2Y)<>0xF5F5F5    Then
            MouseClick("left", $sitdown2X, $sitdown2Y, 1)
            ElseIf PixelGetColor ($seated3X, $seated3Y)<>0x000000 And PixelGetColor ($seated3X, $seated3Y)<>0xF5F5F5    Then
            MouseClick("left", $sitdown3X, $sitdown3Y, 1)
            ElseIf PixelGetColor ($seated4X, $seated4Y)<>0x000000 And PixelGetColor ($seated4X, $seated4Y)<>0xF5F5F5    Then
            MouseClick("left", $sitdown4X, $sitdown4Y, 1)
            ElseIf PixelGetColor ($seated5X, $seated5Y)<>0x000000 And PixelGetColor ($seated5X, $seated5Y)<>0xF5F5F5    Then
            MouseClick("left", $sitdown5X, $sitdown5Y, 1)
            ElseIf  PixelGetColor ($seated6X, $seated6Y)<>0x000000 And PixelGetColor ($seated6X, $seated6Y)<>0xF5F5F5   Then
            MouseClick("left", $sitdown6X, $sitdown6Y, 1)
            ElseIf  PixelGetColor ($seated7X, $seated7Y)<>0x000000 And PixelGetColor ($seated7X, $seated7Y)<>0xF5F5F5   Then
            MouseClick("left", $sitdown8X, $sitdown7Y, 1)
            ElseIf  PixelGetColor ($seated8X, $seated8Y)<>0x000000 And PixelGetColor ($seated8X, $seated8Y)<>0xF5F5F5   Then
            MouseClick("left", $sitdown9X, $sitdown8Y, 1)
            ElseIf  PixelGetColor ($seated9X, $seated9Y)<>0x000000 And PixelGetColor ($seated9X, $seated9Y)<>0xF5F5F5   Then
            MouseClick("left", $sitdown9X, $sitdown9Y, 1)
            EndIf       
            Sleep (500)
            
            If  PixelGetColor ($buyinopenX, $buyinopenY)=0xFFFFFF Then
            MouseClick("left", $buyinX, $buyinY, 1)
            ElseIF PixelGetColor ($seattakenpopupX, $seattakenpopupY)=0x000000 Then
            MouseClick("left", $seattakenpopupcloseX, $seattakenpopupcloseY, 1)     
        Else 
            MouseClick("left", $tablecloseX, $tablecloseY, 1)   
            EndIf   
            
    EndIf       
EndFunc 
Func table1sitoutconfirm ()
        While PixelGetcolor (1222, 168)<>0x00891D
        Do 
            Sleep (1000)
        Until PixelGetColor (1222,168)= 0x00891D
        MouseClick ("left", 1225, 172, 2)
        Sleep (1000)
        MouseClick ("left", 1487, -26, 2)
        WEnd
        
EndFunc
Func table2sitoutconfirm ()
        While PixelGetColor (1703,170)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (1703,170)= 0x00891D
        MouseClick ("left", 1700, 170, 2)
        Sleep (1000)
        MouseClick ("left", 1968, -23, 2)
        WEnd
EndFunc
    
Func table3sitoutconfirm ()
        While PixelGetColor (2181,170)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2181,170)= 0x00891D
        MouseClick ("left", 2183, 173, 2)
        Sleep (1000)
        MouseClick ("left", 2450, -22, 2)
        WEnd
EndFunc
Func table4sitoutconfirm ()
        While PixelGetColor (2664,170)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2664,170)= 0x00891D
        MouseClick ("left", 2665, 169, 2)
        Sleep (1000)
        MouseClick ("left", 2929, -22, 2)
        WEnd
EndFunc

Func table5sitoutconfirm ()
        While PixelGetColor (1223,528)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (1223,528)= 0x00891D
        MouseClick ("left", 1217, 529, 2)
        Sleep (1000)
        MouseClick ("left", 1487, 333, 2)
        WEnd
EndFunc

Func table6sitoutconfirm ()
        While PixelGetColor (1705,529)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (1705,529)= 0x00891D
        MouseClick ("left", 1693, 528, 2)
        Sleep (1000)
        MouseClick ("left", 1968, 336, 2)
        WEnd
EndFunc

Func table7sitoutconfirm ()
        While PixelGetColor (2181,527)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2181,527)= 0x00891D
        MouseClick ("left", 2181, 525, 2)
        Sleep (1000)
        MouseClick ("left", 2448, 333, 2)
        WEnd
EndFunc
Func table8sitoutconfirm ()
        While PixelGetColor (2665,530)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2665,530)= 0x00891D
        MouseClick ("left", 2665, 529, 2)
        Sleep (1000)
        MouseClick ("left", 2925, 334, 2)
        WEnd
EndFunc

Func table9sitoutconfirm ()
        While PixelGetColor (1221,888)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (1221,888)= 0x00891D    
        MouseClick ("left", 1223, 889, 2)
        Sleep (1000)
        MouseClick ("left", 1489, 695, 2)
        WEnd
EndFunc
    
Func table10sitoutconfirm ()
        While PixelGetColor (1700,888)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (1700,888)= 0x00891D
        MouseClick ("left", 1701, 888, 2)
        Sleep (1000)
        MouseClick ("left", 1969, 694, 2)
        WEnd
EndFunc
    
Func table11sitoutconfirm ()
        While PixelGetColor (2180,888)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2180,888)= 0x00891D
        MouseClick ("left", 2180, 888, 2)
        Sleep (1000)
        MouseClick ("left", 2447, 694, 2)
        WEnd
EndFunc
    
Func table12sitoutconfirm ()
        While PixelGetColor (2664,888)<> 0x00891D
            Sleep (1000)
        WEnd
        While PixelGetColor (2664,888)= 0x00891D
        MouseClick ("left", 2662, 889, 2)
        Sleep (1000)
        MouseClick ("left", 2928, 691, 2)
        WEnd
EndFunc

Func stop()
    Exit 0
EndFunc

The goal for the program is to constantly monitor the 12 "slots" on my screen and then if the pixel color equals the standard background color (meaning a table isnt open) I want it to then monitor that slot for a new table. Once a new table opens I want it to loof for the open seat and sti down.

All of that seems to work for the 1st slot, but it never makes it to the 2nd slot so I think I have a problem with my nesting somewhere.

Any suggestions?

Edited by jbh5000

Share this post


Link to post
Share on other sites



I am fairly new to this, but have figured most of it out on my own.

I am having a problem with nesting some functions. It seems the first function that is nested is executed, but it never makes it to the next function.

It's not obvious that the function slot1monitor() can set $slot1 so that you can get out of the while loop.

If $slot1=0 Then
            While $slot1=0
            slot1monitor()
            WEnd
        EndIf

Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script.

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!


Register a new account

Sign in

Already have an account? Sign in here.


Sign In Now
Sign in to follow this  
Followers 0