Register for your free account! | Forgot your password?

You last visited: Today at 22:32

  • Please register to post and access all features, it's quick, easy and FREE!

 

!EasyUO-Scripts!

Reply
 
Old   #1
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
!EasyUO-Scripts!

Hallo an alle die noch Ultima Online Spielen.
Ich setze hier mal ein paar scripts rein wo ich so gefunden habe und hoffe das diejenigen wo selbst noch welche haben, auch hier rein posten.

Danke als im vorraus, für die wo mit helfen.

Selbst suche ich noch einen guten Alarm script wo, wenn ein Admin/GM/Counsi erscheint selbst mit dem reden tut für Afk macro.

UO Freeshard
Auf der Homepage von UO-Even findet ihr im Forum auch noch gute nützliche scripts und Hilfen.
Am besten ihr testet dann auch grade noch den Server, wenn es euch ja Spaß macht könnt ihr dort ja etwas PGen und Zocken!



killkill2k is offline  
Old   #2
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Injection Autoheal:


sub Autoheal()
Repeat
Repeat
Wait(200);
Until UO.life < UO.STR - 10
Repeat
UO.bandageself();
Wait(1000) # Delay der Bandagen
Until UO.Life >= UO.STR
Until False
end sub


killkill2k is offline  
Old   #3
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Hidin/Stealth


hide:
chooseSkill hidi
if #skill < 800
{
event Macro 13 21
wait 11s
goto hide
}
if #skill > 799
{
event Macro 13 21
wait 11s
if h in #charstatus
{
goto stealth
}
goto hide
}
;-----------------------------------------------------------------------------
stealth:
if h in #charstatus
{
event Macro 13 47
wait 11s
goto stealth
}
if h notin #charstatus
{
goto hide
}
killkill2k is offline  
Old   #4
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Magery:


;==================================
; Script Name: snicker7's UNMOVING MAGERY.
; Author: snicker7
; Version: 100,000.1
; Client Tested with: 4.0.6a
; EUO version tested with: 1.42.009D
; Shard OSI / FS: FS
; Revision Date: 11/25/04
; Public Release: 11/25/05
; Global Variables Used:
; Purpose: Train magery without moving for freeshards.
;==================================
set %warmode 0 ;edit by atu (Thanx @atu)

chooseskill mage
set %startingskill #skill
set %currentskill #skill
if %currentskill < 300 2
display ok You need greater than 30.0 Magery to start this script.
halt

gosub showmenu
gosub dressInit

loop:
gosub choosespell
gosub cast
goto loop:

sub choosespell
if %currentskill <= 1000
{
set %spell 56
set %manatocast 50
set %castdelay 40
set %masochistic 0
menu delete currentspell
menu text currentspell 68 55 Earthquake
}
if %currentskill < 890
{
set %spell 52
set %manatocast 40
set %castdelay 48
set %masochistic 0
menu delete currentspell
menu text currentspell 68 55 Mana Vampire
}
if %currentskill < 740
{
set %spell 43
set %manatocast 20
set %castdelay 48
set %masochistic 0
menu delete currentspell
menu text currentspell 68 55 Invis
}

if %currentskill < 600
{
set %spell 38
set %manatocast 15
set %castdelay 48
set %masochistic 0
menu delete currentspell
menu text currentspell 68 55 Poisonfield
}
}
if %currentskill < 500
{
set %spell 29
set %manatocast 11
set %castdelay 43
set %masochistic 1
menu delete currentspell
menu text currentspell 68 55 Lightning
}
set %healspell 28
if %currentskill < 50
set %healspell 3
return

sub cast
If %spell = 56 ;edit by atu
gosub warmode
gosub openhealthbar
if %masochistic = 1
gosub checkhealth
gosub checkmana %manatocast
recast:
event macro 15 %spell
target 3s
if %masochistic = 2
{
set #ltargetx 206 ;#charposx - 2
set #ltargety 1377 ;#charposy
set #ltargetz 7 ;#charposz
set #ltargetkind 3
set #ltargettile 1197
event macro 22 0
}
else
{
; set #ltargetid #charid
; set #ltargetkind 1
event macro 23 0
}
wait 5
gosub checkskill
wait %castdelay
return

