Pomogite Popravit' skript

Ask for help

Moderators: Murderator+, Murderator

Post Reply
Dumus
Posts: 14
Joined: 2006-04-02 20:05:34

Pomogite Popravit' skript

Post by Dumus »

sub regi()
uo.print(Sunduk)
uo.exec('addobject Sunduk')
while uo.targeting()
wait(100)
wend
VAR c
DIM Reg[27]
Reg[0] = '0x0f7a' #Black Pearl#
Reg[1] = '0x0f7b' #Blood Moss#
Reg[2] = '0x0f86' #Mandrake Root#
Reg[3] = '0x0F84' #Garlic#
Reg[4] = '0x0F8C' #Sulphorous Ash#
Reg[5] = '0x0F88' #Night Shade#
Reg[6] = '0x0f8d' #Spider Silk#
Reg[7] = '0x0f85' #Ginseng#
Reg[8] = '0x0f91' #Wirm Heart#
Reg[9] = '0x0eed' #Gold#
Reg[10] = '0x0f7c' #Bloodspawn#
Reg[11] = '0x0f8b' #Pumice#
Reg[12] = '0x0f79' #BlackMoors#
Reg[13] = '0x0f83' #Executioners#
Reg[14] = '0x0f78' #BatWings#
Reg[15] = '0x0f81' #FerieDirt#
Reg[16] = '0x0f7d' #Vials of Blood#
Reg[17] = '0x0f8a' #Pig Irons#
Reg[18] = '0x0f82' #Dragons Blood#
Reg[19] = '0x0f8f' #Volcanic Ash#
Reg[20] = '0x0f8e' #Serpent Scale#
Reg[21] = '0x0f7f' #BrimStones#
Reg[22] = '0x0f7e' #Bones#
Reg[23] = '0x0f80' #DaemonBones#
Reg[24] = '0x0f89' #Obsidians#
Reg[25] = '0x0f87' #Eyes Of Newt#
Reg[26] = '0x0f90' #DeadWood#
for c = 0 to 26
if uo.count(Reg[c]) < 999 then
uo.findtype(Reg[c], '-1', 'Sunduk')
if uo.findcount() > 0 then
uo.moveitem('finditem', '0')
wait(1000)
else
uo.print(Net Regov)
return
endif
endif
next
end sub



Problema v tom 4to esli v sunduke netu kakogo libo iz pervyh objektov to dal6e on ne i6et i pi6et srazu 4to "NET Regov"

T.e esli v sunduke k primeru est' vse vidi regov krome Black Pearl to on skazet 4to regov NET esli polozit' VSE regi kotorie ukazanni v skripte to vsjo ok...vsjo zalootit...popravte plz :)
flake
Expert!
Posts: 746
Joined: 2004-08-11 23:56:17
Location: The Citadel
Contact:

Post by flake »

Code: Select all

sub regi() 
uo.print(Sunduk)
uo.exec('addobject Sunduk')
while uo.targeting()
wait(100)
wend
VAR c
DIM Reg[27]
Reg[0] = '0x0f7a' #Black Pearl#
Reg[1] = '0x0f7b' #Blood Moss#
Reg[2] = '0x0f86' #Mandrake Root#
Reg[3] = '0x0F84' #Garlic#
Reg[4] = '0x0F8C' #Sulphorous Ash#
Reg[5] = '0x0F88' #Night Shade#
Reg[6] = '0x0f8d' #Spider Silk#
Reg[7] = '0x0f85' #Ginseng#
Reg[8] = '0x0f91' #Wirm Heart#
Reg[9] = '0x0eed' #Gold#
Reg[10] = '0x0f7c' #Bloodspawn#
Reg[11] = '0x0f8b' #Pumice#
Reg[12] = '0x0f79' #BlackMoors#
Reg[13] = '0x0f83' #Executioners#
Reg[14] = '0x0f78' #BatWings#
Reg[15] = '0x0f81' #FerieDirt#
Reg[16] = '0x0f7d' #Vials of Blood#
Reg[17] = '0x0f8a' #Pig Irons#
Reg[18] = '0x0f82' #Dragons Blood#
Reg[19] = '0x0f8f' #Volcanic Ash#
Reg[20] = '0x0f8e' #Serpent Scale#
Reg[21] = '0x0f7f' #BrimStones#
Reg[22] = '0x0f7e' #Bones#
Reg[23] = '0x0f80' #DaemonBones#
Reg[24] = '0x0f89' #Obsidians#
Reg[25] = '0x0f87' #Eyes Of Newt#
Reg[26] = '0x0f90' #DeadWood#
for c = 0 to 26
if uo.count(Reg[c]) < 999 then
uo.findtype(Reg[c], '-1', 'Sunduk')
if uo.findcount() > 0 then
uo.moveitem('finditem', '0')
wait(1000)
else
uo.print(Net Regov)
 ; return убрать надо и всё :)
endif
endif
next
end sub
Dumus
Posts: 14
Joined: 2006-04-02 20:05:34

Post by Dumus »

Vsjo spasibo 4to pomogli lameru :) vsjo rabotaet
Post Reply