Sub ONTEXT(Message,Channel,Nickname,Host,ServerNumber)
If lcase(message)="!randomquote" Then
A = GetIdentifier("$randphrase(Randomizer.ini)")
SendCommand "/say " & A
End If
End Sub

Function OUTTEXT(OutgoingText)
If lcase(message)="!randomquote" Then
SendCommand outgoingtext
A = GetIdentifier("$randphrase(Randomizer.ini)")
SendCommand "/say " & A
Else OUTTEXT = OutGoingText
End If
End Function