# insaniquarium helper

## Recommended Posts

Ok i wrote this one to help me play this game called "Insaniquarium". I did steal the code from Simucal and changed I slightly for this game. It clicks the coins that are near your mouse, after a while you start to get gamers hand clicking so much.

you can find this game here: http://www.popcap.com/

unfortunatly some of the colors of the coins are shared with other objects in the game, i have not been able to fix this yet.

enjoy tell me what you think.

```\$searchcolor4=13529856;gold 2
\$searchcolor=16777075; gold
\$searchcolor3=14610415;blueshell
\$searchcolor2=55039;crystal
\$searchcolor6=55039;crystal2
\$searchcolor5=7039851; silver
\$searchcolor7=4868682;silver 2
\$searchcolor8=16764465;yellow bug
\$searchcolor9=14075857; pear13553358
\$searchcolor10=13553358
\$found1="no"
\$found2="no"
\$found3="no"
\$found4="no"
\$found5="no"
\$silver=1
\$gold=1
\$crystal=1
\$bug=1
\$pearl=1
while(1)

if \$pearl=1 then
;pearl
If \$found1 = "no" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 50) , (\$pos[1] - 50) , (\$pos[0] + 50) , (\$pos[1] + 50), \$searchcolor10)

If IsArray(\$coord) = 1 Then
MouseMove(\$coord[0]+5, \$coord[1]+5, 0)
\$found5 = "yes"
EndIf
EndIf
If \$found1 = "yes" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 10) , (\$pos[1] - 10) , (\$pos[0] + 10) , (\$pos[1] + 10), \$searchcolor10)

If IsArray(\$coord) = 1 Then
Mouseclick("left",\$coord[0], \$coord[1],1, 0)
sleep(100)
Else
\$found1 = "no"
EndIf
EndIf
EndIf
if \$crystal=1 then
;crystal
If \$found1 = "no" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 50) , (\$pos[1] - 50) , (\$pos[0] + 50) , (\$pos[1] + 50), \$searchcolor6)

If IsArray(\$coord) = 1 Then
MouseMove(\$coord[0]+5, \$coord[1]+5, 0)
\$found1 = "yes"
EndIf
EndIf
If \$found1 = "yes" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 10) , (\$pos[1] - 10) , (\$pos[0] + 10) , (\$pos[1] + 10), \$searchcolor6)

If IsArray(\$coord) = 1 Then
Mouseclick("left",\$coord[0], \$coord[1],1, 0)
sleep(100)
Else
\$found1 = "no"
EndIf
EndIf
EndIf

if \$bug=1 then
;bug
If \$found1 = "no" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 50) , (\$pos[1] - 50) , (\$pos[0] + 50) , (\$pos[1] + 50), \$searchcolor8)

If IsArray(\$coord) = 1 Then
MouseMove(\$coord[0]+5, \$coord[1]+5, 0)
\$found2 = "yes"
EndIf
EndIf
If \$found1 = "yes" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 10) , (\$pos[1] - 10) , (\$pos[0] + 10) , (\$pos[1] + 10), \$searchcolor8)

If IsArray(\$coord) = 1 Then
Mouseclick("left",\$coord[0], \$coord[1],1, 0)
sleep(100)
Else
\$found1 = "no"
EndIf
EndIf
EndIf

if \$gold=1 then
;gold
If \$found1 = "no" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 50) , (\$pos[1] - 50) , (\$pos[0] + 50) , (\$pos[1] + 50), \$searchcolor4)

If IsArray(\$coord) = 1 Then
MouseMove(\$coord[0]+5, \$coord[1]+5, 0)
\$found1 = "yes"
EndIf
EndIf
If \$found1 = "yes" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 10) , (\$pos[1] - 10) , (\$pos[0] + 10) , (\$pos[1] + 10), \$searchcolor4)

If IsArray(\$coord) = 1 Then
Mouseclick("left",\$coord[0], \$coord[1],1, 0)
sleep(100)
Else
\$found1 = "no"
EndIf
EndIf
EndIf

;silver
if \$silver=1 then
If \$found1 = "no" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 50) , (\$pos[1] - 50) , (\$pos[0] + 50) , (\$pos[1] + 50), \$searchcolor5)

If IsArray(\$coord) = 1 Then
MouseMove(\$coord[0]+5, \$coord[1]+5, 0)
\$found1 = "yes"
EndIf
EndIf
If \$found1 = "yes" Then
\$pos = MouseGetPos()
\$coord = PixelSearch((\$pos[0] - 10) , (\$pos[1] - 10) , (\$pos[0] + 10) , (\$pos[1] + 10), \$searchcolor5)

If IsArray(\$coord) = 1 Then
Mouseclick("left",\$coord[0], \$coord[1],1, 0)
sleep(100)
Else
\$found1 = "no"
EndIf
EndIf
EndIf
WEnd```

## Create an account

Register a new account

×

• Wiki

• Back

• Git