Back to "b" tags

Mount Breeding Helper by Jaseowns

1# Mount Breeding Helper by Jaseowns
2# UO Outlands
3# Live stream: https://youtu.be/UUYixdec9Q4
4#############
5# This will be a box near your trough that has food / water
6####
7@setvar! jase_MyFoodWaterContainer 0x479D6FC8
8
9if find jase_MyFoodWaterContainer ground -1 -1 2
10    dclick jase_MyFoodWaterContainer
11    wait 650
12endif
13
14clearsysmsg 
15@clearignore 
16while findtype "feeder trough" ground -1 -1 2 as jrough
17    while not gumpexists 1942558613
18        dclick jrough
19        waitforgump 1942558613 500
20    endwhile
21    
22    @setvar! jase_NeedFood 1
23    @setvar! jase_NeedWater 1
24    
25    while jase_NeedFood = 1
26        if not targetexists 
27            gumpresponse 2 1942558613
28            wft 500
29            if insysmsg "That feeding trough is already full of food."
30                @setvar! jase_NeedFood 0
31            endif
32        endif
33        if targetexists
34            if findtype 3350|2512|3164|3195|5928|2513|3173|3184|3199|5919|3191|3181|3386|5923|3186|3188|5930|2514|3178|3174 backpack as jood
35                target jood
36                wait 650
37            elseif findtype 3350|2512|3164|3195|5928|2513|3173|3184|3199|5919|3191|3181|3386|5923|3186|3188|5930|2514|3178|3174 jase_MyFoodWaterContainer as jood
38                target jood
39                wait 650
40            endif                
41        endif
42    endwhile
43    
44    while jase_NeedWater = 1
45        if not targetexists 
46            gumpresponse 3 1942558613
47            wft 500
48            if insysmsg "That feeding trough is already full of water."
49                @setvar! jase_NeedWater 0
50            endif
51        endif
52        if targetexists
53            if findtype 5453|25570|4090 backpack as jater
54                getlabel jater desc
55                if "empty" in desc
56                    @ignore jater    
57                endif
58                target jater
59                wait 650
60            elseif findtype 5453|25570|4090 ground -1 -1 2 as jater
61                getlabel jater desc
62                if "empty" in desc
63                    @ignore jater    
64                endif
65                target jater
66                wait 650
67            elseif findtype 5453|25570|4090 jase_MyFoodWaterContainer as jater
68                getlabel jater desc
69                if "empty" in desc
70                    @ignore jater    
71                endif   
72                target jater
73                wait 650
74            endif                
75        endif
76    endwhile
77    gumpclose 1942558613
78    @ignore jrough
79endwhile