sub checkskill
chooseskill mage
if #skill > %currentskill
{
set %currentskill #skill
sound
str len %currentskill
str ins %currentskill #dot #strRes
menu delete currentskill
menu text currentskill 68 25 #strRes
set %totalgains %currentskill - %startingskill
str len %totalgains
str ins %totalgains #dot #strRes
menu delete totalgains
menu text totalgains 68 40 #strRes
}
return

sub checkhealth
gosub openhealthbar
checkhealth:
if #hits = #maxhits
return
set %healat #maxhits - ( #maxhits / 5 )
if #hits < %healat
{
gosub checkmana 11
event macro 15 %healspell
target 3s
event macro 23 0
goto checkhealth
}
return

sub checkmana
manacheckloop:
if #mana > %1
{
if %undressed = #true
gosub dressLrc
return
}
if %undressed = #false
gosub undressLrc
event macro 13 46
set %medstart #scnt
wait 10
for %i 1 2
{
scanjournal %i
if meditative in #journal
goto manaloopmain
}
wait:
if #scnt < %medstart + 11 2
wait 1
goto wait
goto manacheckloop
manaloopmain:
if #mana < #maxmana 2
wait 1
goto manaloopmain
if %undressed = #true
gosub dressLrc
return

sub dressInit
set %dressWait 100
gosub dressLrc init
set %dressedCnt #findcnt
gosub undressLrc init
set %undressedCnt #findcnt
set %dressWait ( %dressedCnt - %undressedCnt ) * 11
return

