Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- on 1:TEXT:12*:#triviachannel:{ if ($nick == triviabot) {
- if (%filter isin $1-) { echo filtered: $1- }
- elseif ($read(trivia.txt, w, $1-*) != $null) {
- .echo Answer: $read(trivia.txt,$calc($readn + 1))
- }
- else { .set %question 1
- .set %question.text $1-
- }
- }
- :end
- }
- on 1:text:13*:#triviachannel:{ if (($nick == triviabot) && (%answerFilter isin $1-)) {
- if (%question.text != $null) {
- .set %answerPosition $pos($1-, %answerFilter, 1)
- .set %answerText $mid($1-, $calc($len(%answerFilter) + %answerPosition))
- .set %answerText $mid(%answerText, 5, $calc($pos(%answerText, , 2) - 5))
- .echo Question: %question.text
- .echo Answer: %answerText
- .write trivia.txt %question.text
- .write trivia.txt %answerText
- .unset %question.text
- .unset %answerText
- }
- }
- }
- %filter is on a winning streak!
- %answerFilter The answer was
Add Comment
Please, Sign In to add comment