Code: Select all
use uo;
program unequiparmor(chr, item)
if (GetObjProperty(item, "Unequipable"))
return 0;
endif
return 1;
endprogram
Code: Select all
program unequiparmor(chr, item)
use uo;
0: get arg 'chr'
1: get arg 'item'
if (GetObjProperty(item, "Unequipable"))
2: local #1
3: "Unequipable"
4: Func(2,0): GetObjProperty
5: if false goto 8
return 0;
6: 0L
7: progend
return 1;
8: 1L
9: progend
10: leave block(2)
11: progend
Unhandled Exception! Writing Minidump file.
This file with explanation and last lines from log files should be given to the development team.
Saved dump file to 'POL097.1-2008-12-08 Coregina-20090103002053-0.dmp'
Last Script: pkg/combate/combat/unequiptest.ecl PC: 1085
sounds strage line 1085 but lst file have only eleven lines.