sub dressLrc
dress:
key f11
wait %dressWait
finditem * C_ , #charid
if ( %0 = 0 ) && ( #findcnt < %dressedCnt )
goto dress
set %undressed #false
return

sub undressLrc
undress:
key f12
wait %dressWait
finditem * C_ , #charid
if ( %0 = 0 ) && ( #findcnt > %undressedCnt )
goto undress
set %undressed #true
return

sub openhealthbar
if #charname = N/A
{
event macro 8 2
wait 10
}
return

sub warmode ;edit by atu
If %warmode = 0
{
repeat
{
msg # , warmode$
wait 2
scanjournal 1
}
until Warmode_OFF in #journal || Du_bist_kein_Young in #journal
set %warmode 1
}
return


sub showmenu
menu clear
menu window title Unmoving Magery
menu window size 180 95
menu window color black
menu font name arial
menu font size 12
menu font color Red
menu font bgcolor black
menu text title 5 5 UNMOVING MAGERY.
menu font size 8
menu font color lime
menu text mageryskill 5 25 Current skill:
menu text gains 5 40 Total gains:
menu text casting 5 55 Casting:
menu font color green
str len %currentskill
str ins %currentskill #dot #strRes
menu delete currentskill
menu text currentskill 68 25 #strRes
set %totalgains %currentskill - %startingskill
str len %totalgains
str ins %totalgains #dot #strRes
menu delete totalgains
menu text totalgains 68 40 #strRes
menu font align right
menu text credit 176 80 by snicker7.
menu font align left
menu show
return


killkill2k is offline  
Old   #5
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Magery/Resisting


Skill:
chooseskill Mage
if #skill < 400
{
event sysmessage Du musst mindestens 40 Magery haben um dieses Script zu nutzen!
halt
}
if #skill > 400 && #skill < 501
goto FireField
if #skill > 500 && #skill < 601
goto PoisonField
if #skill > 600 && #skill < 701
goto Invisible
if #skill > 700 && #skill < 801
goto ParaField
if #skill > 800 && #skill < 901
goto EnergyField
if #skill > 900 && #skill < 1000
goto Earthquake
if #skill >= 1000
goto ressisting



Firefield:
if #mana < 15
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 27
wait 2s
event macro 25 0
wait 10
event macro 23 0
wait 4s
goto skill


PoisonField:
if #mana < 25
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 38
wait 2s
event macro 25 0
wait 10
event macro 23 0
wait 4s
goto skill


Invisible:
if #mana < 20
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 43
wait 3s
event macro 25 0
wait 10
event macro 23 0
wait 4s
goto skill


ParaField:
if #mana < 20
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 46
wait 2s
event macro 25 0
wait 10
event macro 23 0
wait 4s
goto skill


EnergyField:
if #mana < 40
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 49
wait 2s
event macro 25 0
wait 10
event macro 23 0
wait 4s
goto skill


Earthquake:
if #mana < 50
{
event macro 13 46
while #mana < #maxmana
wait 10
}
else
event macro 15 56
wait 4s
goto skill


;-------------------------------------------------
; Resisting Spells
ressisting:
chooseskill resisting spells

if #skill < 650
goto drain
if #skill > 649 && #skill < 1000
goto vamp
if #skill = 1000
stop

drain:
if #mana < 20
{
event macro 13 46
while #mana < 100
wait 10
}
else
event macro 15 30
wait 1s
event macro 25 0
wait 2s
event macro 23 0
wait 2s
goto ressisting

vamp:
set #charid
if #mana < 40
{
event macro 13 46
while #mana < 50
wait 10
}
else
event macro 15 52
wait 1s
event macro 25 0
wait 2s
event macro 23 0
wait 2s
goto ressisting
killkill2k is offline  
Old   #6
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Peacemaking


;************************************************* **************************************
; Script Name: Paladin's PeaceMaker Trainer
; Author: Paladin
; Version: 2.0.0b - Last Updated 11/10/06
; Original Script Relase : 9/26/05
; Client Tested with: 5.0.1j
; EUO version tested with: 1.5 - test Version 69
; Shard OSI / FreeShards : Tested on FS Alexandria - Should work on OSI
; Global Variables Used: none
; Purpose: Raise your Peacemaking skill by Targeting yourself! Suggested use on a Boat!
; * if Musicianship is below 80 it will just gain music till 80 then do Peacemaking
;************************************************* **************************************

set %instruments QRF_NRF_MQF_PRF_LQF_OQF_QRF_PGP
set %StartTime #scnt
;************************************************* **************************************

_Start:

chooseskill musi
set %music #skill
event skillLock musi up
if %music < 800
{
set %startingskill #skill
set %currentskill #skill
gosub skillmenu
gosub music
}

chooseskill peac
set %startingskill #skill
set %currentskill #skill
event skillLock peac up


event macro 8 3
wait 20

gosub skillmenu
gosub PaladinScriptTimer 95 110 115 110
gosub findinstrument

_Main:

gosub PaladinScriptTimer 95 110 115 110
gosub checkcap
gosub peacemake

goto _Main

;================================================= ======================================

sub checkcap

chooseskill peac
if #skill = #skillcap
{
menu hide
display ok Finished! You've hit your Peacemaking Cap! Congrats!
halt
}

return

;================================================= ======================================

sub peacemake

event macro 13 9
wait 10

scanjournal 1
if shall_you_play in #journal
gosub findinstrument

if #targCurs = 1
{
event macro 23 0
gosub checkskill peac
gosub PaladinScriptTimer 95 110 115 110
menu delete _curstatus
menu text _curstatus 55 80 PeaceMake Skill wait..
wait 9s
}

return

;================================================= ======================================

sub findinstrument

set %dots .
set %_dots .

menu delete _curstatus
menu text _curstatus 55 80 Finding Instrument
menu delete _dots

for %i 1 10
{
menu text _dots 165 80 %_dots
wait 4
set %_dots %_dots , %dots
}

if #targCurs = 1
key esc

menu delete _dots

finditem %instruments C_ , #backpackid
if #findkind <> -1
{
menu delete _curstatus
menu text _curstatus 55 80 Instrument found!!
set #lobjectid #findid
wait 20
event macro 17 0
menu delete _curstatus
menu text _curstatus 55 80 Instrument played - waiting..
wait 7s
deletejournal
gosub PaladinScriptTimer 95 110 115 110
return
}

else
{
menu delete _dots
wait 10
key Esc
menu hide
display ok Out of Instruments! Halting!
halt
}

;================================================= ======================================

sub music

_musictraining:

gosub PaladinScriptTimer 95 110 115 110

gosub playmusic
chooseskill musi
if #skill >= 800
{
menu hide
menu clear
wait 5
goto _Start
}

else
goto _musictraining

;================================================= ======================================

sub playmusic

finditem %instruments C_ , #backpackid
if #findkind <> -1
{
set #lobjectid #findid
wait 10
event macro 17 0
gosub checkskill musi
gosub PaladinScriptTimer 95 110 115 110
menu delete _curstatus
menu text _curstatus 55 80 Instrument played - waiting..
wait 7s
return
}

else
{
wait 1s
menu hide
display Out of Instruments! Halting!
halt
}


;================================================= ======================================

sub checkskill

wait 1s
chooseskill %1
if #skill > %currentskill
{
set %currentskill #skill
str len %currentskill
str ins %currentskill #dot #strRes
menu delete _currentskill
menu text _currentskill 90 20 #strRes
set %skillgains %currentskill - %startingskill
str len %skillgains
str ins %skillgains #dot #strRes
menu delete _skillgains
menu text _skillgains 90 50 #strRes
}

gosub PaladinScriptTimer 95 110 115 110
return

;================================================= ======================================

sub skillmenu

menu clear
menu window title Paladin's PeaceMaker Trainer
menu window size 275 140
menu window color Black
menu Font Name Times New Roman
menu font bgcolor Black
menu font size 10
menu font color Yellow
menu text curskill 10 20 Current skill:
menu text totgains 10 50 Total gains:
menu text curstatus 10 80 Status:
menu text time 10 110 Time Running:
menu font color Lime

set %currentskill #skill
str len %currentskill
str ins %currentskill #dot #strRes
menu delete _currentskill
menu text _currentskill 90 20 #strRes
set %skillgains %currentskill - %startingskill
str len %skillgains
str ins %skillgains #dot #strRes
menu delete _skillgains
menu text _skillgains 90 50 #strRes

menu show
return


;================================================= =========================
; Please keep this header with the sub if you use it
;Name: PaladinScriptTimer Sub
;author: paladin
;Version 1.0 1
;Date released: 3/27/06
;Purpose: Sub that displays time in hours and minutes since
; script started
; Updates the displayed timer when called
;
; parameters : %1 menuposx for Hour display
; : %2 menuposy for Hour display
; : %3 menuposx for Minute display
; : %4 menuposy for Minute display
;
; returns nothing
;
;================================================= =========================

sub PaladinScriptTimer

set %TimeSpent #scnt - %StartTime

set %Hours ( %TimeSpent / 3600 )
set %Mins ( %TimeSpent / 60 ) - ( %Hours * 60 )

if %PrevHours <> %Hours
{
set %PrevHours %Hours
menu delete _Hours
menu text _Hours %1 %2 %Hours h
}
if %PrevMins <> %Mins
{
set %PrevMins %Mins
menu delete _Mins
menu text _Mins %3 %4 %Mins m
}

return

;================================================= =========================
killkill2k is offline  
Old   #7
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Taming


; Automatic Taming - Ein Script f?r alles von 3,5 - 100%
;_________________________________________________ _________________
;
; Author: Lauria
; Version: 1.0
; Datum:
;
;_________________________________________________ _________________
; Anleitung: Das Script fordert zur Auswahl des Tieres auf und
; sucht und tamt dieses dann bis der User das Script
; stoppt und von vorne beginnt. Um Fehler zu vermeiden
; wird gepr?ft ob der Skill zum Tamen ausreicht.

; Ablauf: 1.) Auswahl des Tieres ueber das Menu
; 2.) Auslesen des Tieres welches gewaehlt wurde
; 3.) ?berpr?fung des Mindest-Skills
; 4a) Wenn Skill OK dann Type festlegen
; 4b) Wenn Skill zu gering Fehlerausgabe - Neuwahl
; ------------------------------------------------
; 5.) Tier mit Tracking orten
; 6a) Tier Z?hmen
; 6b) erst Peacen dann z?hmen
; 7.) gez?hmtes Tier t?ten
; 8.) Taming ab Punkt 5 wiederholen


