[Seisunix] Top Mute

Hi all! I have real seismic data and I want to apply top mute to this data. Actually, I can apply top mute to shot gathers one by one, but I wanted to create a script that could apply top mute to all of them, but I could not get a good result. Do I need to create a script that includes a loop to do this properly? What path should I follow? I would be happy if you could help Best Erdi P.S.: I attached a script I wrote ( I tried to do top mute only for the right upper side of the shot gathers for testing), and how they look after applying my script, and output of surange command.