All pastes #471444 Raw Edit

Mine

public text v1 · immutable
·published 2007-05-04 22:07 UTC
rendered paste body
on *:text:!competition*:#Markus:{
  if ($nick == Jonathan)
  /write competition.txt
  set %competition on
  /msg $chan 12A Competition has started!!!7 Type !addme to be entered for the prize.
}

on *:text:!addme*:#Markus:{
  if %competition ison {
    write competition.txt $nick 
    /notice $nick The nickname $nick has been entered!
} }

on *:text:!drawcomp*:#Markus:{
  if ($nick == Jonathan)
  set %winner $read(competiton.txt,$rand(1,$lines(competition.txt)))

  /msg chan 7The winner is 12 $+ %winner 7Their was 12 $+ $lines(competition.txt) 7Entries.

  /mode #markus +v %winner

}