[HolyDel]

ent=loadanimmesh("a.3ds")
for i=1 to countchildren(ent)
child=getchild(ent,i)
name$=entityname(child)
cmd$=lower(mid(name,1,instr("_",name)-1))
dat$=lower(mid(name,instr("_",name)+1))
select cmd
case "npc"
select dat
case "gorn"
creategorn(entityx(child,1),entityy(child,1),entit yz(child,1))
end select
freeentity child
case "monster"
freeentity child
case "fire"
freeentity child
end select

next