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