Firstly, there are a couple things I would change:
1) instead of all these line cosuming if statements(will also make script REALLY short and compact) make one a text file and put these in there)
on *:text:!pie*:#pie: {
if ($2 == $me) { describe $chan $read(c:\\users\\mark\\pie.txt) at $nick OPPZ. }
else if ($2 == $null) {
describe $chan $read(c:\\users\\mark\\pie.txt) and laughs.
}
else {
describe $chan $read(c:\\users\\mark\\pie.txt) at $2 and laughs.
}
Oh and p.s. I DONT UNDERSTAND WHY YOU HAVE THE SAME CODE LIKE THREE TIMES??
Don\'t forget to change the channel name to yours and the correct file path.
The goal in coding is to have the shortest,quickest, most efficent code possible.