sladekraven

sladekraven

Joined
Mar 02, 2006
Location
Calgary, Alberta, Canada
Website
Interests
mIRC Scripting, IRCing, Guitar, Working out

Activity Stream

sladekraven commented on a mIRC Addon, World Time v1.1  -  Mar 09, 2006

I\'m going to make an update because the HTML source on the server has been modified slightly, not because of this addon but a new feature has been added. I\'ll try and get this update out some time today.

Regards,

-Andy

 Respond  
sladekraven commented on a Page, Cm3  -  Mar 07, 2006

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. :)

 Respond  
sladekraven commented on a Page, fluppys Quote dialog  -  Mar 07, 2006

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.

 Respond  
sladekraven commented on a Page, Channel Counter(Channel peak) Via !Count  -  Mar 03, 2006

I always forget the simplest things and turn it into a nightmare for myself. Doh! Nice one. :)

 Respond  
sladekraven commented on a Page, Channel Counter(Channel peak) Via !Count  -  Mar 03, 2006

;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
}

 Respond  
sladekraven commented on a Page, $sw() Star Wars Character Generator,  -  Mar 03, 2006

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.

 Respond  
sladekraven created a Page  -  Mar 03, 2006
437 
sladekraven created a Page  -  Mar 02, 2006
1,017 

You're welcome to see if this snippet works on mIRC versions earlier that 6.16. Simple Rock Paper Scissors game type /rps to play type in a letter in the edit box and press play. Type in r for rock Type in p for paper Type in s for scissors

sladekraven created a Page  -  Mar 02, 2006
232 

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..

 Respond   mIRC  
sladekraven created a Page  -  Mar 02, 2006
537 

The mIRC's $rand() identifier doesn't work with letters as it does with numbers.

sladekraven commented on a Page, Simple Commandline Kickban  -  Mar 02, 2006

That $nick should be $$1. $chan can be # for short.
It\'s kinda late.

Yours would be nice if their versions didn\'t support the \"-k\" switch I\'d also suggest using:

kickban {
var %kbnick = $$1, %kbreason = $2-
ban %kbnick 3 | kick # %kbnick %kbreason
}

That way you don\'t need to unset the vars.

 Respond  
sladekraven commented on a Page, Simple Commandline Kickban  -  Mar 02, 2006

What about:

kickban { ban -k $chan $nick 3 $2- }

 Respond  
sladekraven commented on a Page, simple away system (no dialogs)  -  Mar 02, 2006

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.

 Respond  
sladekraven commented on a Page, ascii chart  -  Mar 02, 2006

Is $cell() a custom alias you failed to produce with the rest of the code? Nice snippet though 9/10. :)

 Respond  
sladekraven commented on a Page, Super deop Protection  -  Mar 02, 2006

Try deopping yourself.

Fix:

On !*:Deop:#: {
if ( $opnick == $me ) {
cs deop $chan $nick
cs akick $chan add $nick
cs akick $chan enforce
cs op $chan $me
cs access $chan add $nick -10
}
}

-Andy

 Respond  
sladekraven commented on a Page, Auto Join Channels  -  Mar 02, 2006

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.

 Respond  
sladekraven created a Page  -  Mar 02, 2006
12,074 

Auto Join Channels.

sladekraven commented on a mIRC Addon, World Time v1.1  -  Mar 02, 2006

sigh I really should learn to do these when I\'m awake..

I know how you feel, I just realised there was a typo in $scriptdir.
Thanks again. :)

 Respond  
sladekraven commented on a mIRC Addon, World Time v1.1  -  Mar 02, 2006

The script wont work with $scriptdir, I just made the change as you suggested and now nothing is being sent or received. :(

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.