Heya, its me again....
Today, i was looking for a quote script for my bot ... BUT since i didn't find anything that actually works good... i made one from scratch.. i hope you like it..
to install it. copy the code in your mIRC Scripts Editor, then save it :p
remember... this code was design for a bot, not for yourself... well .. some other people could still use it from your script but not you ( just to be clear) :p
##################################
# XQS (XploreR's Quote System) #
# #IRC-Addicts & #mIRCScripting #
# XploreR@Live.Ca #
##################################
on *:load:{
timer 1 1 echo -a 14You Have 9Succesfully14 Loaded the XQS System
timer 1 2 echo -a 14F.y.i. XQS Stands for XploreR's Quote System. :p
timer 1 3 echo -a 14This Addon Is Made For A Bot, So If You Added It To Your Script, You Can't Use It....
timer 1 4 echo -a 14For More Help Join #IRC-Addicts And Talk To XploreR
timer 1 5 echo -a 4THE END! :p
}
on *:unload:{
timer 1 1 echo -a 14You Have 9Succesfully14 Unloaded the XQS System
timer 1 2 echo -a 14I Hope you Will Use It Again.
}
on *:TEXT:.q:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
set %quote $read(quotes.txt)
msg $chan $chr(91) $+ $chr(35) $+ $readn $+ $chr(92) $+ $lines(Quotes.txt) $+ $chr(93) 4 $+ %quote
}
on *:TEXT:.q *:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
if ($2 isalnum) && ($2 <= $lines(Quotes.txt)) {
msg $chan Quote $chr(91) $+ $chr(35) $+ $2 $+ $chr(92) $+ $lines(Quotes.txt) $+ $chr(93) 4 $+ $read(quotes.txt, $2)
}
}
on *:TEXT:.qadd *:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
write quotes.txt 12Quote added by $nick on $date $+ : 4 $+ $2-
msg $chan 14 Your quote was Succesfully Added.
}
on *:TEXT:.qdel *:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
if ($nick isop $chan) {
write -dl$2 quotes.txt
msg $chan 14 Quote $chr(35) $+ $2 has been deleted.
}
else msg $chan 14 You Need to be a 12@p14 to Delete a quote.
}
on *:TEXT:.qlines:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
msg $chan 14 $+ Total number of quotes: 12 $+ $lines(Quotes.txt)
}
on *:TEXT:.qlast:#: {
inc -u8 %xpf 1
if (%xpf > 3) { ignore -u30 $nick | msg $chan $nick 14Is Ignored for 30 sec. Slow Down With The Commands.. }
msg $chan 14Last quote: 12 $+ $read(Quotes.txt, $lines(Quotes.txt))
}
on *:TEXT:.qhelp:#: {
inc -u8 %xpf 1
if (%xpf > 1) { ignore -u90 $nick | msg $chan $nick 14Is Ignored for 90 sec. Slow Down With The Commands.. }
.timer 1 1 notice $nick 14 $+ XQS 12 $+ .q 14Will show a random Quote From The DB.
.timer 1 2 notice $nick 14 $+ XQS 12 $+ .q <number>14 Will Shom you a specific Quote.
.timer 1 3 notice $nick 14 $+ XQS 12 $+ .qadd <text> 14 Will Add a Quote.
.timer 1 4 notice $nick 14 $+ XQS 12 $+ .qdell <number> 14 Will Delete a Specific Quote.
.timer 1 5 notice $nick 14 $+ XQS 12 $+ .qlines 14 Will Tell You How Many Quotes There Is On The DB.
.timer 1 6 notice $nick 14 $+ XQS 12 $+ .qlast 14 Will Tell you The Last Quote Added To The DB.
}