|
|
Joined: Jun 2004
Posts: 243
Fjord artisan
|
OP
Fjord artisan
Joined: Jun 2004
Posts: 243 |
Is there a easy script I could use to go "auto away", say: if I do not say anything nor do anything in say, and hour? Or half an hour?
Am I missing a feature?
I do not speak English. I speak Norwegian. So please bear with my poor English spelling and grammar.
|
|
|
|
|
Joined: Sep 2005
Posts: 2,881
Hoopy frood
|
|
Hoopy frood
Joined: Sep 2005
Posts: 2,881 |
on *:input:*:{
if ($away) { away }
.timerautoaway 1 3600 away Auto away after an hour of being idle.
}
|
|
|
|
|
Joined: Jan 2007
Posts: 280
Fjord artisan
|
|
Fjord artisan
Joined: Jan 2007
Posts: 280 |
on *:input:#: {
if ($1 == !away) {
/ame is currently away. $iif($2,$+($chr(40),Reason: $2-,$chr(41)))
//set %duration 0
/inc -c %duration | halt
}
elseif ($1 == !back) {
describe $chan is back. I was gone for: $duration(%duration) | halt
}
}
Type !away <reason> to go away. Type !back to go back.
Squee whenever a squee squee's. Squee whenever a squee does not squee.
|
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
The request was for an auto-away script, which hixxy provided. Yours is okay for a manual away script, but could use some changes.
First of all, there's already an /away command that will do just about the same thing you did with !away, so you'd want it to do something different or else just use /away. Second, you normally don't want to type to the channel !away or !back... it's better to have them internal (/away /back) type thing. Third, don't halt a script unless you need to. Fourth, use $ctime to get a duration instead of /inc. And, finally, you don't need /'s in a script.
Invision Support
#Invision on irc.irchighway.net
|
|
|
|
|
Joined: Jun 2004
Posts: 243
Fjord artisan
|
|
OP
Fjord artisan
Joined: Jun 2004
Posts: 243 |
Thank you! I shall implement/test it right now.. on *:input:*:{
if ($away) { away }
.timerautoaway 1 3600 away Auto away after an hour of being idle.
}I put it in my "Remote" (script.ini?) ... And Riamus2; Thank you for making it clear. You are right as always.  :love: BTW: I am on 3 servers though, using only one mIRC. So I use E.g. [url=Eating://scid][url=Eating://scid][url=Eating://scid]Eating://scid[/url][/url][/url] -at1 /away Eating food! ... How would I implemenet that in the script? Or will it function for all 3 servers independently? Also, if I set myself to "away" using E.g. Away; "Eatinng food!" .. will it still set me to "away due to idle an hour" when I have been? God, I wish I could script, I got so many ideas that at least to myself would make IRC a better place.. BTW;BTW: Here is how it looks, almost.. http://terror.sintrax.net/~geir/-Why%20Do%20I%20Do%20it%3f-/mIRC/Sunday%20October%2001%20%202006%20Main-mIRC~Closed.JPG http://terror.sintrax.net/~geir/-Why%20Do%20I%20Do%20it%3f-/mIRC/Sunday%20October%2001%20%202006%20Main-mIRC~Open.JPG I wish I had a way to 'open all', and 'close all'.. But, that would be another post/request.. I am using: n44=Show all tabs! (EfNet):/aHideTAB n45=Hide all tabs! (EfNet):/HideTAB n46=- n47=Show all tabs! (DalNet):/acloi n48=Hide all tabs! (DalNet):/cloi n49=- n50=Show all tabs! (Shroomery):/aHideshr n51=Hide all tabs! (Shroomery):/Hideshr n52=- n53=Show all tabs! (accessIRC):/windowshow n54=Hide all tabs! (accessIRC):/windowhide But I got to use the commands in the right status window, so I know no way of having a: n55=- n56=Show all tabs for all servers!: n56=Hide all tabs for all servers!: Anyone know what I mean, and know how to do it?
Last edited by gomp; 19/04/07 03:20 PM.
I do not speak English. I speak Norwegian. So please bear with my poor English spelling and grammar.
|
|
|
|
|
Joined: Jun 2004
Posts: 243
Fjord artisan
|
|
OP
Fjord artisan
Joined: Jun 2004
Posts: 243 |
Dang..
You made a quote script for me, remember?
You told me not to use another "on *:input:*: {"
Or it would mess with the quote script... And now I know why..
Cause it did! Hehe..
Anyone know any other way to make a "autoaway" script, that; if I am not already marked as away, will set me to "away from computer", say after half an hour?
I do not speak English. I speak Norwegian. So please bear with my poor English spelling and grammar.
|
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
Can you post the 2 scripts that you're using (quote and away)? I'll see what the conflict is and we can probably fix that.
Invision Support
#Invision on irc.irchighway.net
|
|
|
|
|
Joined: Jun 2004
Posts: 243
Fjord artisan
|
|
OP
Fjord artisan
Joined: Jun 2004
Posts: 243 |
Can you post the 2 scripts that you're using (quote and away)? I'll see what the conflict is and we can probably fix that. I am not sure what is what.. It is a real mess.. Could I post all of it? Here:
; ---- Start ----
:--------------------------------------------------------------------------------------------------------:
;¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯;
; -{] Tillkobling/Connection ... []- ;
;_____________________________________________________________________;
:--------------------------------------------------------------------------------------------------------:
;
; - On connection connectioning...
;
on *:connect:{
if ($network == efnet) {
join #filosofisk
join #narkotika rosafisk
join #spiritual
join #psychedelics
join #shrooms
join #MENSA
join #buddhism
join #spirituality
join #dreaming
join #ugdulf
join #ascension
join #archangels
join #3d_life
join #dreamt
join #rytmeboksen
join #tao
join #åndelighet
msg dilemma op 8glemSom
msg LinuxHOW op teletubba
timer 1 30 /JoinOTHER
timer 1 60 /HideTAB
}
if ($network == AccessIRC) {
server -m irc.homelien.no
msg nickserv identify entotri
join #br1
join #ddayhome
timer 1 10 /windowhide
timer 1 2 /joinacc
server -m irc.shroomery.org
dal
}
if ($network == Paranormal) {
join #torget
msg nickserv identify mohofopo
}
if ($network == ShroomeryIRC) {
join #shroomery
timer 1 5 /nick I
timer 1 10 /Joinshr
timer 1 66 /Hideshr
msg nickserv identify pass
msg nickserv identify pass
msg nickserv identify pass
timer 1 56 /msg nickserv identify tubbtubb
timer 1 54 /nick ^I
Timer 1 55 /msg NickServ IDENTIFY pspass
}
if ($network == DALnet) {
join #spirituality
join #science!
join #cannabis
timer 1 3 /cloiii
timer 1 20 /cloi
timer 1 25 /topic #legalized And so it was...
msg NickServ@services.dal.net identify AnGodPswd
}
}
:-------------------------------------- accessIRC ------------------------------------------------------:
;
; - Joine "missing" channels for accessIRC...
;
alias joinacc {
join #norge
join #4threich
join #TheSpot
join #sirstargazer
}
;
; - Hide channels for accessIRC...
;
alias windowhide {
/window -h #norge
/window -h #4threich
/window -h #TheSpot
/window -h #sirstargazer
/window -h #ddayhome
}
;
; - Show channel-tabs for accessIRC...
;
alias windowshow {
/window -w #norge
/window -w #4threich
/window -w #TheSpot
/window -w #sirstargazer
/window -w #ddayhome
}
:-------------------------------------- accessIRC -----------------------------------------------------
;
; - Join channels: for SHROOMERY channels...
;
alias Joinshr {
/join #salvia
/join #botany
/join #edibles
/join #chemistry
/join #cactus
/join #cultivation
/join #love
/join #cannabis
/join #otd
}
;
; - Hide the tabs for SHROOMERY channels...
;
alias Hideshr {
/window -h #salvia
/window -h #botany
/window -h #edibles
/window -h #chemistry
/window -h #cultivation
/window -h #cactus
/window -h #otd
/window -h #cannabis
/window -h #love
}
;
; - Show the tabs for SHROOMERY channels...
;
alias aHideshr {
/window -w #salvia
/window -w #botany
/window -w #edibles
/window -w #chemistry
/window -w #cultivation
/window -w #cactus
/window -w #love
/window -w #cannabis
/window -w #otd
}
;
; - Hide the tabs for DALNET channels...
;
alias cloi {
/window -h #cannabis
/window -h #dreamt
/window -h #spirituality
/window -h #legalized
/window -h #science!
/window -h #asylum
}
;
; - Join more channels DALNET channels...
;
alias cloiii {
/join #dreamt
/join #philosophy!
/join #legalized
/join #asylum
}
;
; - Show the tabs for DALNET channels...
;
alias acloi {
/window -w #cannabis
/window -w #dreamt
/window -w #philosophy!
/window -w #legalized
/window -w #science!
/window -w #asylum
}
alias Thumbs {
/say ___
/say ( ((
/say \ =\
/say __\_ `-\
/say (____))( \------
/say (____)) _
/say (____))
/say (____))____/----'
/say Thumbs Up
}
alias Joinefmer {
/join #filosofi
/join #philosophy
/join #ganja
/join #chemistry
/join #NanoTechnology
}
:--------------------------------------------------------------------------------------------------------:
;¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯¯;
; -{] Modifisering av Menyer OSV... []- ;
;_____________________________________________________________________;
:--------------------------------------------------------------------------------------------------------:
;
; - Show/Hide Tab in SwitchBar...
;
menu channel {
-Hide Channel TAB- : window -ha $active
Show Channel TAB : { window -w $active }
}
;
; - Reloads /msg's Loggs, when ever somone contact me...
;
on *:open:?:loadbuf $nick $query($nick).logfile
;
; - Reloding av Logger via høyere-klikk i /msg's..-
;
menu query {
reload logfile: loadbuf $1 $+(",$sfile($logdir*.log),")
}
:
: - De-voicing av megselv, der hvor ikke voice er ønskelig...
;
;on *:op:#utvikling:$iif($opnick == $me,.mode $chan -v $me)
:
: - De-voicing av megselv, der hvor ikke voic er ønskelig...
;
;on *:voic:#utvikling:$iif($voicnick == $me,.mode $chan -v $me)
:
: - De-voicing av Gomp, der hvor ikke voic er ønskelig...
;
on *:voic:#utvikling:$iif($voicnick == Gomp,.mode $chan -v Gomp)
:
: - De-oping av megselv, der hvor ikke voice er ønskelig...
;
;on *:op:#spiritual:$iif($opnick == $me,.mode $chan +v $me)
;on *:voic:#spiritual:$iif($voicnick == $me,.mode $chan -o $me)
;on *:op:#spiritual:{
; $iif($opnick == Gomp,.mode $chan +v Gomp)
; $iif($opnick == Gomp,.timer 1 5 /mode #spiritual -o gomp)
;}
;on *:op:#spiritual:{
; $iif($opnick == curious,.mode $chan +v curious)
; $iif($opnick == curious,.timer 1 5 /mode #spiritual -o curious)
;}
;
; - De-voicing av Gomp, der hvor ikke voice er ønskelig...
;
on @*:voice:#utvikling: {
if ($vnick == gomp) { mode # -v gomp }
}
;
; - Deoping + voice ...
;
on *:op:#magic:{
$iif($opnick == Gomp,.mode $chan +v Gomp)
$iif($opnick == Gomp,.timer 1 5 /mode #magic -o gomp)
}
:
;
; - OP in certain channels...
;
alias oip {
/msg gomp op #utvikling
/msg gomp op #innvikling
/timer 1 100 /mip
}
alias mip {
/msg gomp op #filosofisk
/msg gomp op #åndelig
/timer 1 100 /mkp
}
alias mkp {
/msg gomp op #Le·g·ion!
/msg gomp op #ugdulf
}
:--------------------------------------------------------------------------------------------------------:
;
; - Hide the tabs for certain channels...
;
alias HideTAB {
/window -h #sms.no
; /window -h #utvikling
/window -h #2012
/window -h #innsikt
/window -h #innvikling
/window -h #Le·g·ion!
/window -h #ganja
/window -h #dreaming
/window -h #tv.no
/partOTHER
/timer 1 3 /Hoinefmer
}
;
; - Show the tabs for certain channels...
;
alias aHideTAB {
/window -w #sms.no
; /window -w #utvikling
/window -w #2012
/window -w #innsikt
/window -w #innvikling
/window -w #Le·g·ion!
/window -w #ganja
/window -w #dreaming
/window -w #felles
/Soinefmer
}
;-----------------------------
;
; - Part the "other" channels...
;
alias partOTHER {
/part #MENSA
/window -h #åndelig
/window -h #tv.no
/window -h #felles
/window -h #paranormal!
/window -h #3d_life
/window -h #quote
/window -h #quotes
; /window -h #psychedelics
}
;-----------------------------
alias Soinefmer {
/window -w #filosofi
/window -w #ganja
/window -w #chemistry
/window -w #NanoTechnology
/window -w #3d_life
/window -w #quote
/window -w #quotes
}
; /window -w #philosophy
alias Hoinefmer {
/window -h #Filosofi
/window -h #ganja
/window -h #chemistry
/window -h #NanoTechnology
}
: /window -h #philosophy
;|-------------------------------------------------------------------------------------|;
;
; - Join the "missing" channels... {EfNet}
;
alias JoinOTHER {
/join #sms.no
/join #utvikling
/join #2012
/join #innsikt
/join #christian
/join #Shamanism
/join #Gudene
/join #Truth
/join #innvikling
/join #Le·g·ion!
/join #ganja
/join #åndelig
/timer 1 3 /mermer
}
;
; - Join MORE "missing" channels... {EfNet}
;
alias mermer {
/join #filosofi
/join #chemistry
/join #tv.no
/join #felles
/join #paranormal!
/join #all-notes
/join #quotes
/join #quote
/join #NanoTechnology
}
;|-------------------------------------------------------------------------------------|;
;--------------------------------------------------------------------------------------------------------:
;
; - !Sitatscript...
;
on *:text:!sitat*:*: {
if ($level($address($nick,8)) == Sitat.Ban) { return }
else var %who = $nick
if ($chan) {
if (!$istok(#narkotika #paranormal #mensa #sirstargazer #asylum #astral #br1 #TheSpot #philosophy! #Invision #ddayhome #shroomery #spiritualmaterialism #coders #TheTruth #immortal-technique #felles #tv.no #chemistry #filosofi #NanoTechnology #åndelig #ganja #Le·g·ion! #innvikling #Truth #Gudene #shamanism #christian #innsikt #2012 #utvikling #sms.no #tao #rytmeboksen #dreamt #3d_life #archangels #spiritual #ascension #ugdulf #dreaming #spirituality #buddhism #shrooms #psychedelics #spiritual #narkotika #filosofisk #filosofi #åndelighet,$chan,32)) { return }
var %who = $chan
if (%quote.delay) {
.notice $nick Please try again after random delay of: $duration(%quote.delay) - Or use e.g. !quote in a PM. (Type !help in any of the channels I am in to see all available commands.) NB: I am not a bot.
return
}
else {
var %delay = $rand(25,47)
set -u [ $+ [ %delay ] ] %quote.delay %delay
}
}
if ($2) {
if ($2 !isnum) { msg %who $2 is not a number. | return }
if ($lines(sitats.txt) < $2) { msg %who Quote # $+ $2 doesn't exist. | return }
msg %who $read(sitats.txt,$2)
}
elseif ($1 == !sitater) { msg %who Total quotes: $lines(sitats.txt) }
else msg %who $read(sitats.txt)
}
on *:text:!leggtilsitat*:*: {
if ($2 == $null) { .notice $nick You need to include a quote to add. }
else write sitats.txt $2-
}
menu nicklist {
!Sitat Ban: auser Sitat.Ban $address($snick($chan,1),8)
}
;--------------------------------------------------------------------------------------------------------:
;
; - !Quotescript...
;
on *:text:!quote*:*: {
if ($level($address($nick,8)) == Quote.Ban) { return }
else var %who = $nick
if ($chan) {
if (!$istok(#narkotika #paranormal #mensa #sirstargazer #4threich #asylum #astral #br1 #TheSpot #philosophy! #Invision #ddayhome #shroomery #spiritualmaterialism #coders #TheTruth #immortal-technique #felles #tv.no #chemistry #filosofi #NanoTechnology #åndelig #ganja #Le·g·ion! #innvikling #Truth #Gudene #shamanism #christian #innsikt #2012 #utvikling #sms.no #tao #rytmeboksen #dreamt #3d_life #archangels #spiritual #ascension #ugdulf #dreaming #spirituality #buddhism #shrooms #psychedelics #spiritual #narkotika #filosofisk #filosofi #åndelighet,$chan,32)) { return }
var %who = $chan
if (%quote.delay) {
.notice $nick Please try again after random delay of: $duration(%quote.delay) - Or use !"commands" in a PM.
return
}
else {
var %delay = $rand(5,25)
set -u [ $+ [ %delay ] ] %quote.delay %delay
}
}
if ($2) {
if ($2 !isnum) {
window -h @quote.search
loadbuf -r @quote.search quotes.txt
var %quote.temp $fline(@quote.search,$+(*,$2-,*),0)
if (%quote.temp isnum 1-20) {
var %i = 1,%quote.match
while ($fline(@quote.search,$+(*,$2-,*),%i)) {
%quote.match = $addtok(%quote.match,$v1,44)
inc %i
}
msg $chan Matches for $2 --> %quote.match
window -c @quote.search
}
elseif (%quote.temp == 0) { msg $chan No match found. }
else { msg $chan More than 20 matches found, please narrow your search down }
}
else {
if ($lines(quotes.txt) < $2) { msg %who Quote $chr(35) $+ $2 doesn't exist. | return }
msg %who $read(quotes.txt,$2)
}
}
elseif ($1 == !quotes) { msg %who Total quotes: $lines(quotes.txt) }
else msg %who $read(quotes.txt)
}
on *:text:!addquote*:*: {
if ($2 == $null) { .notice $nick You need to include a quote to add. }
else write quotes.txt $2-
}
menu nicklist {
!Quote Ban: auser Quote.Ban $address($snick($chan,1),8)
}
on *:input:*: {
if ($1 == !quote) {
var %who = $iif($chan,$chan,$me)
if ($chan) {
if (!$istok(#narkotika #paranormal #sirstargazer #mensa #asylum #4threich #astral #br1 #TheSpot #philosophy! #Invision #ddayhome #shroomery #spiritualmaterialism #coders #TheTruth #felles #immortal-technique #felles #tv.no #chemistry #filosofi #NanoTechnology #åndelig #ganja #Le·g·ion! #innvikling #Truth #Gudene #shamanism #christian #innsikt #2012 #utvikling #sms.no #tao #rytmeboksen #dreamt #3d_life #archangels #spiritual #ascension #ugdulf #dreaming #spirituality #buddhism #shrooms #psychedelics #spiritual #narkotika #filosofisk #filosofi #åndelighet,$chan,32)) { return }
if (%quote.delay) {
echo -a Please try again after $duration(%quote.delay) or use !quote in a PM.
return
}
else {
var %delay = $rand(3,5)
set -u [ $+ [ %delay ] ] %quote.delay %delay
}
}
if ($2) {
if ($2 !isnum) {
window -h @quote.search
loadbuf -r @quote.search quotes.txt
var %quote.temp $fline(@quote.search,$+(*,$2-,*),0)
if (%quote.temp isnum 1-20) {
var %i = 1,%quote.match
while ($fline(@quote.search,$+(*,$2-,*),%i)) {
%quote.match = $addtok(%quote.match,$v1,44)
inc %i
}
msg $chan Matches for $2 --> %quote.match
window -c @quote.search
}
elseif (%quote.temp == 0) { msg $chan No match found. }
else { msg $chan More than 20 matches found, please narrow your search down }
}
else {
if ($lines(quotes.txt) < $2) { msg %who Quote $chr(35) $+ $2 doesn't exist. | return }
msg %who $read(quotes.txt,$2)
}
}
else msg %who $read(quotes.txt)
}
elseif ($1 == !quotes) { msg %who Total quotes: $lines(quotes.txt) }
elseif ($1 == !addquote) {
if ($2 == $null) { echo -a You need to include a quote to add. }
else write quotes.txt $2-
}
}
on *:text:!help:#: {
msg $nick Available commands: !quote, !quotes, !quote "number", and !addquote "quote" - Author. And: !quote "word" to search...
}
:----------------------------------
; ---- End ----
Tell me if I need to dig. thanks for helping! 
Last edited by Karen; 12/05/07 02:28 PM.
I do not speak English. I speak Norwegian. So please bear with my poor English spelling and grammar.
|
|
|
|
|
Joined: Dec 2002
Posts: 177
Vogon poet
|
|
Vogon poet
Joined: Dec 2002
Posts: 177 |
Before pasting scripts, it is a very good idea to remove any personal or password info 
|
|
|
|
|
Joined: Oct 2004
Posts: 8,330
Hoopy frood
|
|
Hoopy frood
Joined: Oct 2004
Posts: 8,330 |
I'm not sure why I'd have told you not to use another on INPUT with that, unless I told you to not put another one in the same file. In any case, I don't see an away script in there anywhere.
You can include another on INPUT in another script file, or combine the one that is here with your away script's input.
Invision Support
#Invision on irc.irchighway.net
|
|
|
|
|
Joined: Mar 2006
Posts: 396
Pan-dimensional mouse
|
|
Pan-dimensional mouse
Joined: Mar 2006
Posts: 396 |
I sat down an wondered what is the best way to do this oneday. I think this is the best idea... It will be set not exactly when that time comes... but after the next ping. Best used with mIRC's "Cancel away on activity" option (found in Mirc Options-->IRC-->Options on 1:PING:{ if (!$away) && ($config.autoaway <= $idle) { away Auto-away after $duration($ifmatch) } }
alias -l config.autoway return 1800The config.autoaway is the amount of time in seconds... its currently on 1800 which is half an hour
[02:16] * Titanic has quit IRC (Excess Flood)
|
|
|
|
|
Joined: Jun 2004
Posts: 243
Fjord artisan
|
|
OP
Fjord artisan
Joined: Jun 2004
Posts: 243 |
Well.. Forget everything? And just look at it from this? (I'll make a new post. https://forums.mirc.com/ubbthreads.php?ubb=showflat&Number=177404&page=0#Post177404 this is so messy.) The_JD: Would that alter the away reason if I was arealy set away due to other reasons?
Last edited by gomp; 24/05/07 02:57 PM.
I do not speak English. I speak Norwegian. So please bear with my poor English spelling and grammar.
|
|
|
|
|
