Stránka 1 z 2
healing dvou( a vic)
Napsal: 22.04.2008 15:52:31
od Leman
pls mate nejaky script v kterym zadam dva(nebo vic) lidi ktere chcu healit bandama a by to healilo toho co ma nejmin hp
Napsal: 22.04.2008 15:55:43
od Patejl
Kód: Vybrat vše
sub healx()
var HP,MHP,DMG,MIN,OBJ,TIME
var n=2 ; napiste cislo kolik lidi chcete lecit
for var X=1 to n
UO.AddObject("OBJ"+str(X))
While UO.Targeting()
Wait(300)
Wend
next
Repeat
DMG=0
for X=1 to n
If UO.GetDistance("OBJ"+str(X))<=6 Then
MHP=UO.GetMaxHP("OBJ"+str(X))
HP=UO.GetHP("OBJ"+str(X))
If HP<MHP and (HP<MIN>UO.Count("0x0e21") or (UO.Timer()-Time)>40
If (UO.Timer()-Time) < 5 Then
UO.WarMode(0)
Wait(500)
UO.WarMode(1)
Wait(500)
Endif
Endif
Wait(500)
Until UO.Dead() or UO.Count("0x0e21")<2
If NOT UO.Dead() THEN
for X=1 to 3
UO.Msg("Od sebe, dosly bandy!!")
Wait(3250)
next
Endif
end sub
nedelal sem to ja, ale je docela funkcni, jestli je v necem spatnej, tak se predem omlouvam
Napsal: 22.04.2008 15:58:23
od Leman
nwm proc ale nejede mi
Napsal: 22.04.2008 16:01:47
od Patejl
jakou mas verzi yoka?
edit:
v zalozce "Main" uplne vlevo dole
Napsal: 22.04.2008 16:09:44
od Leman
heh to nwm, jak to zjistim ?
Napsal: 22.04.2008 17:48:08
od Patejl
v zalozce "Main" uplne vlevo dole
Napsal: 22.04.2008 18:17:03
od Leman
YokoInjection 505.18 VeNdOr
Napsal: 22.04.2008 18:19:22
od Wilson
Leman píše:YokoInjection 505.18 VeNdOr
hmm tak to je divny, to by ti melo fungovat ... neudelal si pri kopirovani nejakou chybu? treba nezkopiroval o pismenko vic ci tak neco? Skus si to este prekontrolovat, jestli tam nemas nakej preklep ...
Napsal: 22.04.2008 18:29:20
od Raegann
Leman píše:nwm proc ale nejede mi
Specifikuj "nejede mi". Pri spusteni to vubec nic neudela nebo to projede napr. cyklus jen jednou nebo ti to hlasi nejakou chybu?
Napsal: 22.04.2008 20:23:33
od Prafotr Morava
pokud nevíš ani kde zjistíš verzi bylo by pro tebe lepší pokusit se o jinej program
Napsal: 22.04.2008 20:55:24
od Wilson
Prafotr Morava píše:pokud nevíš ani kde zjistíš verzi bylo by pro tebe lepší pokusit se o jinej program
ja to taky kdyz sem zacinal s yokem nevedel
Napsal: 22.04.2008 21:00:34
od Seluwe Lathaniel
ja taky ;p . nejlepsi bylo jak sem byl u kamose a lootoval prachy s klavesou f11 , ja to doma skousel a porad to nic nedelalo
(samozrejme ze som nemel ty hotkeys) tak sem hral cistyho clienta
Napsal: 28.04.2008 09:45:59
od Leman
chyba - line849 parse error
a tuto chbu mi delaji celkem hodne scriptu kdyz je zkopiruju z nejake stranky
Napsal: 28.04.2008 09:48:10
od Castian
v riadku 849 mas chybu v scripte:p
Napsal: 28.04.2008 09:51:16
od Leman
no ale pokud neni ten script chybny tak to dobre je
a kdyz tam dam jen ten script tak to pise chybu v 18. radku
Napsal: 28.04.2008 09:55:18
od Castian
no keby si radsej napisal ten priblizny riadok +- tri predchadzajuce a nasledujuce riadky toho scriptu asi by sme boli mudrejsi.
-------------------------------------
Mozes este skusit to, ze si das tento script samostatne do jedneho subora (napr. healing.sc) a skusis ho spustit tak. Mozno sa ti biju nejake scripty medzi sebou.
Napsal: 28.04.2008 10:01:38
od Leman
[quote="Patejl"]
Kód: Vybrat vše
sub healx()
var HP,MHP,DMG,MIN,OBJ,TIME
Repeat
DMG=0
for X=1 to n
If UO.GetDistance("OBJ"+str(X))<=6 Then
MHP=UO.GetMaxHP("OBJ"+str(X))
HP=UO.GetHP("OBJ"+str(X))
If HP<MHP and (HP<MIN>UO.Count("0x0e21") or (UO.Timer()-Time)>40
If (UO.Timer()-Time) < 5 Then
UO.WarMode(0)
Wait(500)
end sub
ten If HP<MHP by měl být chybný
Napsal: 28.04.2008 11:51:14
od Dexxter
podmienka "if" sa viaze na "then" , ktore ti tam chyba
Napsal: 28.04.2008 15:06:26
od Leman
takze jak to ma byt
Napsal: 01.05.2008 09:58:23
od Samial
já nevim, proč musíte publikovat skript kerej za minutu desetkrát přepne war a já teda vůbec nevim proč.. lagy, lagy, hou, hou...