There is any solution to make a toolstip desc without capital letters on each word? I use a modif. script, linked below. Also image with my problem.
See that? All first letters are capital. I was good in escript about 10 years ago, but packethooks got me crazy
Code: Select all
const OFFSET_OBJECT_SERIAL := 0x05;
const OFFSET_CLILOC_ID := 0x0F;
const OFFSET_LENGTH_ID := 0x13;
const OFFSET_UNICODE_TEXT := 0x14;
use basic;
use uo;
use cfgfile;
use polsys;
var Weapon_Cfg := ReadConfigFile(":combat:itemdesc");
var Itemdesc_Cfg := ReadConfigFile("itemdesc");
program Install()
Print("INSTALLING: Outgoing Tooltip PH...");
return 1;
endprogram
exported function MegaCliloc( who, byref packet )
var xObject := SystemFindObjectBySerial(packet.GetInt32(OFFSET_OBJECT_SERIAL));
who := who;
if ( xObject )
packet.SetSize(15);
var Object_Name;
var Dice_Dmg := Weapon_Cfg[xObject.objtype].Damage;
if( xObject.IsA(POLCLASS_MOBILE) )
Object_Name := CAscZ(xObject.name);
elseif ( xObject.IsA(POLCLASS_ITEM) )
//Object_Name := CAscZ("<BASEFONT COLOR=#FFFFFF><C>" + xObject.desc);
Object_Name := CAscZ(xObject.desc);
endif
packet.SetInt32(OFFSET_CLILOC_ID, 1042971);
packet.SetUnicodeString(OFFSET_UNICODE_TEXT, Object_Name, 1);
packet.SetInt16(OFFSET_LENGTH_ID, Object_Name.Size() * 2);
var xDesc := "";
if( xObject.IsA(POLCLASS_MOBILE) )
if( xObject.title_guild )
xDesc := xDesc + "<BASEFONT COLOR=#ffcc33><C>[" + xObject.title_guild + "]" + "<BASEFONT COLOR=#FFFFFF><C><br>";
endif
if( !xObject.cmdlevel && !xObject.npctemplate)
xDesc := xDesc + Cint(GetObjProperty(xObject, "lata")) + " Lat<br>";
else
if(!xObject.npctemplate)
xDesc := xDesc + "<BASEFONT COLOR=#00FF00>[Ekipa serwera]<br></BASEFONT>";
endif
endif
elseif( xObject.IsA(POLCLASS_ITEM))
var typ := GetObjProperty(xObject, "typ");
var israre := GetObjProperty(xObject, "IsRare");
if (xObject.objtype == 0x8900) // startstone
xDesc := xDesc + "Uzyj aby rozdac statystyki i wybrac rase.";
endif
xDesc := CAscZ(xDesc);
if ( xDesc.Size() > 0 )
packet.SetInt32(packet.GetSize() - 1, 1070722);
var Length_ID := packet.GetSize();
packet.SetUnicodeString(packet.GetSize() + 1, xDesc, 1);
packet.SetInt16(Length_ID, xDesc.Size() * 2);
endif
packet.SetInt32(packet.GetSize(), 0);
endif
if( xObject.IsA(POLCLASS_MOBILE) )
IncRevision(xObject);
endif
return 0;
endfunction