' *** TIDELI.LST *** 2nd GFA-Manual, page 16-13 > PROCEDURE sound_tideli ' ' *** Tideli-sound ' SOUND 0,15,2,3,5 SOUND 0,15,2,4,5 SOUND 0,15,2,3,5 SOUND 0,15,2,5,5 SOUND 0,15,2,3,5 SOUND 0,15,2,6,10 SOUND 0,0 RETURN ' ********* '