Back to "detecthidden" tags

House Ban Bot by Jaseowns

Description: The script attempts to ban greys, reds and oranges, it will use detect hidden every 12 seconds. If you have a friendly grey, red or orange - they will be added to a safe list which the script will skip. The more people that get added to the safe list, the slower the script will go.

1# Ban Bot by Jaseowns
2# UO Outlands
3# Requirements:  
4#   be inside a house you have control over bans
5#
6# Additional Info: 
7#   The script attempts to ban greys, reds and oranges.
8#   It will also detect hidden every 12 seconds.
9#   If you have a friendly grey, red or orange - they will be added to a safe list
10#   The script attempts to skip anyone on the safe list
11#   The more people that get added to the safe list, the slower the script will go
12
13if not listexists safebanlist
14    createlist safebanlist
15    pushlist safebanlist 0
16endif
17if not varexist banattempt
18    setvar banattempt 0
19endif
20if not varexist banattemptcheck
21    setvar banattemptcheck 0
22endif
23if not timerexists 'detect'
24    createtimer 'detect'
25    settimer 'detect' 12000
26endif
27if timer 'detect' > 12000
28    if targetexists 
29        hotkey 'Cancel Current Target'
30        wait 200
31    endif
32    skill 'detectinghidden'
33    wft 500
34    hotkey 'Target Self'
35    settimer 'detect' 0
36endif
37foreach skipsafe in safebanlist
38    sysmsg "Next Grey Player Target" 795
39    hotkey 'Next Grey Player Target'
40    if insysmsg 'New target'
41        @setvar banattempt lasttarget 
42        @setvar banattemptcheck lasttarget
43        if not inlist safebanlist banattempt
44            say 'I ban thee'
45            wft 500
46            lasttarget 
47        endif
48    endif
49    hotkey 'Next Grey Player Target'
50    if insysmsg 'New target'
51        @setvar banattemptcheck lasttarget
52        if not inlist safebanlist banattempt
53            if banattempt = banattemptcheck
54                overhead "they are the same bro"
55                pushlist safebanlist banattempt
56            else
57                say 'I ban thee'
58                wft 500
59                lasttarget             
60            endif
61        endif
62    endif
63endfor
64foreach skipsafe in safebanlist
65    sysmsg "Next murderer Player Target" 34
66    hotkey 'Next murderer Player Target'
67    if insysmsg 'New target'
68        @setvar banattempt lasttarget 
69        @setvar banattemptcheck lasttarget
70        if not inlist safebanlist banattempt
71            say 'I ban thee'
72            wft 500
73            lasttarget 
74        endif
75    endif
76    hotkey 'Next murderer Player Target'
77    if insysmsg 'New target'
78        @setvar banattemptcheck lasttarget
79        if not inlist safebanlist banattempt
80            if banattempt = banattemptcheck
81                overhead "they are the same bro"
82                pushlist safebanlist banattempt
83            else
84                say 'I ban thee'
85                wft 500
86                lasttarget             
87            endif
88        endif
89    endif
90endfor
91foreach skipsafe in safebanlist
92    sysmsg "Next Enemy Player Target" 1257
93    hotkey 'Next Enemy Player Target'
94    if insysmsg 'New target'
95        @setvar banattempt lasttarget 
96        @setvar banattemptcheck lasttarget
97        if not inlist safebanlist banattempt
98            say 'I ban thee'
99            wft 500
100            lasttarget 
101        endif
102    endif
103    hotkey 'Next Enemy Player Target'
104    if insysmsg 'New target'
105        @setvar banattemptcheck lasttarget
106        if not inlist safebanlist banattempt
107            if banattempt = banattemptcheck
108                pushlist safebanlist banattempt
109            else
110                say 'I ban thee'
111                wft 500
112                lasttarget             
113            endif
114        endif
115    endif
116endfor
117wait 1000
118loop