on 1:INPUT:#:{ 
  if (( [*] * allied * hostile staff. iswm $1- ) || ( [*] * allied * stole * land* iswm $1- )) { msg $active 3 $+  $1- | halt }
  if (( [*] * hostile * allied staff. iswm $1- ) || ( [*] * hostile * stole * land* iswm $1- )) { msg $active 4 $+  $1- | halt }
  if ( You gained isin $1-) {  if ( effectiveness. isin $1- ) || (fame. isin $1-) || (lawfulness. isin $1-) {     msg $active 3 $+  $1- | halt }  }
  if ( You lost isin $1-) {  if ( effectiveness. isin $1- ) || (fame. isin $1-) || (lawfulness. isin $1-) {     msg $active 4 $+  $1- | halt }  }
  if ( You stole * land. [*] tree.* iswm $1- ) { msg $active 3 $+  $1- | halt } 
  if ( ( *:*[*]*enemies* iswm $1- ) ||  ( *:*[*]*friendlies* iswm $1- )) { 
    var %match $1-
    if ( ( *:*[*]*enemies* iswm $1- ) &&  ( *:*[*]*friendlies* iswm $1- )) {  var %match $replace( %match , : , : $+ 03 ) |       var %match $replace( %match , . , . $+ 04 )    }
    if ( ( *:*[*]*enemies* iswm $1- ) &&  ( *:*[*]*friendlies* !iswm $1- )) {  var %match $replace( %match , : , : $+ 03 )    }
    if ( ( *:*[*]*enemies* !iswm $1- ) &&  ( *:*[*]*friendlies* iswm $1- )) {  var %match $replace( %match , : , : $+ 04 )     }
    msg $chan %match 
    halt
  }
}