Just type /quit
alias quit {
sockclose quotes
sockopen quotes www.randomquotes.net 80
}
on *:sockopen:Quotes:{
if ($sockerr) { sockclose quotes | disconnect | halt }
sockwrite -n $sockname GET / HTTP/1.0
sockwrite -n $sockname Host: www.randomquotes.net $+ $CRLF $+ $CRLF
}
on *:sockread:Quotes:{
sockread -f %quotes
if (*class="quote"* iswm %quotes) { QQuotes %quotes }
}
alias QQuotes {
var %p $remove($gettok($1-,$+($findtok($1-,$wildtok($1-,*<br><br>*,1,32),32),-),32),<br><br>,</p>)
set %Quitres $remove($1-,<p class="quote">,</p>,<br><Br>,%p)
set %QuitOwn $remove($gettok($1-,$+($findtok($1-,$wildtok($1-,*<br><br>*,1,32),32),-),32),<br><br>,</p>)
!Quit %Quitres (By: %Quitown $+ )
}