[YouTube] Checking for updates and clearing variables...
[YouTube] Current: v6.2 Latest: v6.2 Status: Up to date
It's very annoying to see this everytime I start mIRC.
Could you make this happen in the background, and only show a message if there is an update. Because I don't need to know everytime that my script is already up to date.
You can use the $ctime(text) identifier to compare dates.
$ctime uses standard Unix timestamps, which are the seconds elapsed since midnight, January 1, 1970 to your specified date.
The only downside is that you can only compare dates from January 1, 1970 to January 19, 2038.
alias comparedate {
if ($ctime($1) > $ctime($2)) return 1
elseif ($ctime($1) < $ctime($2)) return 2
else return 3
}
Ask your questions in the forum
http://hawkee.com/phpBB2/viewforum.php?f=9
You could shorten this by using loops.
I didn't test this yet.
menu {
Autoidentity: /dialog -ma autoid
alias autoid {
if $dialog(autoid) = $null { dialog -ma autoid autoid }
else halt
}
dialog autoid {
title Auto identify $str($chr(160),10)
size -1 -1 260 300
button OK,100,165 272 40 20,ok
button Cancel,200,210 272 40 20,cancel
box "",1,1 -5 258 305
text "Nick:",5,60 10 40 15
text "Password:",6,160 10 50 15
check "",2,10 33 15 15
edit %name1 ,3,30 30 95 20,center,autohs
edit %passw1 ,4,135 30 95 20,center,autohs
check "",7,10 53 15 15
edit %name2 ,8,30 50 95 20,center,autohs
edit %passw2 ,9,135 50 95 20,center,autohs
check "",10,10 73 15 15
edit %name3 ,11,30 70 95 20,center,autohs
edit %passw3 ,12,135 70 95 20,center,autohs
check "",13,10 93 15 15
edit %name4 ,14,30 90 95 20,center,autohs
edit %passw4 ,15,135 90 95 20,center,autohs
check "",16,10 113 15 15
edit %name5 ,17,30 110 95 20,center,autohs
edit %passw5 ,18,135 110 95 20,center,autohs
check "",19,10 133 15 15
edit %name6 ,20,30 130 95 20,center,autohs
edit %passw6 ,21,135 130 95 20,center,autohs
check "",22,10 153 15 15
edit %name7 ,23,30 150 95 20,center,autohs
edit %passw7 ,24,135 150 95 20,center,autohs
check "",25,10 173 15 15
edit %name8 ,26,30 170 95 20,center,autohs
edit %passw8 ,27,135 170 95 20,center,autohs
check "",28,10 193 15 15
edit %name9 ,29,30 190 95 20,center,autohs
edit %passw9 ,30,135 190 95 20,center,autohs
check "",31,10 213 15 15
edit %name10 ,32,30 210 95 20,center,autohs
edit %passw10 ,33,135 210 95 20,center,autohs
text "Check to enable 'Auto Identify' for each nick'.If it's unchecked it won't do Auto Identify.", 35, 15 239 236 29
button clr,36,233 32 20 16
button clr,37,233 52 20 16
button clr,38,233 72 20 16
button clr,39,233 92 20 16
button clr,40,233 112 20 16
button clr,41,233 132 20 16
button clr,42,233 152 20 16
button clr,43,233 172 20 16
button clr,44,233 192 20 16
button clr,45,233 212 20 16
check "Allow Auto-Id on connect",46,10 274 140 17
}
on *:dialog:autoid:init:*: {
if %chk1 = ON { did -c autoid 2 }
if %chk2 = ON { did -c autoid 7 }
if %chk3 = ON { did -c autoid 10 }
if %chk4 = ON { did -c autoid 13 }
if %chk5 = ON { did -c autoid 16 }
if %chk6 = ON { did -c autoid 19 }
if %chk7 = ON { did -c autoid 22 }
if %chk8 = ON { did -c autoid 25 }
if %chk9 = ON { did -c autoid 28 }
if %chk10 = ON { did -c autoid 31 }
if %autoidcon = ON { did -c autoid 46 }
}
on *:dialog:autoid:sclick:100: {
if ($did(autoid,2).state = 1) { %chk1 = on } | else { %chk1 = off }
if ($did(autoid,7).state = 1) { %chk2 = on } | else { %chk2 = off }
if ($did(autoid,10).state = 1) { %chk3 = on } | else { %chk3 = off }
if ($did(autoid,13).state = 1) { %chk4 = on } | else { %chk4 = off }
if ($did(autoid,16).state = 1) { %chk5 = on } | else { %chk5 = off }
if ($did(autoid,19).state = 1) { %chk6 = on } | else { %chk6 = off }
if ($did(autoid,22).state = 1) { %chk7 = on } | else { %chk7 = off }
if ($did(autoid,25).state = 1) { %chk8 = on } | else { %chk8 = off }
if ($did(autoid,28).state = 1) { %chk9 = on } | else { %chk9 = off }
if ($did(autoid,31).state = 1) { %chk10 = on } | else { %chk10 = off }
if ($did(autoid,46).state = 1) { %autoidcon = on } | else { %autoidcon = off }
%name1 = $did(3) | %name2 = $did(8) | %name3 = $did(11) | %name4 = $did(14) | %name5 = $did(17) | %name6 = $did(20) | %name7 = $did(23) | %name8 = $did(26) | %name9 = $did(29) | %name10 = $did(32)
%passw1 = $did(4) | %passw2 = $did(9) | %passw3 = $did(12) | %passw4 = $did(15) | %passw5 = $did(18) | %passw6 = $did(21) | %passw7 = $did(24) | %passw8 = $did(27) | %passw9 = $did(30) | %passw10 = $did(33)
}
on *:dialog:autoid:sclick:*: {
if $did = 36 { did -ru autoid 3,4,2 }
if $did = 37 { did -ru autoid 7,8,9 }
if $did = 38 { did -ru autoid 10,11,12 }
if $did = 39 { did -ru autoid 13,14,15 }
if $did = 40 { did -ru autoid 16,17,18 }
if $did = 41 { did -ru autoid 19,20,21 }
if $did = 42 { did -ru autoid 22,23,24 }
if $did = 43 { did -ru autoid 25,26,27 }
if $did = 44 { did -ru autoid 28,29,30 }
if $did = 45 { did -ru autoid 31,32,33 }
}
on 1:NICK: {
if ($nick == $me) {
var %i 1 | while (%i <= 10) {
if ($newnick == %name $+ %i) && (%chk $+ %i == on) { nickserv identify %passw $+ %i | echo -a Password Has Been Sent To NickServ }
inc %i
}
}
}
on 1:connect: {
if (%autoidcon = on) {
var %j 1 | while (%j <= 10) {
if ($me = %name $+ %j) { nickserv identify %passw $+ %j| echo -a Password Has Been Sent To NickServ }
inc %j
}
}
}
However, like @blackvenomm666 said it's beter to use ini's here.
The !answer isn't working for me properly.
When I give in the good answer it doesn't respond.
Also make it work without !answer N let players directly type in the answer and add timers, highscores, and when times up or question is answered correctly let it pick another random question.
Also adding an anti-cheat mechanism would be great.
You can do it like this.
!insult[nr] [nick]
On *:TEXT:!insult*:#: {
if (%flood [ $+ [ $nick ] $+ [ $right($1,-1) ] ] > 0) { notice $nick You must wait $duration($v1) in order to insult someone again. | halt }
set -z %flood [ $+ [ $nick ] $+ [ $right($1,-1) ] ] 10
var %x $mid($1,8)
if ($3-) { msg # Your to stupid to even insult anybody. | return }
if (%x == 1) msg # $2 If I wanted to kill myself I'd climb your ego and jump to your IQ.
elseif (%x == 2) msg # $2 It looks like your face caught on fire and someone tried to put it out with a hammer.
elseif (%x == 3) msg # $2 It's kinda sad watching you attempt to fit your entire vocabulary into a sentence.
elseif (%x == 4) msg # $2 You must have been born on a highway because that's where most accidents happen.
elseif (%x == 5) msg # $2 I'd like to see things from your point of view but I can't seem to get my head that far up my ĀŠŠ..
elseif (%x == 6) msg # $2 Is your a$$ jealous of the amount of shoot that just came out of your mouth?
elseif (%x == 7) msg # $2 I don't exactly hate you, but if you were on fire and I had water, I'd pour the water out.
elseif (%x == 8) msg # $2 Your family tree must be a cactus because everybody on it is a prick.
elseif (%x == 9) msg # $2 I just found out your birth certificate is an apology letter from the condom factory.
elseif (%x == 10) msg # So, a thought crossed your mind? Must have been a long and lonely journey for you $2
else msg # Invalid Insult
}
But I think your beter off using textfile.
You could do something like this.
on *:TEXT:!Coolmeter:#: {
.timer 1 1 msg # 1is collecting coolness percentage...
.timer 1 5 msg # 2is done collecting coolness percentage! Let's see how cool you are $nick !
var %cool $r(0,100) | while ($calc(%cool % 5) != 0) %cool = $r(0,100)
.timer 1 8 msg # 4 $nick you are %cool $+ % cool! $iif(%cool = 0,Also known as 100% LAME!,$iif($v1 = 100,YOU'RE AWESOME!,))
}
Je hoeft hiervoor eigenlijk geen ini's te gebruiken je zou ook zoiets kunnen doen:
on *:TEXT:*:#: {
if ($1 == !bomb && $2 && !%game) {
set %game $true
if ($2 == $me) {
msg # Grapjas :') Ik ga mezelf niet opblazen hoor ;)
msg # Als straf krijg jij er 1 $nick
set %nick $nick
}
elseif ($2 !ison #) { msg # Dacht je dat je dat ik iemand die hier niet is een bom ga geven >_> Als straf krijg jij er een! | set %nick $nick }
elseif ($nick(#,$2).idle > 300) { msg # $2 is al langer dan 5 minuten afwezig... Zo kan ik ook iemand opblazen hoor :S Laf hoor (A) | set %nick $nick }
else set %nick $2
set %defuseWire $gettok(Blauw|Rood|Oranje|Paars,$r(1,4),124)
var %msg $r(1,3)
if (%msg == 1) describe # duwt %nick een huid-magnetische bom in zijn handjes
elseif (%msg == 2) describe # bind een bom rond %nick $+ 's nek
elseif (%msg == 3) describe # geeft %nick een boomerang-bom
timer 1 1 msg # %nick kan deze bom ontmantelen door een draad door te knippen! Er is een Blauwe, een Rode, een Oranje en een Paarse draad, ik denk dat je zal moeten gokken;) SUCCES!
timer 1 3 msg # %nick $+ : Type !cutwire <4ROOD|2BLAUW|7ORANJE|6PAARS> om een draad door te knippen, wees snel, want de bom kan elk moment ontploffen!
timerExplode 1 $r(15,62) bExplode # 1
}
if ($1 == !cutwire && $nick == %nick && %game) {
if (!$regex($2,/^(Rood|Blauw|Oranje|Paars)$/Si)) { msg # $2 is een ongeldige kleur. | halt }
if ($2 == %defuseWire) {
msg # :O GEFELICITEERD %nick $+ ! Je hebt de bom ONTMANTELD!
.timerExplode off
bFinish
}
else bExplode #
}
}
alias bExplode {
kick $1 %nick 8,1*K7AB4OO7M!8*
if ($2 = 1) timer 1 1 msg $1 Tja het lijkt erop dat %nick wat tijd tekort had $chr(40) $+ : Een kandidaat die het denkt wél te kunnen?
else timer 1 1 msg $1 Voortaan zullen we het zonder %nick moeten doen : $+ $chr(40))
bFinish
}
alias bFinish { unset %defuseWire %nick %game | timerExplode off }