The Wiki for Tale 4 is in read-only mode and is available for archival and reference purposes only. Please visit the current Tale 11 Wiki in the meantime.
If you have any issues with this Wiki, please post in #wiki-editing on Discord or contact Brad in-game.
User:Wopper87
From A Tale in the Desert
Jump to navigationJump to searchfile
SetDefaultMouseSpeed, 3
;Global Constants
;Location of the Flax: ? planting button (assumes far top left of screen, atm.)
plantButtonX:=50
plantButtonY:=44
;Flax Bed Size:
flaxBed:=419
;Flax Popup Box Size
flaxBoxX:=174
flaxBoxY:=100
;Grid Layout
;XY|Xx |Xx |Xx |Xx
;Yy|AA(UL) |BB(UM) |CC(UR) |DD(new)
;Yy|EE(ML) |FF(MM) |GG(MR) |HH(new)
;Yy|II(LL) |JJ(LM) |Kk(LR) |LL(new)
;Yy|MM(new)|NN(new)|OO(new)|PP(new)
;Yy|QQ(new)|RR(new)|SS(new)|TT(new)
;all positions are based off of ULxy
AAx:=10
AAy:=600
BBx:=AAx + flaxBoxX
BBy:=AAy
CCx:=BBx + flaxBoxX
CCy:=AAy
DDx:=CCx + flaxBoxX
DDy:=CCy
EEx:=AAx
EEy:=AAy + flaxBoxY
FFx:=EEx + flaxBoxX
FFy:=EEy
GGx:=FFx + flaxBoxX
GGy:=FFy
HHx:=GGx + flaxBoxX
HHy:=EEy
IIx:=AAx
IIy:=EEy + flaxBoxY
JJx:=IIx + flaxBoxX
JJy:=IIy
KKx:=JJx + flaxBoxX
KKy:=JJy
LLx:=KKx + flaxBoxX
LLy:=IIy
MMx:=AAx
MMy:=IIy + flaxBoxY
NNx:=MMx + flaxBoxX
NNy:=MMy
OOx:=NNx + flaxBoxX
OOy:=NNy
PPx:=OOx + flaxBoxX
PPy:=MMy
QQx:=AAx
QQy:=IIy + flaxBoxX
RRx:=QQx + flaxBoxY
RRy:=QQy
SSx:=RRx + flaxBoxX
SSy:=RRy
TTx:=SSx + flaxBoxX
TTy:=QQy
^!+p::Pause ;Pause Script Ctrl+Alt+Shift+P
;Move the popup menu box to the specified topleft corner by posX,posy
;(assumes the menu was just opend and the mouse hasn't moved)
moveMenu(posX, posY)
{
Click up
MouseGetPos , MX, MY
MXv:=MX+50
MYv:=MY-35
MouseMove , MX+50, MY-35
Click down
MXv:=posX+50
MYv:=posY+15
MouseMove , posX+50, posY+15
Click up
return
}
refreshMenu(TCx,TCy)
{
;Relative location to click
Rx:=TCx+95
Ry:=TCy+30
click %Rx% , %Ry%
return
}
;UnPin menu with topleft corner at TCx,TCy
unPinMenu(TCx,TCy)
{
;offset pin from top left corner
pinLocX:=TCx+150
pinLocY:=TCy+17
msgbox , 0 , unpinning menu, "Unpinning Menu at %TCx% _ %TCy% pin at %pinLocX% _ %pinLocY%"
Click %pinLocX% , %pinLocY%
return 1
}
;Process the top left corner of the flax menu at TCx,TCy
processFlax(TCx,TCy)
{
;Action item Relative Location
actionX:=TCx+50
actionY:=TCy+50
;Search Area Adjustment
SATCx:=TCx+174
SATCy:=TCy+100
refreshMenu(TCx,TCy)
sleep 250
;Msgbox , 0 , Searchbox, "Search area is %TCx% _ %TCy% by %SATCx% _ %SATCy%"
ImageSearch, Px, Py, TCx, TCy, SATCx, SATCy, *50 Find_Weed_this.png
if (ErrorLevel < 1) {
Click %actionX% , %actionY% ;Click Weed This
return 1 ; found the "weed this"
}
ImageSearch, Px, Py, TCx, TCy, SATCx, SATCy, *50 Find_Weed_and.png
if (ErrorLevel < 1) {
Click %actionX% , %actionY% ;Click Weed and Water This
return 1 ; found the "weed and"
}
ImageSearch, Px, Py, TCx, TCy, SATCx, SATCy, *50 Find_Harvest_this.png
if (ErrorLevel < 1) {
Click %actionX% , %actionY% ;Click Harvest This
;unPinMenu(TCx,TCy)
pinLocX:=TCx+150
pinLocY:=TCy+17
Click %pinLocX% , %pinLocY%
return 0 ; found the "Harvest this", menu removed
}
ImageSearch, Px, Py, TCx, TCy, SATCx, SATCy, *50 Find_Harvest_seeds.png
if (ErrorLevel < 1) {
;ripOutFlax(TCx,TCy)
Click %actionX% , %actionY% ;Click Harvest seeds
utilX:=TCx+35
utilY:=TCy+82
Click %utilX%, %utilY% ;click Utilities
;adjust for new popup menu
MouseGetPos , MX, MY
ROFx:=MX+50 ;Rip Out Flax button X
ROFy:=MY-8 ;Rip Out Flax button Y
clickItem(ROFx,ROFy) ; click Rip out Flax
;unPinMenu(TCx,TCy)
pinLocX:=TCx+150
pinLocY:=TCy+17
Click %pinLocX% , %pinLocY%
return 0 ; found the "harvest seeds", menu removed
}
return 1 ; no clicks here
}
;Process the top left corner of the flax menu at TCx,TCy
processFlaxSeeds(TCx,TCy,seedCount)
{
;Action item Relative Location
actionX:=TCx+50
actionY:=TCy+50
;Search Area Adjustment
SATCx:=TCx+174
SATCy:=TCy+100
refreshMenu(TCx,TCy)
sleep 250
ImageSearch, Px, Py, TCx, TCy, SATCx, SATCy, *50 Find_Harvest_seeds.png
if (ErrorLevel < 1) {
;ripOutFlax(TCx,TCy)
Click %actionX% , %actionY% ;Click Harvest seeds
if (seedCount >= 5) {
utilX:=TCx+35
utilY:=TCy+82
Click %utilX%, %utilY% ;click Utilities
;adjust for new popup menu
MouseGetPos , MX, MY
ROFx:=MX+50 ;Rip Out Flax button X
ROFy:=MY-8 ;Rip Out Flax button Y
clickItem(ROFx,ROFy) ; click Rip out Flax
pinLocX:=TCx+150
pinLocY:=TCy+17
Click %pinLocX% , %pinLocY%
return 99
}
return 1 ; found the "harvest seeds", menu removed
}
return 0 ; no clicks here
}
;Rip out the flax bed of the box with top left corner at TCx,TCy
ripOutFlax(TCx,TCy)
{
;Utilities menu relative location
utilX:=TCx+35
utilY:=TCy+82
Click %utilX%, %utilY% ;click Utilities
;adjust for new popup menu
MouseGetPos , MX, MY
ROFx:=MX+50 ;Rip Out Flax button X
ROFy:=MY-8 ;Rip Out Flax button Y
clickItem(ROFx,ROFy) ; click Rip out Flax
return
}
;Pin menu assuming that it was just brought up
pinMenu()
{
mouseGetPos , MX , MY
;Pin icon relative location
pinX:=MX+155
pinY:=MY-33
click %pinX% , %pinY% ;Click the pin button
MouseMove , MX, MY, 0 ;put back the mouse
return
}
;Plant the flax seed
plantSeed()
{
pBX:=50
pBY:=44
;click on the flax seed button
Click %pbX% , %pbY%
return
}
;Move avatar to location specified AvX, AvY
moveAvatar(AvX, AvY)
{
Click %AvX%, %AvY%
sleep 500
return
}
;Bring up the Flax bed's popup menu provided the avatars current location AvX,AvY
flaxMenu(AvX,AvY)
{
;MouseGetPos , MX, MY
;Use above and to the right of the avatar to bring up menu
flaxMenuX:= AvX+50
flaxMenuY:= AvY-50
click %flaxMenuX% , %flaxMenuY%
pinMenu()
;MouseMove , MX, MY
return
}
;;Click the resource at X,Y then return the pointer
clickItem(X, Y)
{
oldMouseDelay:= A_MouseDelay
setMouseDelay , 1
Click up
MouseGetPos , MX, MY
Click , %X%, %Y%
MouseMove , MX, MY
setMouseDelay , A_MouseDelay
return
}
^!f::
WinWait, eGenesis Client,
IfWinNotActive, eGenesis Client, , WinActivate, eGenesis Client,
WinWaitActive, eGenesis Client,
WinGetActiveStats, win_Title, win_Width, win_Height, win_Xpos, win_Ypos
InputBox, flaxNum, Flax some, How many Flax passes do you want?
;some local constants
;msgBox " AA= %AAx%,%AAy% _ BB= %BBx%,%BBy% _ CC= %CCx%,%CCy% _ DD= %DDx%,%DDy% _ EE= %EEx%,%EEy% _ FF= %FFx%,%FFy% _ GG= %GGx%,%GGy% _ HH= %HHx%,%HHy% _ II= %IIx%,%IIy% _ JJ= %JJx%,%JJy% _ KK= %KKx%,%KKy% _ LL= %LLx%,%LLy% _ MM= %MMx%,%MMy% _ NN= %NNx%,%NNy% _ OO= %OOx%,%OOy% _ PP= %PPx%,%PPy% _ QQ= %QQx%,%QQy% _ RR= %RRx%,%RRy% _ SS= %SSx%,%SSy% _ TT= %TTx%,%TTy%"
;middle of the window where the avatar is located
avatarX:=win_Width/2
avatarY:=win_Height/2 + 28 ;add a little for title-bar adjustment
moveDist:=flaxBed + 5 ;Move one plot plus a little
;standard movement values
moveLeft:= avatarX - moveDist
moveRight:= avatarX + moveDist
moveUp:= avatarY - moveDist
moveDown:= avatarY + moveDist
loop {
;Left Rigth Flipper
moveTT:=1 ;0 for left, 1 for right
TrayTip Flaxing in progress, You have %flaxNum% more Passes to go,15,1
if (flaxNum<=0) {
TrayTip, Flaxing Done, Flaxing Done, enjoy your flax, 15, 1
soundPlay *64,1
exit
}
flaxNum:=flaxNum-1
if (A_Index==1) {
moveAvatar(avatarX,moveUp)
moveAvatar(moveRight,avatarY)
} else {
moveAvatar(avatarX,moveUp)
moveAvatar(avatarX,moveUp)
moveAvatar(moveRight,avatarY)
moveAvatar(moveRight,AvatarY)
}
;Set all grid boxes to non moved values ( 0 )
AA:=0
BB:=0
CC:=0
DD:=0
EE:=0
FF:=0
GG:=0
HH:=0
II:=0
JJ:=0
KK:=0
LL:=0
MM:=0
NN:=0
OO:=0
PP:=0
QQ:=0
RR:=0
SS:=0
TT:=0
gridXCounter:=4
gridYCounter:=5
loop {
if (gridYCounter > 0) {
gridYCounter:=gridYCounter-1
if (moveTT==1) {
moveTT:=0
} else {
moveTT:=1
}
gridXCounter:=4
loop {
if (gridXCounter > 0) {
gridXCounter:=gridXCounter-1
plantSeed()
flaxMenu(avatarX, avatarY)
if (gridYCounter==0) {
if (AA==0) {
moveMenu(AAx,AAy)
AA:=1
} else if (BB==0) {
moveMenu(BBx,BBy)
BB:=1
} else if (CC==0) {
moveMenu(CCx,CCy)
CC:=1
} else if (DD==0) {
moveMenu(DDx,DDy)
DD:=1
}
}
if (gridYCounter==1) {
if (EE==0) {
moveMenu(EEx,EEy)
EE:=1
} else if (FF==0) {
moveMenu(FFx,FFy)
FF:=1
} else if (GG==0) {
moveMenu(GGx,GGy)
GG:=1
} else if (HH==0) {
moveMenu(HHx,HHy)
HH:=1
}
}
if (gridYCounter==2) {
if (II==0) {
moveMenu(IIx,IIy)
II:=1
} else if (JJ==0) {
moveMenu(JJx,JJy)
JJ:=1
} else if (KK==0) {
moveMenu(KKx,KKy)
KK:=1
} else if (LL==0) {
moveMenu(LLx,LLy)
LL:=1
}
}
if (gridYCounter==3) {
if (MM==0) {
moveMenu(MMx,MMy)
MM:=1
} else if (NN==0) {
moveMenu(NNx,NNy)
NN:=1
} else if (OO==0) {
moveMenu(OOx,OOy)
OO:=1
} else if (PP==0) {
moveMenu(PPx,PPy)
PP:=1
}
}
if (gridYCounter==4) {
if (QQ==0) {
moveMenu(QQx,QQy)
QQ:=1
} else if (RR==0) {
moveMenu(RRx,RRy)
RR:=1
} else if (SS==0) {
moveMenu(SSx,SSy)
SS:=1
} else if (TT==0) {
moveMenu(TTx,TTy)
TT:=1
}
}
if (moveTT==0 && gridXCounter > 0)
{
moveAvatar(moveLeft,avatarY)
} else if (moveTT==1 && gridXCounter > 0) {
moveAvatar(moveRight,avatarY)
}
} else {
break
}
}
} else {
break
}
if (gridYCounter>0)
moveAvatar(avatarX, moveDown)
}
Pause=1000
;start harvest loops
loop {
if (AA==0 && BB==0 && CC==0 && DD==0 && EE==0 && FF==0 && GG==0 && HH==0 && II==0 && JJ==0 && KK==0 && LL==0 && MM==0 && NN==0 && OO==0 && PP==0 && QQ==0 && RR==0 && SS==0 && TT==0)
break
if QQ
QQ:=processFlax(QQx,QQy)
if RR
RR:=processFlax(RRx,RRy)
if SS
SS:=processFlax(SSx,SSy)
if TT
TT:=processFlax(TTx,TTy)
if MM
MM:=processFlax(MMx,MMy)
if NN
NN:=processFlax(NNx,NNy)
if OO
OO:=processFlax(OOx,OOy)
if PP
PP:=processFlax(PPx,PPy)
if II
II:=processFlax(IIx,IIy)
if JJ
JJ:=processFlax(JJx,JJy)
if KK
KK:=processFlax(KKx,KKy)
if LL
LL:=processFlax(LLx,LLy)
if EE
EE:=processFlax(EEx,EEy)
if FF
FF:=processFlax(FFx,FFy)
if GG
GG:=processFlax(GGx,GGy)
if HH
HH:=processFlax(HHx,HHy)
if AA
AA:=processFlax(AAx,AAy)
if BB
BB:=processFlax(BBx,BBy)
if CC
CC:=processFlax(CCx,CCy)
if DD
DD:=processFlax(DDx,DDy)
}
SoundPlay *-1, 1
}
SoundPlay *64,1
^!e::
WinWait, eGenesis Client,
IfWinNotActive, eGenesis Client, , WinActivate, eGenesis Client,
WinWaitActive, eGenesis Client,
WinGetActiveStats, win_Title, win_Width, win_Height, win_Xpos, win_Ypos
InputBox, flaxNum, Flax some, How many Seed passes do you want?
;some local constants
;msgBox " AA= %AAx%,%AAy% _ BB= %BBx%,%BBy% _ CC= %CCx%,%CCy% _ DD= %DDx%,%DDy% _ EE= %EEx%,%EEy% _ FF= %FFx%,%FFy% _ GG= %GGx%,%GGy% _ HH= %HHx%,%HHy% _ II= %IIx%,%IIy% _ JJ= %JJx%,%JJy% _ KK= %KKx%,%KKy% _ LL= %LLx%,%LLy% _ MM= %MMx%,%MMy% _ NN= %NNx%,%NNy% _ OO= %OOx%,%OOy% _ PP= %PPx%,%PPy% _ QQ= %QQx%,%QQy% _ RR= %RRx%,%RRy% _ SS= %SSx%,%SSy% _ TT= %TTx%,%TTy%"
;middle of the window where the avatar is located
avatarX:=win_Width/2
avatarY:=win_Height/2 + 28 ;add a little for title-bar adjustment
moveDist:=flaxBed + 5 ;Move one plot plus a little
;standard movement values
moveLeft:= avatarX - moveDist
moveRight:= avatarX + moveDist
moveUp:= avatarY - moveDist
moveDown:= avatarY + moveDist
loop {
;Left Rigth Flipper
moveTT:=1 ;0 for left, 1 for right
TrayTip Flaxing in progress, You have %flaxNum% more Passes to go,15,1
if (flaxNum<=0) {
TrayTip, Flaxing Done, Flaxing Done, enjoy your flax, 15, 1
soundPlay *64,1
exit
}
flaxNum:=flaxNum-1
if (A_Index==1) {
moveAvatar(avatarX,moveUp)
moveAvatar(moveRight,avatarY)
} else {
moveAvatar(avatarX,moveUp+50)
moveAvatar(avatarX,moveUp)
moveAvatar(moveRight-50,avatarY)
moveAvatar(moveRight,AvatarY)
}
;Set all grid boxes to non moved values ( 0 )
AA:=0
BB:=0
CC:=0
DD:=0
EE:=0
FF:=0
GG:=0
HH:=0
II:=0
JJ:=0
KK:=0
LL:=0
MM:=0
NN:=0
OO:=0
PP:=0
QQ:=0
RR:=0
SS:=0
TT:=0
gridXCounter:=4
gridYCounter:=5
loop {
if (gridYCounter > 0) {
gridYCounter:=gridYCounter-1
if (moveTT==1) {
moveTT:=0
} else {
moveTT:=1
}
gridXCounter:=4
loop {
if (gridXCounter > 0) {
gridXCounter:=gridXCounter-1
plantSeed()
flaxMenu(avatarX, avatarY)
if (gridYCounter==0) {
if (AA==0) {
moveMenu(AAx,AAy)
AA:=1
} else if (BB==0) {
moveMenu(BBx,BBy)
BB:=1
} else if (CC==0) {
moveMenu(CCx,CCy)
CC:=1
} else if (DD==0) {
moveMenu(DDx,DDy)
DD:=1
}
}
if (gridYCounter==1) {
if (EE==0) {
moveMenu(EEx,EEy)
EE:=1
} else if (FF==0) {
moveMenu(FFx,FFy)
FF:=1
} else if (GG==0) {
moveMenu(GGx,GGy)
GG:=1
} else if (HH==0) {
moveMenu(HHx,HHy)
HH:=1
}
}
if (gridYCounter==2) {
if (II==0) {
moveMenu(IIx,IIy)
II:=1
} else if (JJ==0) {
moveMenu(JJx,JJy)
JJ:=1
} else if (KK==0) {
moveMenu(KKx,KKy)
KK:=1
} else if (LL==0) {
moveMenu(LLx,LLy)
LL:=1
}
}
if (gridYCounter==3) {
if (MM==0) {
moveMenu(MMx,MMy)
MM:=1
} else if (NN==0) {
moveMenu(NNx,NNy)
NN:=1
} else if (OO==0) {
moveMenu(OOx,OOy)
OO:=1
} else if (PP==0) {
moveMenu(PPx,PPy)
PP:=1
}
}
if (gridYCounter==4) {
if (QQ==0) {
moveMenu(QQx,QQy)
QQ:=1
} else if (RR==0) {
moveMenu(RRx,RRy)
RR:=1
} else if (SS==0) {
moveMenu(SSx,SSy)
SS:=1
} else if (TT==0) {
moveMenu(TTx,TTy)
TT:=1
}
}
if (moveTT==0 && gridXCounter > 0)
{
moveAvatar(moveLeft,avatarY)
} else if (moveTT==1 && gridXCounter > 0) {
moveAvatar(moveRight,avatarY)
}
} else {
break
}
}
} else {
break
}
if (gridYCounter>0)
moveAvatar(avatarX, moveDown)
}
;start gather loops
loop {
if (AA>6 && BB>6 && CC>6 && DD>6 && EE>6 && FF>6 && GG>6 && HH>6 && II>6 && JJ>6 && KK>6 && LL>6 && MM>6 && NN>6 && OO>6 && PP>6 && QQ>6 && RR>6 && SS>6 && TT>6)
break
if QQ<6
QQ+=processFlaxSeeds(QQx,QQy,QQ)
if RR<6
RR+=processFlaxSeeds(RRx,RRy,RR)
if SS<6
SS+=processFlaxSeeds(SSx,SSy,SS)
if TT<6
TT+=processFlaxSeeds(TTx,TTy,TT)
if MM<6
MM+=processFlaxSeeds(MMx,MMy,MM)
if NN<6
NN+=processFlaxSeeds(NNx,NNy,NN)
if OO<6
OO+=processFlaxSeeds(OOx,OOy,OO)
if PP<6
PP+=processFlaxSeeds(PPx,PPy,PP)
if II<6
II+=processFlaxSeeds(IIx,IIy,II)
if JJ<6
JJ+=processFlaxSeeds(JJx,JJy,JJ)
if KK<6
KK+=processFlaxSeeds(KKx,KKy,KK)
if LL<6
LL+=processFlaxSeeds(LLx,LLy,LL)
if EE<6
EE+=processFlaxSeeds(EEx,EEy,EE)
if FF<6
FF+=processFlaxSeeds(FFx,FFy,FF)
if GG<6
GG+=processFlaxSeeds(GGx,GGy,GG)
if HH<6
HH+=processFlaxSeeds(HHx,HHy,HH)
if AA<6
AA+=processFlaxSeeds(AAx,AAy,AA)
if BB<6
BB+=processFlaxSeeds(BBx,BBy,BB)
if CC<6
CC+=processFlaxSeeds(CCx,CCy,CC)
if DD<6
DD+=processFlaxSeeds(DDx,DDy,DD)
}
SoundPlay *1, 1
}
