Lūdzu iedodiet kāds normālu FISHING Scrptu ar visu pacelšanu no zemes... ???
---> LV Forum wap
Toggle shoutbox Chat
|
Fishng Scrpt
Started by faustz, May 28 2007 13:40
10 replies to this topic
#2
Posted 28 May 2007 - 15:26
Deļ kam tev pacelšanu ?? Uz kuģa tik un tā nepazūd.
#4
Posted 28 May 2007 - 19:20
Uz kuģa tā nav.
#6
Posted 01 June 2007 - 22:59
labs scp = $
#8
Posted 02 June 2007 - 21:27
;Landfishing
; This Landfishing script was assembled from pieces out of Vanbelles Fishing Script V 3.0
; I assembled it because I could not find a land fishing or beginner fishing script. It is pretty straight forward,
; you only have to specify the type of blade you wish to use and the ID of the footwear you are wearing.
; I t will fish for you, cut up the fish into steaks and drop shoes out of your pack (Pack must be open)
; The program as is, will only fish properly if the water you are fishing is to your left or the south west.
; You can change the target locations of where to fish if you like by changing the 3 x and y locations below.
: If someone knows an easy way of locating water without being target specific, please add it.
initevents
FindItem XHF 1
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
sub cut
;Checks your pack and cuts the fish into steaks
set #LTargetKind 1
;Set this below to the bladed item type you want to use
FindItem NMH 1
set #LObjectID #FindID
N1:
finditem EQD_FQD_GQD_DQD 1
if #FindKind = 1 2
ignoreitem #findid
goto N1
if #FindKind = 0 9
if #Findstack > %CutFish 6
set #LtargetID #FindID
wait 20
event macro 17 0
wait 40
event macro 22 0
wait 20
ignoreitem #findid
goto N1
ignoreitem reset
gosub dropshoes
sub dropshoes
;Drags all shoe types and drops them behind you.
;Set this to the id of the boots or shoes you are wearing so it won't drop them
ignoreitem VOHHYND
drag:
FindItem CWI_AWI_NVI_OVI_PVI_QVI_ZVI_TVI 1
if #FindKind = -1 2
wait 20
exit
if #FindKind = 1 2
ignoreitem #FindID
goto drag
event drag #FindID
ignoreitem #FindID
wait 20
;This location is set to drop right behind if you are fishing with water to the left or (south west) of you
click 427 300 p
wait 20
;Landfishing
; This Landfishing script was assembled from pieces out of Vanbelles Fishing Script V 3.0
; I assembled it because I could not find a land fishing or beginner fishing script. It is pretty straight forward,
; you only have to specify the type of blade you wish to use and the ID of the footwear you are wearing.
; I t will fish for you, cut up the fish into steaks and drop shoes out of your pack (Pack must be open)
; The program as is, will only fish properly if the water you are fishing is to your left or the south west.
; You can change the target locations of where to fish if you like by changing the 3 x and y locations below.
: If someone knows an easy way of locating water without being target specific, please add it.
initevents
FindItem XHF 1
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
sub cut
;Checks your pack and cuts the fish into steaks
set #LTargetKind 1
;Set this below to the bladed item type you want to use
FindItem NMH 1
set #LObjectID #FindID
N1:
finditem EQD_FQD_GQD_DQD 1
if #hits < 175
msg .arm $
if #FindKind = 1 2
ignoreitem #findid
goto N1
if #FindKind = 0 9
if #Findstack > %CutFish 6
set #LtargetID #FindID
wait 20
event macro 17 0
wait 40
event macro 22 0
wait 20
ignoreitem #findid
goto N1
ignoreitem reset
gosub dropshoes
sub dropshoes
;Drags all shoe types and drops them behind you.
;Set this to the id of the boots or shoes you are wearing so it won't drop them
ignoreitem VOHHYND
drag:
FindItem CWI_AWI_NVI_OVI_PVI_QVI_ZVI_TVI 1
if #FindKind = -1 2
wait 20
exit
if #FindKind = 1 2
ignoreitem #FindID
goto drag
event drag #FindID
ignoreitem #FindID
wait 20
;This location is set to drop right behind if you are fishing with water to the left or (south west) of you
click 427 300 p
wait 20
; This Landfishing script was assembled from pieces out of Vanbelles Fishing Script V 3.0
; I assembled it because I could not find a land fishing or beginner fishing script. It is pretty straight forward,
; you only have to specify the type of blade you wish to use and the ID of the footwear you are wearing.
; I t will fish for you, cut up the fish into steaks and drop shoes out of your pack (Pack must be open)
; The program as is, will only fish properly if the water you are fishing is to your left or the south west.
; You can change the target locations of where to fish if you like by changing the 3 x and y locations below.
: If someone knows an easy way of locating water without being target specific, please add it.
initevents
FindItem XHF 1
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
sub cut
;Checks your pack and cuts the fish into steaks
set #LTargetKind 1
;Set this below to the bladed item type you want to use
FindItem NMH 1
set #LObjectID #FindID
N1:
finditem EQD_FQD_GQD_DQD 1
if #FindKind = 1 2
ignoreitem #findid
goto N1
if #FindKind = 0 9
if #Findstack > %CutFish 6
set #LtargetID #FindID
wait 20
event macro 17 0
wait 40
event macro 22 0
wait 20
ignoreitem #findid
goto N1
ignoreitem reset
gosub dropshoes
sub dropshoes
;Drags all shoe types and drops them behind you.
;Set this to the id of the boots or shoes you are wearing so it won't drop them
ignoreitem VOHHYND
drag:
FindItem CWI_AWI_NVI_OVI_PVI_QVI_ZVI_TVI 1
if #FindKind = -1 2
wait 20
exit
if #FindKind = 1 2
ignoreitem #FindID
goto drag
event drag #FindID
ignoreitem #FindID
wait 20
;This location is set to drop right behind if you are fishing with water to the left or (south west) of you
click 427 300 p
wait 20
;Landfishing
; This Landfishing script was assembled from pieces out of Vanbelles Fishing Script V 3.0
; I assembled it because I could not find a land fishing or beginner fishing script. It is pretty straight forward,
; you only have to specify the type of blade you wish to use and the ID of the footwear you are wearing.
; I t will fish for you, cut up the fish into steaks and drop shoes out of your pack (Pack must be open)
; The program as is, will only fish properly if the water you are fishing is to your left or the south west.
; You can change the target locations of where to fish if you like by changing the 3 x and y locations below.
: If someone knows an easy way of locating water without being target specific, please add it.
initevents
FindItem XHF 1
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX -4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 1 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 2 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 3 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
//------------------------------------------------------------
;Fishing Target 1
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 1 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 2
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 2 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 3
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 3 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 4
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 4 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 5
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 5 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
;Fishing Target 6
set #LObjectID #FindID
set #LTargetKind 2
set #LTargetX 4 + #CharPosX
set #LTargetY 6 + #CharPosY
event macro 17 0
target
event macro 22 0
wait 6s
sub cut
;Checks your pack and cuts the fish into steaks
set #LTargetKind 1
;Set this below to the bladed item type you want to use
FindItem NMH 1
set #LObjectID #FindID
N1:
finditem EQD_FQD_GQD_DQD 1
if #hits < 175
msg .arm $
if #FindKind = 1 2
ignoreitem #findid
goto N1
if #FindKind = 0 9
if #Findstack > %CutFish 6
set #LtargetID #FindID
wait 20
event macro 17 0
wait 40
event macro 22 0
wait 20
ignoreitem #findid
goto N1
ignoreitem reset
gosub dropshoes
sub dropshoes
;Drags all shoe types and drops them behind you.
;Set this to the id of the boots or shoes you are wearing so it won't drop them
ignoreitem VOHHYND
drag:
FindItem CWI_AWI_NVI_OVI_PVI_QVI_ZVI_TVI 1
if #FindKind = -1 2
wait 20
exit
if #FindKind = 1 2
ignoreitem #FindID
goto drag
event drag #FindID
ignoreitem #FindID
wait 20
;This location is set to drop right behind if you are fishing with water to the left or (south west) of you
click 427 300 p
wait 20
#9
Posted 02 June 2007 - 21:28
Še. Tikai neraudi vairāk ok .
#11
Posted 19 October 2007 - 04:42
Dolja vari iedot skriptu kā šis tikai uz kuģa + ar pacelšanu un ielikšanu kuģa kastē vai backakā? vari please?
1 user(s) are reading this topic
0 members, 1 guests, 0 anonymous users