Jump to content

Recommended Posts

I need help on how to do a script that searchs a page for a certain picture ( i have the source of the picture) and depending on what picture it is, goes to a certain link.

So If this picture is on screen go to this url, but if this other picture is on screen go to this other url.

Link to post
Share on other sites

I need help on how to do a script that searchs a page for a certain picture ( i have the source of the picture) and depending on what picture it is, goes to a certain link.

So If this picture is on screen go to this url, but if this other picture is on screen go to this other url.

Im not sure if i understand u fully, but try the IE_Automation Library. Its in script and scraps somewhere. It is very very nice.

Link to post
Share on other sites

well... heres an effort

#include <file.au3>
#include <IE.au3>

Dim $x, $Count, $Move[100]

$oIE = _IECreate()
_IENavigate($oIE, "http://www.autoitscript.com/"); need your web site here
$sloc = @TempDir & "\Htmltext.txt"
$Body = _IEBodyReadHTML($oIE)
FileDelete($sloc)
FileWrite($sloc, $Body)


Dim $aRecords
If Not _FileReadToArray( $sloc, $aRecords) Then
   MsgBox(4096,"Error", " Error reading log to Array     error:" & @error)
   Exit
EndIf
For $x = 1 to $aRecords[0]
    If StringInStr($aRecords[$x], "url to pic #1") Then
        _IENavigate($oIE, "http://www.autoitscript.com/"); need your #1 pic web site here
    EndIf   
    If StringInStr($aRecords[$x], "url to pic #2") Then
        _IENavigate($oIE, "http://www.autoitscript.com/"); need your #2 pic web site here
    EndIf   
Next

8)

NEWHeader1.png

Link to post
Share on other sites

Works Perfectly thank you so much. I only need help with one more thing. After the whole script happens, a new page loads, and I need it to load the whole 'If this picture is there then go here' again after each refresh.

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:       Calvin <teamgonuts@gmail.com>
;
; Script Function:
;   Auto-Plays Scorchy Slots
;
; ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <file.au3>
#include <IE.au3>

HotKeySet( "\" , "close")

Func close ()
    Exit
EndFunc


Dim $x, $Count, $Move[100]

$oIE = _IECreate()
_IENavigate($oIE, "http://www.neopets.com/games/tyranuevavu.phtml")
$oForm = _IEFormGetObjByIndex($oIE,2)
_IEFormSubmit($oForm)
_IELoadWait($oIE, 0)

$sloc = @TempDir & "\Htmltext.txt"
$Body = _IEBodyReadHTML($oIE)
FileDelete($sloc)
FileWrite($sloc, $Body)


Dim $aRecords
If Not _FileReadToArray( $sloc, $aRecords) Then
   MsgBox(4096,"Error", " Error reading log to Array     error:" & @error)
   Exit
EndIf


For $x = 1 to $aRecords[0]
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_spades.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf  
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
     If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_hearts.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_clubs.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
    If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_diamonds.gif") Then
        _IENavigate($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1"); need your #1 pic web site here
    EndIf
Next
Link to post
Share on other sites

NOT TESTED...

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Authors:      Calvin <teamgonuts@gmail.com> & Valuater 8)
;
; Script Function:
;   Auto-Plays Scorchy Slots
;
; ----------------------------------------------------------------------------

; Script Start - Add your code below here

#include <file.au3>
#include <IE.au3>

Dim $x, $Count, $Move[100]

HotKeySet( "\", "Closer")
HotKeySet( "{F9}", "Run_script")

Dim $oIE = _IECreate ()
_IENavigate ($oIE, "http://www.neopets.com/games/tyranuevavu.phtml")
$oForm = _IEFormGetObjByIndex ($oIE, 2)
_IEFormSubmit ($oForm)
_IELoadWait ($oIE, 0)
Run_script(); runs script the first time when program is started

While 1
    Sleep(5000); set sleep as long as you want to wait, 2000 = 5 seconds
;Run_script(); run the script automatically after the sleep/wait time - or press F9 to run 
WEnd

Func Run_script()
    $sloc = @TempDir & "\Htmltext.txt"
    $Body = _IEBodyReadHTML ($oIE)
    FileDelete($sloc)
    FileWrite($sloc, $Body)
    
    Dim $aRecords
    If Not _FileReadToArray($sloc, $aRecords) Then
        MsgBox(4096, "Error", " Error reading log to Array   error:" & @error)
        Exit
    EndIf
    
    For $x = 1 To $aRecords[0]
        If StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_spades.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_hearts.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_clubs.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/2_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/3_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/4_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/5_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/6_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/7_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=higher&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/8_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/9_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/10_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/11_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/12_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/13_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        ElseIf StringInStr($aRecords[$x], "http://images.neopets.com/games/cards/14_diamonds.gif") Then
            _IENavigate ($oIE, "http://neopets.com/games/tyranuevavu.phtml?type=play&action=lower&bs=1")
        EndIf
    Next
    $oIE = ""
EndFunc  ;==>Run_script

Func Closer()
    Exit
EndFunc  ;==>Closer

8)

NEWHeader1.png

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
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...