Not too drastic but how do i shorten this?
I'm not sure if i can use 'with ... do ... ' here.
Simba Code:case Strings[0] of // the DTM's are for the spell...
'Sapphire' : begin
Ench:= DTMFromString('m6wAAAHic42ZgYGhlYmDoAOJuIG4A4mYobgfiLqh4B1TMkxEVuwGxExQ7A7EvEPtDMafrRwae7F8MBvLMYPz792+G78+5GEpiDYDYEMw/tECAIduHhYEV6A5iMSMJGAkAADhqGJ4=');
case Strings[1] of
'Ring' : Str2 := '';
'Necklace' : Str2 := '';
'Bracelet' : Str2 := '';
'Amulet' : Str2 := '';
end;
end;
'Emerald' : begin
Ench:= DTMFromString('');
case Strings[1] of
'Ring' : Str2 := '';
'Necklace' : Str2 := '';
'Bracelet' : Str2 := '';
'Amulet' : Str2 := '';
end;
end;
'Ruby' : begin
Ench:= DTMFromString('');
case Strings[1] of
'Ring' : Str2 := '';
'Necklace' : Str2 := '';
'Bracelet' : Str2 := '';
'Amulet' : Str2 := '';
end;
end;
'Diamond' : begin
Ench:= DTMFromString('');
case Strings[1] of
'Ring' : Str2 := '';
'Necklace' : Str2 := '';
'Bracelet' : Str2 := '';
'Amulet' : Str2 := '';
end;
end;
'Dragonstone': begin
Ench:= DTMFromString('');
case Strings[1] of
'Ring' : Str2 := '';
'Necklace' : Str2 := '';
'Bracelet' : Str2 := '';
'Amulet' : Str2 := '';
end;
end;
end;
ty![]()


Reply With Quote






