scn bKasernenNeuerSoldatImperialCityScript
short NeuerSoldat
Begin OnActivate
set NeuerSoldat to GetRandomPercent
if (NeuerSoldat <= 9)
if (bKasernenSIC1.GetInCell bKasernenDummyCell =1)
bKasernenSIC1.moveto player
endif
elseif (NeuerSoldat <= 19)
if (bKasernenSIC2.GetInCell bKasernenDummyCell =1)
bKasernenSIC2.moveto player
endif
[...]
Endif
End