Code: Select all
Sub checkcolor(npc)
#©Kynep[The END]
VAR i, cvet
DIM color[12]
color[0] = ' ' #Dragon Elemental
color[1] = ' ' #Crystaline Elemental
color[2] = ' ' #Krynite Elemental
color[3] = ' ' #Vulcan Elemental
color[4] = ' ' #Sand Rock Elemental
color[5] = ' ' #Blood Crest Elemental
color[6] = ' ' #Steel Elemental
color[7] = ' ' #Elvin Elemental
color[8] = ' ' #Gorgan Elemental
color[9] = ' ' #Acid Elemental
color[10] = ' ' #Aqua Elemental
color[11] = ' ' #Eldar Elemental
cvet = UO.GetColor(npc)
for i = 0 to 11
If cvet == color[i] then
return 1
i = 11
else
return 0
end if
next
end sub
(На вид вроде рабочий

Как его правильнее использовать, так:
Code: Select all
VAR iscast
iscast = checkcolor(Elem)
repeat
. . .
If iscast == 1 then
. . .
until
или так:
Code: Select all
repeat
. . .
If checkcolor(Elem) == 1 then
. . .
until
Как удобнее, безопаснее и получше? И будет ли работать ваапще

Вопрос номер два, как можно определить то что элема выкопа именно я?
(Ход мыслей)
Во время выкапывания элема, над головой чара появляется: OOPS !!! и т.д. Это фраза идет в журнал?(проверить не мог, вчера элема ждал до часа ночи
