There is still no mp3.rep command.
I don\'t like your exit alias as it overwrites mIRC\'s existing /exit command to close mIRC.
When shuffle is selected and my current song finishes i get:
$did (line 35, script17.mrc)
The timer should be halted if the dialog is closed, regardless of the button as (Esc) could accidently be hit.
*As noted some buttons wont work (Only tried Playlist Text File)
On a more positive note, love the progress and volume bar, nice interface. Well done, hope to see the above fixes. :)
This is a good snippet, it\'s easy and efficient. However, when the dialog starts (init) you\'ll notice a loadbuf error in status. This wont account for everyone as some people will probably have a quote.txt file. Other than that there was some lines where you repeated yourself checking to if the box is checked. All it needed was a simple $iif(). :)
Your:
did -r quotes 10
did -a quotes 10 Total Quotes: $lines(quote.txt)
Can be used as:
did -ra quotes 10 Total Quotes: $lines(quote.txt)
dialog Quotes {
title \"Quotes\"
size -1 -1 203 157
option dbu
list 1, 0 29 203 85, size vsbar
button \"Add Quote\", 2, 2 16 37 12
button \"Delete Quote\", 3, 40 16 37 12
button \"Random Quote\", 4, 78 16 39 12
button \"Selected Quote\", 5, 118 16 41 12
button \"Refresh Quotes\", 6, 160 16 42 12
text \"Quote database made by fluppy (flupScript).\", 7, 2 1 199 13
edit \"\", 8, 38 115 162 12
button \"Search\", 9, 0 115 37 12
edit \"\", 10, 135 2 67 10, read
button \"Close\", 11, 166 143 37 12, cancel
check \"Active target.\", 12, 2 143 158 10
edit \"\", 13, 31 129 169 10
text \"Target\", 14, 2 130 25 8
}
on :Dialog:quotes:init:0: {
did -r quotes 1
if ($isfile(quote.txt)) loadbuf -o quotes 1 quote.txt
did -ra quotes 10 Total Quotes: $lines(quote.txt)
}
on :Dialog:quotes:sclick:2: {
write quote.txt $$?=\"Quote to add\"
did -r quotes 1
loadbuf -o quotes 1 quote.txt
did -ra quotes 10 Total Quotes: $lines(quote.txt)
}
on :Dialog:quotes:sclick:3: {
write -dl $+ $did(1).sel quote.txt
did -r quotes 1
loadbuf -o quotes 1 quote.txt
did -ra quotes 10 Total Quotes: $lines(quote.txt)
}
on :Dialog:quotes:sclick:4: {
var %ranquote = $rand(1,$lines(quote.txt))
$iif($did(12).state == 1,msg $active,msg $did(13)) Random quote number:4 %ranquote : $read(quote.txt, %ranquote)
}
on *:Dialog:quotes:sclick:5: {
$iif($did(12).state = 1,msg $active,msg $did(13)) Selected quote number:4 $did(1).sel : $read(quote.txt, $did(1).sel)
}
on *:Dialog:quotes:sclick:6: {
did -r quotes 1
loadbuf -o quotes 1 quote.txt
did -ra quotes 10 Total Quotes: $lines(quote.txt)
}
on :Dialog:quotes:sclick:9: {
$iif($did(12).state = 1,msg $active,msg $did(13)) Searched quotes for: 4 $+ $did(8) $+ : $&
$iif($read(quote.txt,w,$+(,$did(8),))),$read(quote.txt,w,$+(,$did(8),*)),No results found)
}
menu channel,menubar {
.Quotes
..Quotes:dialog -m quotes quotes
}
Here\'s some slight midifications.
;Usage !count
;or
;!count [a|o|h|v|r]
;!count o - Counts the ops
On :Input:#: {
if (/ iswm $1) return $1-
if ($1 == !count) && (!$2) msg $chan $nick($active,0)
if ($1 == !count) && ($findtok(o a h v r,$2,1,32)) {
var %status = $iif($2 == o,Ops:,$iif($2 == a,Admin:,$iif($2 == h,Half Op:,$iif($2 == v,Voiced:,$iif($2 == r,Regular:)))))
msg $chan %status $nick($active,0,$2)
}
else { msg $chan $1- }
halt
}
I got the idea of putting it in mIRC from http://www.blueharvest.net/games/name/
Since two of the full 2 mIRC scripts I have are Star Wars related I thought it\'d be pretty cool to echo that instead of your full name when mIRC loads up.
I didn\'t add that echo or startup just the core of it.
Paste Utilities v1.1 (mIRC 6.17!) But will take you straight to mIRC 6.17 setup if version is not 6.17 This snippet manipulates your clipboard entries, using mIRC 6.17's new check property for the listbox control you can select the text you lines you want to paste. You can choose to echo or message the lines but one has to be selected. I've added a few options, since I only use mIRC's default timestamp..
Slight modifications:
alias F4 {
if (!$away) {
set %bnick $me
nick $$?=\"Away nick:\"
set %away.reason $iif($editbox($active),$editbox($active),$$?=\"Reason:\")
away %away.reason
ame %away.reason
}
else {
away
nick %bnick
ame Back from $awaymsg
}
}
If you have text in your editbox when you press F4 that will be your away message. If no text is in the editbox, a user input field will popup.
I\'ve looked in the mIRC help file and found \"autojoin\" but how to add channels is beyond me. I couldn\'t see how to add. If mIRC\'s is server specific then ignore this but the way it\'s set up now you can have 2 channels. #mIRC is on (irc.server1.com) and #moo is on (irc.server2.com) When you join irc.server1.com uoi will join #mIRC but not #moo vice versa.