- /* TRIVIA HAXX BY ARIE */
- on *:TEXT:*:#: {
- if ($nick = TriviaSlet) {
- unset %topep
- var %a = * $+ $strip($replace($2-,$chr(44),*)) $+ *
- var %x = $read(hoax.txt, w, %a)
- if (%x) {
- var %i = 1
- echo -a %x
- while (%i <= $len(%x)) {
- var %q = $mid(%x,%i,1)
- if (%q == $chr(42)) {
- var %pep = on
- }
- if (%pep == on) {
- if (%q == $chr(32)) {
- %topep = %topep $+ $chr(32)
- }
- else %topep = %topep $+ %q
- }
- inc %i
- }
- if (%topep) msg # $remove(%topep, *)
- }
- }
- }
By: Arie | Date: Aug 31 2007 19:08 | Format: None | Expires: never | Size: 617 B | Hits: 1239
Latest pastes
1 hours ago
11 hours ago
1 days ago
2 days ago
2 days ago