| Code: |
use uo;
program dmg(who, character)
var item;
SendSysmessage( character , "Select an Item." );
item := Target( character , TGTOPT_NOCHECK_LOS );
if(!item or item.intelligence)
SendSysmessage( character , "Invalid selection." );
return;
endif
function General( item )
if(item.hp)
data[16] := item.hp + "/" + item.maxhp;
else
data[16] := "n/a";
layout[36] := 0;
endif
var weapfile := ReadConfigFile( ":combat:itemdesc" );
var entry := weapfile[item.objtype].damage;
if(entry)
var dam := weapfile[item.objtype].damage;
data[17] := "Damage";
data[18] := dam;
data[32] := "Dmg modifier";
data[33] := item.dmg_mod;
endif
sendsysmessage(who," Damage: " + dam + " / Dmg modifier: " + item.dmg_mod );
endfunction
endprogram
|