;_________________________________________________ _________________
set %blackbear BG
set %sheep PF_FG
set %eagle TC
set %polarbear VF
set %brownbear ZI
set %snowleo ZE
set %whitewolf GE_ZD
set %bulls XG_YG
set %rudelwolf LD
chooseskill Animal Taming

if #skill = 1000
{
display ok Du hast bereits Deinen Taming GM
stop
}
else
{

Tierauswahl:
menu show
menu window size 280 200
menu window color black
menu Font BGColor black
menu Font Color white
menu Font Style b
menu window title Automatic Taming by Lauria
menu Text Skill 28 20 Dein Momentaner Tamingskill: #skill
menu Text Skill 28 50 ________________________________
menu Text Skill 28 70 Tier ausw?hlen:
menu Combo Create Animals 35 90 210
menu Text Skill 28 110 ________________________________
menu Combo Add Animals Schwarzbaeren (3,5)
menu Combo Add Animals Schafe (11,1)
menu Combo Add Animals Adler (17,1)
menu Combo Add Animals Eisb?r (35,1)
menu Combo Add Animals Braunb?r (41,1)
menu Combo Add Animals Schneeleopard (53,1)
menu Combo Add Animals Eiswolf (65,1)
menu Combo Add Animals Bullen (71,1)
menu Combo Add Animals Wolfsrudel (83,1)
menu button tame 55 150 180 20 Suchen und zaehmen ...

set #menuButton Nothing
lookButton:
if #menuButton <> Nothing
{
menu get Animals
set %tamepet #menures
menu hide
goto typen

}
goto lookButton

;_________________________________________________ __________________
; TYPENVERGABE

typen:
if %tamepet = 1
{
chooseskill Animal Taming
if #skill >= 35
{
set %pettype %blackbear
event SysMessage Schwarzbaeren
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu zaehmen. $ $ Bitte waehle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 2
{
chooseskill Animal Taming
if #skill >= 111
{
set %pettype %sheep
event SysMessage Schaafe
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu zaehmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 3
{
chooseskill Animal Taming
if #skill >= 171
{
set %pettype %eagle
event SysMessage Adler
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 4
{
chooseskill Animal Taming
if #skill >= 351
{
set %pettype %polarbear
event SysMessage Eisbaeren
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 5
{
chooseskill Animal Taming
if #skill >= 401
{
set %pettype %brownbear
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 6
{
chooseskill Animal Taming
if #skill >= 531
{
set %pettype %snowleo
event SysMessage Schneeleoparden
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}

if %tamepet = 7
{
chooseskill Animal Taming
if #skill >= 651
{
set %pettype %whitewolf
event SysMessage Weisse Woelfe
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 8
{
chooseskill Animal Taming
if #skill >= 711
{
set %pettype %bulls
event SysMessage Bullen
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
if %tamepet = 9
{
chooseskill Animal Taming
if #skill >= 831
{
set %pettype %rudelwolf
event SysMessage Rudelwoelfe
goto tamepet
}
else
{
display Dein Skill im Animal Taming reicht nicht aus, $ um das das Tier zu z?hmen. $ $ Bitte w?hle ein anderes aus.
wait 2s
goto Tierauswahl
}
}
;_________________________________________________ __________________
; Beginn des Hauptteils

tamepet:
initevents
set %types %pettype
start:
finditem %types G_11
if #findcnt = 0
{
goto start
}
set %object #findid
gosub tame
goto start

sub tame
tame:
finditem %object
if #findkind = -1
return
event macro 13 35
set #ltargetid %object
set #ltargetkind 1
target 1s
event macro 22 0
wait 1s
if #findcol = 49
ignoreitem %object
scanjournal
if already in #journal
goto kill
if bereits in #journal
{
kill:
finditem %object
if #findkind = -1
{
event macro 1 0 all guard
return
}
wait 10
event macro 1 0 all kill
target 1s
event macro 22 0
wait 10
goto kill
}
if #sysmsg = EIN_ANDERER_Z?HMT_DIESES_WESEN_BEREITS.
{
ignoreitem %object
return
}
goto tame
killkill2k is offline  
Old   #8
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
Taming
(Bei diesem Script müsst ihr die Variablen ändern wo genau eure Minerkiste steht X und Y und natürlich auch die ID von der Kiste.)


menu hideeuo
menu hide

; *****************
; *** VARIABLEN ***
; *****************

set %minerkistex 1253
set %minerkistey 1264
set %minerkiste MFXTBPD
set %spitzhacke QPF
set %maxweight #maxweight - 127
set %targetkind 3
set %erzsorten 8
; *********************
; *** UND LOS GEHTS ***
; *********************

finditem %spitzhacke
if #findtype = X
{
gosub neuespitzhacke
}


spot01:
move 1263 1251 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot02:
move 1260 1244 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1342
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot03:
move 1258 1237 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #lTargetKind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #lTargetKind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #lTargetKind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #lTargetKind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot04:
move 1260 1228 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot05:
move 1265 1223 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot06:
move 1265 1217 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot07:
move 1275 1217 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot08:
move 1272 1224 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot09:
move 1254 1243 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1341
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot09verite:
move 1249 1248 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1347
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1347
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1347
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1347
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot10:
move 1242 1245 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot11:
move 1237 1248 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot12:
move 1230 1253 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1340
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot13:
move 1227 1260 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1339
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}

spot14:
move 1235 1260 0
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1343
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1343
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1343
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
gosub check
}
finditem %spitzhacke
set #lobjectid #findid
set #lTargetX #charposx
set #lTargetY #charposy
set #ltargetz #charposz
set #ltargetkind %targetkind
set #ltargettile 1343
for minecount 1 2
{
event macro 17 0
target
wait 20
event macro 22 0
wait 20
move 1239 1245 0
move 1250 1245 0
gosub check
}

goto spot01

; *******************
; *** SUBROUTINEN ***
; *******************

sub neuespitzhacke
move 1254 1241 0
move 1264 1251 0
move 1264 1265 0
move 1253 1265 0
move %minerkistex %minerkistey 0
finditem %minerkiste
set #lobjectid #findid
target
event macro 17 0
wait 10
finditem %spitzhacke
exevent drag #findid
wait 10
exevent droppd
wait 10

return

sub check
wait 20
finditem %spitzhacke
if #findtype = X
{
gosub neuespitzhacke
gosub truhe-mineneingang
}
if #weight > %maxweight
{
move 1254 1241 0
move 1264 1251 0
move 1264 1265 0
gosub schmelzen
gosub truhe-mineneingang
}
return

sub truhe-mineneingang
move 1263 1251 0
move 1260 1241 0
move 1255 1241 0
return

sub schmelzen
move 1260 1257 0
wait 10
for %count 1 %erzsorten
{
set #ltargetx 1259
set #ltargety 1256
set #ltargetkind 1
set #ltargetid EWEDKMD
finditem DWJ C_ , #backpackid
set #lobjectid #findid
event macro 17
target
event macro 22
wait 10
}
gosub ablegen
return

sub ablegen
move 1260 1265 0
move 1253 1264 0
move %minerkistex %minerkistey 0
wait 10
for %count 1 %erzsorten
{
finditem ENK C_ , #backpackid
exevent drag #findid #findstack
wait 10
exevent dropc %minerkiste
wait 10

}
return
killkill2k is offline  
Old   #9
 
elite*gold: 0
Join Date: Sep 2005
Posts: 77
Received Thanks: 11
So da ich in letzter Zeit oft im Jail war wegen Afk macroing, habe ich mal einen Script gemacht der wenn ein Counsi GM/Gamemaster Seer Admin eine Kontrolle macht.
Automatisch ein Alarm ausgelöst wird und nach ein paar sekunden, selbst ständigt messages in UO schreibt.
Der Alarm geht solange bis der script zuende ist, das sind ungefähr 60 sekunden...
Dann habe ich noch einmal hinzugefügt das der char automatisch eine msg sendet das man weg muss ( Grund könnti hr selbst hinschreiben) und dann den Charachter direkt auslogt.
Wer intresse an dem script hat kann mich ja anschreiben und sagen wo er spielt welchen Client er benutzt.

Ich selber benutzte den weil ich leider nicht mehr die Zeit habe die ganze zeit direkt vorm PC zu sitzen und pgen kann.


killkill2k is offline  
Reply



« Previous Thread | Next Thread »

Similar Threads
Script fürs Angeln gesucht EasyUO
Servus, ich suche jemand der sich etwas mit Easy UO auskennt. Ich würd gern ein einfaches Script haben/oder schreiben um an Land einfach zu...
2 Replies - General Gaming Discussion
agBot Loop Scripts [ Let's Make alist with Mobs Scripts ]
Hello Everyone, i saw that everyone is getting stuck to make agBot Loop Script. so i though we should make a topic a mobs scripts. and i will start....
228 Replies - SRO Hacks, Bots, Cheats & Exploits



All times are GMT +1. The time now is 22:32.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.