on *:TEXT:*:*:{
if ($gettok($server,-2-,46) == p2p-network.net && $chan == #echo.pre && $nick == REM0TE && $strip($1) == [PRE]) {
set %predcat $gettok($strip($1-),-2,32)
set %ecpred $strip($8)
if (%ecpred != %eclast) {
set %eclast %ecpred
  if (*NUKE* iswm $1-) {  }
  else { msg #rlslog-pre - 7[12P0R4E7] - 7[ %predcat 7] - 7[ %ecpred 7] }
;  if (*PRE*FRENCH* iswm %ecpred) msg #rlslog-pre - 7[12P0R4E7] - 7[ %predcat 7] - 7[ %ecpred 7]
;  if (*PRE*MULTi* iswm %ecpred) msg #rlslog-pre - 7[12P0R4E7] - 7[ %predcat 7] - 7[ %ecpred 7]
;  if (*PRE*-FR-* iswm %ecpred) msg #rlslog-pre - 7[12P0R4E7] - 7[ %predcat 7] - 7[ %ecpred 7]
;  if (*PRE*-FR-*NUKE* iswm $1-) msg #rlslog-pre - 7[12P0R4E7] - 7[ 4NUKE 7] 7[ $7 7] - 7[ $13 7] - 7[ Reason : $19 7] - 7[ Pred @ $22 7]
;  if (*PRE*MULTi*NUKE* iswm $1-) msg #rlslog-pre - 7[12P0R4E7] - 7[ 4NUKE 7] 7[ $7 7] - 7[ $13 7] - 7[ Reason : $19 7] - 7[ Pred @ $22 7]
;  if (*PRE*FRENCH*NUKE* iswm $1-) msg #rlslog-pre - 7[12P0R4E7] - 7[ 4NUKE 7] 7[ $7 7] - 7[ $13 7] - 7[ Reason : $19 7] - 7[ Pred @ $22 7]
}
}
}