Поэтому я написал вот такой маленький скриптик, очень помогает...
Оденьте на себя все что хочется, запустите:
Code: Select all
program testlayer;
var
i:word;
function checkl(lay:Byte) : string;
begin
i := GetType(ObjAtLayer(lay));
result := '$' + inttohex(i,4);
if result = '$0000' then result := 'none';
end;
begin
AddToSystemJournal('RhandLayer: ' + checkl(RhandLayer));
AddToSystemJournal('LhandLayer: ' + checkl(LhandLayer));
AddToSystemJournal('ShoesLayer: ' + checkl(ShoesLayer));
AddToSystemJournal('PantsLayer: ' + checkl(PantsLayer));
AddToSystemJournal('ShirtLayer: ' + checkl(ShirtLayer));
AddToSystemJournal('HatLayer: ' + checkl(HatLayer));
AddToSystemJournal('GlovesLayer: ' + checkl(GlovesLayer));
AddToSystemJournal('RingLayer: ' + checkl(RingLayer));
AddToSystemJournal('NeckLayer: ' + checkl(NeckLayer));
AddToSystemJournal('WaistLayer: ' + checkl(WaistLayer));
AddToSystemJournal('TorsoLayer: ' + checkl(TorsoLayer));
AddToSystemJournal('BraceLayer: ' + checkl(BraceLayer));
AddToSystemJournal('TorsoHLayer: ' + checkl(TorsoHLayer));
AddToSystemJournal('EarLayer: ' + checkl(EarLayer));
AddToSystemJournal('ArmsLayer: ' + checkl(ArmsLayer));
AddToSystemJournal('CloakLayer: ' + checkl(CloakLayer));
AddToSystemJournal('RobeLayer: ' + checkl(RobeLayer));
AddToSystemJournal('EggsLayer: ' + checkl(EggsLayer));
AddToSystemJournal('LegsLayer: ' + checkl(LegsLayer));
end.
Code: Select all
RhandLayer: $13E3
LhandLayer: $1B76
ShoesLayer: none
PantsLayer: $1411
ShirtLayer: none
HatLayer: $1412
GlovesLayer: $1414
RingLayer: none
NeckLayer: $1413
WaistLayer: none
TorsoLayer: $1415
BraceLayer: none
TorsoHLayer: none
EarLayer: none
ArmsLayer: $1410
CloakLayer: none
RobeLayer: none
EggsLayer: none
LegsLayer: none