On *:TEXT:*:#BiNARY-staff:{ set %nukel $strip($6) set %nuked false set %reason false if (*MP3* iswm $4) { if (*WEB* iswm %nukel) { set %nuked true set %reason WEB.not.allowed_read.rules } if (*VLS* iswm %nukel) { set %nuked true set %reason VLS.not.allowed_read.rules } if (*TAPE* iswm %nukel) { set %nuked true set %reason TAPE.not.allowed_read.rules } if (*SAT* iswm %nukel) { set %nuked true set %reason SAT.not.allowed_read.rules } if (*SBD* iswm %nukel) { set %nuked true set %reason SBD.not.allowed_read.rules } if (*Live* iswm %nukel) { set %nuked true set %reason Live.not.allowed_read.rules } if ("Liveset* iswm %nukel) { set %nuked true set %reason Liveset.not.allowed_read.rules } if (*DVB* iswm %nukel) { set %nuked true set %reason DVB.not.allowed_read.rules } if (*DVBS* iswm %nukel) { set %nuked true set %reason DVBS.not.allowed_read.rules } if (*BOOTLEG* iswm %nukel) { set %nuked true set %reason BOOTLEG.not.allowed_read.rules } if (*VINYL* iswm %nukel) { set %nuked true set %reason VNYL.not.allowed_read.rules } if (*SSL* iswm %nukel) { set %nuked true set %reason SSL.not.allowed_read.rules } if (*LP* iswm %nukel) { set %nuked true set %reason LP.not.allowed_read.rules } if (*DVD* iswm %nukel) { set %nuked true set %reason DVD.not.allowed_read.rules } if (*Homemade* iswm %nukel) { set %nuked true set %reason HOMEMADE.not.allowed_read.rules } if (*MAG* iswm %nukel) { set %nuked true set %reason MAG.not.allowed_read.rules } if (*Demo* iswm %nukel) { set %nuked true set %reason DEMO.not.allowed_read.rules } if (*Cable* iswm %nukel) { set %nuked true set %reason CABLE.not.allowed_read.rules } if (*FM* iswm %nukel) { set %nuked true set %reason FM.not.allowed_read.rules } if (*Radio* iswm %nukel) { set %nuked true set %reason RADIO.not.allowed_read.rules } if (*TV* iswm %nukel) { set %nuked true set %reason TV.not.allowed_read.rules } if (*DAB* iswm %nukel) { set %nuked true set %reason DAB.not.allowed_read.rules } if (*DVBA* iswm %nukel) { set %nuked true set %reason DVBA.not.allowed_read.rules } if (%nuked == true) { msg #binary-nuke !nuke $strip($6) $strip(3) %reason ;unset %nuked unset %reason } } }