Procedure LoadSounds; Begin LoadSndFile('trojky.snd',0); LoadRawFile('trojky0.raw',0,0); LoadRawFile('trojky1.raw',0,1); LoadRawFile('trojky2.raw',0,2); LoadRawFile('trojky3.raw',0,3); LoadRawFile('trojky4.raw',0,4); End;