Çevrimdışı

Arkadaslar sunucuda away oldugum zaman away nickime away nedenimi statuste veya kanalda surekli gosteriyor. baskalari görmüyor ama nickime surekli yaziyor.
6KuRSuN|awy is MesguL : 5geLicem..
6KuRSuN|awy is MesguL : 5geLicem..
6KuRSuN|awy is MesguL : 5geLicem.. gibi.. Bunu nasil kaparim? yada addondan ayarlamam gereken yerler warmi? bu msg nin cikmamasi icin?

 

Çevrimdışı

ping timeri açılmışsa verir bu hatayi.

 

Çevrimdışı

Nasil kapariz bunu? cok rahatsiz ediyor..

 

Çevrimdışı

/timers off

__________________

 

Çevrimdışı

Timer nedir yahu. Codede hata vardir codeyi kopyalarsan bakarlar caresine.

 

Çevrimdışı

/timers off dediğinde tüm zamanlamalar duracaktır. Bu da istenmeyen sonuçlar doğurabilir. En güzeli away kodunu yayımlaman olcaktır ki kod içerisinde gerekli düzenleme yapılır. İyi forumlar.

 

Çevrimdışı

;AwaySystem 3 by mudpuddle - July 10, 2000
;[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

on *:LOAD:{
if ($isfile($shortfn($scriptdirawaysys.dlg))) {
if ($version >= 5.71) {
if ($script(awaysys.dlg) == $null) { .load -rs $shortfn($scriptdirawaysys.dlg) }
asecho $asversion by mudpuddle loaded sucessfully
doimportthing
awaysys.config
}
else { asincompaterror }
}
else { asdlgerror }
}
on *:START:{
if ($isfile($shortfn($scriptdirawaysys.dlg))) {
if ($version >= 5.71) {
if ($script(awaysys.dlg) == $null) { .load -rs $shortfn($scriptdirawaysys.dlg) }
if ($ascheckini == $false) { asresetdefault }
unset %asqaway
if ($asrini(awaysysver) < $asver) { doimportthing }
if (%asawaymode != Back) { assetback }
}
else { asincompaterror }
}
else { asdlgerror }
if ($asdiagver != $asver) { asecho WARNING AwaySystem core is incompatable with AwaySystem dialog version }
}
on *:CONNECT:{
if (Away isin %asawaymode) {
asecho Setting to Online %asawaymode Mode: (04 $+ %asawaymsg $+ )
away %asawaymsg
%asconnect.status = 1
if ($asrini(awaysystem.log) == 1) { writeaslog  $+ $colour(action) $+ *** Set to Online %asawaymode Mode (Connected to IRC) @ $astimestamp (04 $+ %asawaymsg $+  $+ $colour(action) $+ ) }
doastimer
}
elseif ($asrini(idleaway)) { beginasidlechck | asecho AwayIdle checker started }
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ISCONNECT:{
if (%asawaymode == IdleAway) { .timer -m 1 50 assetback | .timerIdleAway off }
unset %asconnect.status
}
on *:JOIN:#:{ if (%asconnect.status) && ($nick == $me) { assetaway.disp | unset %asconnect.status } }
alias awaypager { if ($asrini(awaypager)) { return on }
else { return off } }
alias awaylogging { if ($asrini(awaylogging)) { return on }
else { return off } }
alias awaynotices { if ($asrini(awaynotices)) { return on }
else { return off } }
alias ascheckini {
if ($exists(awaysys.ini)) && (%asawaymode) { return $true }
else { return $false }
}
alias asecho { echo $colour(info) -ae *** AwaySystem - $1- }
alias asrini { return $readini -n awaysys.ini AwaySystem $1- }
alias aswini { writeini -n awaysys.ini AwaySystem $1- }
alias asrmini { remini awaysys.ini AwaySystem $1- }
alias assite { return [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] }
alias ascalc.dev { return $calc($1 / 60) }
alias beginasidlechck { if ($asrini(idleaway)) && ($server) { resetidle | .timerIdleAway 0 10 ascheckidle } }
alias ascheckidle { if (%asawaymode == Back) { if ($idle > $asrini(idleaway)) { .timeridleaway off | asidleawaybox } } }
alias asidleawaybox { if ($asrini(disableidledlg)) { asdoidleaway }
else { set %astimeremaining 10 | .timerascountdown 10 1 showastime | dialog -m asidleaway asidleaway } }
alias showastime {
dec %astimeremaining
if (%astimeremaining == 0) { dialog -x asidleaway | unset %astimeremaining | asdoidleaway | return }
did -a asidleaway 3 AwaySystem will enter IdleAway mode in %astimeremaining seconds
}
alias asdoidleaway { %asawaymsg = Auto IdleAway after $ascalc.dev($asrini(idleaway)) minute(s) | awaystatus.set | if ($asrini(awaynick)) { aswini oldnick2 $asrini(awaynick) } | set %asawaymode IdleAway | assetaway }
alias assetaway.disp { if ($chan(0) > 0) && (%asawaymode != StealthAway) && ($server) { $asgetawaymsg } }
alias assetback.disp { if ($chan(0) > 0) && (%asawaymode != StealthAway) && ($server) { $asgetbackmsg } }
alias assetaway {
.timerIdleAway off
if ($asrini(awaysystem.log) == 1) { writeaslog  $+ $colour(action) $+ *** Set to %asawaymode Mode @ $astimestamp (4 $+ %asawaymsg $+  $+ $colour(action) $+ ) }
%asawaytime = $ctime
if ($server) { away %asawaymsg }
%asawayclock = $time(h:nn:ss tt)
assetaway.disp
if (%asawaymode != StealthAway) && ($asrini(awaynick)) { %asoldnick = $me | nick $asnickini }
doastimer
if (%asawaymode == StealthAway) && ($server) { asecho Setting to StealthAway Mode (04 $+ %asawaymsg $+ ) AwayPager: $awaypager $+ , AwayLog: $awaylogging }
if ($asrini(savetbar)) && ($titlebar) && ($asrini(awaytbar)) { aswini savedawaytbar $titlebar }
if ($timer(Tbar) == $null) && ($asrini(awaytbar)) { .timerTbar -o 0 1 tbar }
tbar
asdodeop
if ($dialog(asconf)) { did -a asconf 304 You have entered Away Mode, some options won't be saved | did -b asconf 9,10,14,15,16,17,18,19,36,37,38,39,46,47,11,48,49, 84,54,55,50,51,52,53 }
}
alias assetback {
%asawayback = $ctime
if ($server == $null) || (%asawaymode == StealthAway) { asecho Setting to Back Mode - Gone for $awayduration }
if (%asoldnick) && (%asawaymode != StealthAway) { nick %asoldnick }
if ($timer(Away)) { .timerAway off }
if ($server) { away | assetback.disp }
set %asawaymode Back
awaystatus.compare
if ($asrini(awaysystem.log) == 1) { writeaslog  $+ $colour(action) $+ *** Set to Back Mode @ $astimestamp | writeaslog - }
if ($asrini(asidno) == $null) || ($server == $null) { unset %asoldnick }
if ($asrini(idleaway)) { beginasidlechck }
tbar
unset %asawaypager.status %asawaylogging.status %asawaynotices.status %asawaymsg %asawaytime %asawayclock %asnicks* %asawayback
resetidle
if ($dialog(asconf)) { did -a asconf 304 You have returned to Back Mode. Reopen this dialog to enable options }
}
alias astimestamp { return $time(HH:nn:ss) $date(mm/dd/yyyy) }
alias asreset.confirm {
if ($?!="Reset ALL options to their default values?") {
dialog -x asconf
if (Away isin %asawaymode) { assetback }
asresetdefault | .timer 1 0 awaysyserror Preferences have be reset }
}
alias clearawaysystemlog {
if ($?!="Clear AwaySystem Logs?") {
if ($exists($shortfn($asrini(awaysystemlog.log)))) { .remove $shortfn($asrini(awaysystemlog.log)) }
if ($window(@AwaySystem)) { window -c @AwaySystem }
.timer 1 0 awaysyserror All Logs have been cleared
updaslogsize
}
showasprefs
}
alias awaysystemlog {
if ($exists($shortfn($asrini(awaysystemlog.log)))) {
if ($window(@AwaySystem)) { window -a @AwaySystem }
else { window -hadk0 +tnsx @AwaySystem 90 90 }
clear @AwaySystem
titlebar @AwaySystem LogViewer - $asrini(awaysystemlog.log)
loadbuf -p @AwaySystem $shortfn($asrini(awaysystemlog.log))
sline -a @AwaySystem 31
}
else { .timer 1 0 awaysyserror The AwaySystem Logfile is empty }
}
alias asredoawaymsg {
if ($1) {
if ($timer(Away)) { .timerAway off }
%asawaymsg = $1-
if ($server) { away %asawaymsg }
if (%asawaymode == IdleAway) { set %asawaymode Away }
assetaway.disp
if (%asawaymode == StealthAway) || ($server == $null) { asecho Changed %asawaymode message (04 $+ %asawaymsg $+ ) }
tbar
doastimer
if ($asrini(awaysystem.log)) { writeaslog  $+ $colour(action) $+ *** Changed %asawaymode Message (04 $+ %asawaymsg $+  $+ $colour(action) $+ ) @ $astimestamp }
if ($dialog(asconf)) { did -a asconf 304 You have changed your away message }
}
}
alias showasprefs { if ($dialog(asconf)) { dialog -v asconf } }
alias loadawaymsg {
if ($asrini(disableawaymsg) != 1) {
var %msgnum = 1
var %totalmsg = $ini(awaysys.ini,Awaymsgs,0)
while (%msgnum <= %totalmsg) {
did -a $1 1 $ascolorget($asreadmsg(%msgnum))
inc %msgnum
}
}
}
alias asgetcomment {
if ($did(asconf,47).sel == 1) { var %asmsg = Classic AwaySystem theme by mudpuddle }
else { if ($astrini($calc($did(asconf,47).sel - 1),comment)) { var %asmsg = $ifmatch } }
did -a $dname 304 %asmsg
}
alias aslogfolder {
var %tempsdir = $$sdir="Select Folder for the AwaySystem Log file" $iif($asrini(awaysystemlog.log), $nofile($shortfn($asrini(awaysystemlog.log))), $logdir)
if (%tempsdir == $did(asconf,25)) { showasprefs }
else { did -ra asconf 25 %tempsdir | showasprefs }
}
alias aspagersndselect { did -a asconf 30 $dir="AwayPager Sound" *.wav
if ($did(asconf,30) == $null) { did -a asconf 30 No Sound }
showasprefs
}
alias updaslogsize { if ($dialog(asconf)) { did -a asconf 306 Logfile Size: $round($calc($file($asrini(awaysystemlog.log)).siz e / 1024),2) KB } }
alias aslogsndselect { did -a asconf 33 $dir="AwayLog Sound" *.wav
if ($did(asconf,33) == $null) { did -a asconf 33 No Sound }
showasprefs
}
alias awaystatus.set {
%asawaypager.status = $awaypager
%asawaylogging.status = $awaylogging
%asawaynotices.status = $awaynotices
}
alias asshowdefaway { return is away (12Reason:04 @awaymsg) since @awaytime. AwayPager is @awaypager, AwayLog is @awaylog }
alias asshowdefback { return is back (12Back from:04 @awaymsg) Gone for @awayduration }
alias awaysyshlp {
if ($window(@AwaySystemHelp)) { window -a @AwaySystemHelp }
else {
if ($exists($shortfn($scriptdirashelp.msg))) {
clear @AwaySystemHelp
window -haodk0 +tnsl @AwaySystemHelp -1 -1 700 400 MS Sans Serif,413
loadbuf -p @AwaySystemHelp $shortfn($scriptdirashelp.msg)
sline @AwaySystemHelp 22
}
}
if ($1) { sline @AwaySystemHelp $1 }
}
alias asloadthemes {
if ($exists(awaysysthemes.ini)) {
var %themes = 1
var %totalthemes $ini(awaysysthemes.ini,0)
while (%themes <= %totalthemes) {
did -a asconf 47 $replace($ini(awaysysthemes.ini,%themes),±,$chr(32 ))
inc %themes
}
}
did -c asconf 47 $asrini(selectedtheme)
if ($asrini(selectedtheme) != 1) {
did -am asconf 55 $replace($ini(awaysysthemes.ini,$calc($asrini(sele ctedtheme) - 1)),±,$chr(32))
did -a asconf 51 $astrini($calc($asrini(selectedtheme) - 1),awaymsg))
did -a asconf 53 $astrini($calc($asrini(selectedtheme) - 1),backmsg)
if ($astrini($calc($asrini(selectedtheme) - 1),cmd)) { did -c asconf 84 }
if ($astrini($calc($asrini(selectedtheme) - 1),cmd) == 0) { did -u asconf 84 }
}
}
alias asgetawaymsg {
if ($themesini($calc($asrini(selectedtheme) - 1)) == $null) { aswini selectedtheme 1 }
if ($asrini(selectedtheme) > 1) {
var %ascommand = $iif($astrini($calc($asrini(selectedtheme) -1),cmd),ame,amsg)
var %asmessage = %ascommand $replace($astrini($calc($asrini(selectedtheme) - 1),awaymsg),@awaymsg,$+ $awaymsg $+,@awaytime,$+ $asawayclock $+,@awaypager,$+ $awaypager $+,@awaylog,$+ $awaylogging $+))
return %asmessage
}
else { return ame is away (12Reason:04 %asawaymsg $+ ) since %asawayclock $+ . AwayPager is $awaypager $+ , AwayLog is $awaylogging }
}
alias asgetbackmsg {
if $themesini($calc($asrini(selectedtheme) - 1)) == $null) { aswini selectedtheme 1 }
if ($asrini(selectedtheme) > 1) {
var %ascommand = $iif($astrini($calc($asrini(selectedtheme) - 1),cmd),ame,amsg)
var %asmessage = %ascommand $replace($astrini($calc($asrini(selectedtheme) - 1),backmsg),@awaymsg,$+ $awaymsg $+,@awaytime,$+ $asawayclock $+,@awayduration,$+ $awayduration $+))
return %asmessage
}
else { return ame is back (12Back from:04 %asawaymsg $+ ) Gone for $awayduration }
}
alias themesini {
if ($exists(awaysysthemes.ini)) {
return $ini(awaysysthemes.ini,$1)
}
}
alias astrini {
var %readini $readini -n awaysysthemes.ini $themesini($1) $2-
return $ascolorget(%readini)
}
alias -l aschkline {
var %readline = $read -l1 awaysysthemes.ini
var %validline = ;#!AS3Theme
if (%readline != %validline) { write -il1 awaysysthemes.ini %validline }
}
alias ascolorput { return $replace($1-,$chr(3),$chr(152),$chr(2),$chr(176),$chr(31),$chr (175),$chr(22),$chr(247)) }
alias ascolorget { return $replace($1-,$chr(152),$chr(3),$chr(176),$chr(2),$chr(175),$ch r(31),$chr(247),$chr(22)) }
alias astwini { aschkline | writeini -n awaysysthemes.ini $themesini($1) $ascolorput($2-) }
alias astwini2 { aschkline | writeini -n awaysysthemes.ini $1 $ascolorput($2-) }
alias astrmini { remini awaysysthemes.ini $themesini($1-) }
alias awaysys.config {
if ($dialog(asconf) == $null) { dialog -m asconf asconf }
else { showasprefs }
}
alias asgoaway { $dialog(asawaydiag,asawaydiag) }
alias asdoeditboxchk {
if ($len($did(1)) < 100) { did -a $dname 4 $len($did(1)) }
if ($len($did(1)) == 100) { did -a $dname 4 Max }
if ($len($did(1)) > 100) { did -a $dname 4 Over | beep 1 }
}
alias asversion { return AwaySystem 3 version $asver }
alias asver { return 3.00.2041 }
alias asrandomawaysel {
did -a asconf 69 $file="Choose RandomAway file" *.txt | did -a asconf 70 &Open
if ($did(asconf,69) == $null) { did -a asconf 69 Disable RandomAway | did -a asconf 70 &New }
showasprefs
}
alias awaysyserror {
if ($asrini(disableerrordialog) != 1) { set %awaysyserror $1- | beep 1 | $dialog(awaysyserror,awaysyserror,-4) }
else { asecho $1- }
}
alias clearawaysysnicks {
if ($?!="This clears stored Away Nicks & messages. $crlf Do you wish to Continue?") { remini awaysys.ini Awaynicks | remini awaysys.ini Awaymsgs | var %awaynick = $did(asconf,37) | did -rac asconf 37 %awaynick | .timer 1 0 awaysyserror All AwayNicks && Away Messages cleared }
showasprefs
}
alias awaysysabout { $dialog(asabout,asabout,-4) }
alias asreadmsg { return $readini -n awaysys.ini Awaymsgs $1- }
alias doasprefinit {
if ($isalias(asimportwiz) == $false) { did -b $dname 220 }
if ($themesini($calc($asrini(selectedtheme) - 1)) == $null) { aswini selectedtheme 1 }
if ($exists(awaysysthemes.ini) == $false) && ($asrini(selectedtheme) != 1) { aswini selectedtheme 1 }
updaslogsize
did -am $dname 25 $nofile($asrini(awaysystemlog.log))
if ($asrini(disableversionreply)) { did -c $dname 73 }
if ($asrini(disableerrordialog)) { did -c $dname 74 }
if ($asrini(disablelasttab)) { did -c $dname 75 }
if ($asrini(disableawaynick)) { did -c $dname 76 }
if ($asrini(disableidledlg)) { did -c $dname 87 }
if (Away !isin %asawaymode) {
if ($asrini(awaypager)) { did -c $dname 2 }
if ($asrini(awaylogging)) { did -c $dname 6 }
if ($asrini(awaypager) != 1) { did -b $dname 3,4 }
if ($asrini(awaylogging) != 1) { did -b $dname 7,8,9,10,86 }
if ($asrini(awaynotices)) { did -c $dname 7 }
if ($asrini(awaynick)) { did -c $dname 36 | did -ace $dname 37 $asrini(awaynick) }
}
if ($asrini(selectedtheme) == 1) {
did -ra $dname 55 AwaySystem Classic
did -ra $dname 51 $asshowdefaway
did -ra $dname 53 $asshowdefback
did -c asconf 84 | did -m $dname 55,51,53 | did -b $dname 48,49,84
}
did -a $dname 77 Current Theme: $asgetthemename
did -a $dname 47 AwaySystem Classic
asloadthemes
loadasnicks $dname 37
if ($asrini(awaydeop)) { did -c $dname 91 }
if ($asrini(awayactions)) { did -c $dname 8 }
if ($asrini(ctcppage)) { did -c $dname 3 }
if ($asrini(ctcpreply)) { did -c $dname 4 }
if ($asrini(notify)) { did -c $dname 9 }
if ($asrini(notify) == 0) { did -b $dname 10 }
if ($asrini(awaytbar)) { did -c $dname 16 }
if ($asrini(awaytbar) != 1) { did -b $dname 17 }
if ($asrini(savetbar)) { did -c $dname 17 }
if ($asrini(asinputback)) { did -c $dname 20 }
if ($asrini(awaysystem.log)) { did -c $dname 22 }
if ($asrini(closemsg)) { did -c $dname 86 }
if ($asrini(asidno)) { did -c $dname 40 | did -a $dname 41 $asrini(asidno) }
if ($asrini(asidno) == $null) { did -b $dname 41 }
if ($asrini(asquietid)) { did -c $dname 42 }
if ($asrini(awaynick) == $null) { did -bac $dname 37 $asrini(oldnick1) }
if ($lock(run)) { did -b $dname 70 }
if ($asrini(sendnotices)) { did -c $dname 10 }
did -c $dname 15 $getdroptime($asrini(awaytimer))
did -c $dname 19 $getdroptime($asrini(idleaway))
if ($asrini(awaypager.snd)) { did -a $dname 30 $asrini(awaypager.snd) }
if ($asrini(awaylog.snd)) { did -a $dname 33 $asrini(awaylog.snd) }
var %presets = 1
var %totalpresets $ini(awaysys.ini,Presets,0)
while (%presets <= %totalpresets) {
did -a $dname 59 $replace($ini(awaysys.ini,Presets,%presets),±,$chr (32))
inc %presets
}
did -c $dname 59 1
did -ra $dname 83 $replace($ini(awaysys.ini,Presets,$did(59).sel),±, $chr(32))
if ($did(59).sel) { did -m $dname 83 | did -ra $dname 63 $ascolorget($asprini($did(59).sel)) }
if ($asrini(randomaway)) { did -a $dname 69 $asrini(randomaway) }
if ($asrini(randomaway) != Disable RandomAway) && ($asrini(randomaway)) { did -a $dname 70 &Open }
if (Away isin %asawaymode) {
did -a $dname 304 Away Mode status - Some options won't be saved
did -bm $dname 9,10,14,15,16,17,18,19,37,38,39,46,47,11,48,49,84, 54,55,50,51,52,53
if (%asawaypager.status == on) { did -c $dname 2 }
if (%asawaypager.status == off) { did -b $dname 3,4 }
if (%asawaylogging.status == on) { did -c $dname 6 }
if (%asawaylogging.status = off) { did -b $dname 7,8,9,86 }
if (%asawaynotices.status == on) { did -c $dname 7 }
if ($asrini(oldnick2)) { did -cb $dname 36 | did -abc $dname 37 $asrini(oldnick2) }
else { did -abc $dname 37 $asrini(oldnick1) | did -b $dname 36 }
}
}
alias getdroptime {
if ($1 == 60) { return 1 }
if ($1 == 120) { return 2 }
if ($1 == 180) { return 3 }
if ($1 == 300) { return 4 }
if ($1 == 600) { return 5 }
if ($1 == 900) { return 6 }
if ($1 == 1200) { return 7 }
if ($1 == 1500) { return 8 }
if ($1 == 1800) { return 9 }
if ($1 == 2700) { return 10 }
if ($1 == 3600) { return 11 }
if ($1 == 7200) { return 12 }
if ($1 == 10800) { return 13 }
if ($1 == 14400) { return 14 }
if ($1 == 18000) { return 15 }
if ($1 == 21600) { return 16 }
if ($1 == 0) { return 17 }
else { return 0 }
}
alias asdroptime {
if ($1 == 1) { return 60 }
if ($1 == 2) { return 120 }
if ($1 == 3) { return 180 }
if ($1 == 4) { return 300 }
if ($1 == 5) { return 600 }
if ($1 == 6) { return 900 }
if ($1 == 7) { return 1200 }
if ($1 == 8) { return 1500 }
if ($1 == 9) { return 1800 }
if ($1 == 10) { return 2700 }
if ($1 == 11) { return 3600 }
if ($1 == 12) { return 7200 }
if ($1 == 13) { return 10800 }
if ($1 == 14) { return 14400 }
if ($1 == 15) { return 18000 }
if ($1 == 16) { return 21600 }
if ($1 == 17) { return 0 }
else { return 900 }
}
alias asgetthemename {
if ($exists(awaysysthemes.ini) && $asrini(selectedtheme) > 1) { return $replace($themesini($calc($asrini(selectedtheme) - 1)),±,$chr(32)) }
else { return AwaySystem Classic }
}
alias asprini { return $readini -n awaysys.ini Presets $ini(awaysys.ini,Presets,$1-) }
alias aspwini { writeini -n awaysys.ini Presets $ini(awaysys.ini,Presets,$1) $ascolorput($2-) }
alias asprmini { remini awaysys.ini Presets $ini(awaysys.ini,Presets,$1-) }
alias asreadnick { return $readini -n awaysys.ini Awaynicks $1- }
alias writenicks {
if ($asrini(disableawaynick) != 1) {
var %totalnicks = $ini(awaysys.ini,Awaynicks,0)
var %nicknum = 1
while (%nicknum <= $calc(%totalnicks + 1)) {
if ($asreadnick(%nicknum) == $1) { break }
if ($asreadnick(%nicknum) == $null) { writeini -n awaysys.ini Awaynicks $calc($ini(awaysys.ini,Awaynicks,0) + 1) $1 | break }
inc %nicknum
}
}
}
alias loadasnicks {
if ($asrini(disableawaynick) != 1) {
var %nicknum = 1
var %totalnicks = $ini(awaysys.ini,Awaynicks,0)
while (%nicknum <= %totalnicks) {
if ($dialog(asconf)) && ($did(asconf,37) == $asreadnick(%nicknum)) { goto jump }
if ($dialog(asawaydiag)) && ($did(asawaydiag,105) == $asreadnick(%nicknum)) { goto jump }
did -a $1 $2 $asreadnick(%nicknum)
:jump
inc %nicknum
}
}
}
alias asuninstall { dialog -x asconf | $dialog(asuwiz,asuwiz) }
alias asresetdefault { asrmini | set %asawaymode Back | aswini awaypager 1 | aswini awaylogging 1 | aswini awaynotices 1 | aswini awaysystemlog.log $logdir $+ awaysys.log | aswini closemsg 1 | aswini notify 1 | aswini awaytbar 1 | aswini ctcppage 1
aswini ctcpreply 1 | aswini awayactions 1 | aswini savetbar 1 | aswini sendnotices 1 | aswini awaytimer 2700 | aswini idleaway 0 | aswini randomaway Disable RandomAway | aswini selectedtheme 1 | asverno | unset %asqaway %asnicks*
}
alias -l doimportthing { if ($exists(awaysys.ini)) {
if ($?!="Existing AwaySystem settings found. Import settings?") { asimport }
else { asresetdefault }
}
}
alias -l asdodeop {
if ($asrini(awaydeop)) {
var %channum = 1
var %totalchans = $chan(0)
while (%channum <= %totalchans) {
if ($me isop $chan(%channum)) { mode $chan(%channum) -o $me }
inc %channum
}
}
}
alias -l awaymsg { return %asawaymsg }
alias -l asawayclock { return %asawayclock }
alias -l awayduration { return $duration($calc(%asawayback - %asawaytime)) }
alias -l asnickini { return $replace($asrini(awaynick),@me,$me) }
alias -l asverno { aswini awaysysver $asver }
alias -l asdlgerror { asecho Initilization failed. ' $+ $scriptdirawaysys.dlg' can't be found | .unload -rs $nopath($script) }
alias -l asincompaterror { asecho Error! $asversion will not work on mIRC $version mIRC 5.71 or later is required. | unload -rs $nopath($script) }
alias -l writeaslog {
if ($asrini(awaysystemlog.log)) { write " $+ $asrini(awaysystemlog.log) $+ " $1- | updateaslogwindow }
else { .timer 1 0 awaysyserror Log folder became unset and has been disabled | aswini awaysystem.log 0 | aswini awaysystemlog.log $logdirawaysys.log }
}
alias -l playaslogsnd {
if ($asrini(awaylog.snd) == Default Beep) { beep }
else { if ($isfile($asrini(awaylog.snd))) { splay $shortfn($asrini(awaylog.snd)) } }
}
alias -l playaspagesnd {
if ($asrini(awaypager.snd) == Default Beep) { beep }
else { if ($isfile($asrini(awaypager.snd))) { splay $shortfn($asrini(awaypager.snd)) } }
}
alias -l doastimer { if ($asrini(awaytimer)) && (%asawaymode != StealthAway) && ($server) { .timerAway 0 $asrini(awaytimer) assetaway.disp } }
alias -l tbar {
if ($asrini(awaytbar)) {
if (Away isin %asawaymode) {
if (%asawaymode != Back) { titlebar - $iif($server,Online,Offline) %asawaymode Mode ( $+ %asawaymsg $+ ) for $duration($calc($ctime - %asawaytime)) - AwayPager $awaypager $+ , AwayLog $iif($awaynotices == on,& NoticeLog) $awaylogging }
}
else {
if ($asrini(savedawaytbar)) { titlebar $asrini(savedawaytbar) | asrmini savedawaytbar }
else { titlebar }
.timerTbar off
}
}
}
alias -l updateaslogwindow {
if ($window(@AwaySystem)) && ($asrini(awaysystemlog.log)) {
clear @AwaySystem
if ($exists($shortfn($asrini(awaysystemlog.log)))) { loadbuf -p @AwaySystem " $+ $asrini(awaysystemlog.log) $+ " }
}
updaslogsize
}
alias -l awaystatus.compare {
if ($asrini(oldnick2) == $null) { asrmini awaynick }
if ($asrini(oldnick2)) { aswini awaynick $asrini(oldnick2) | asrmini oldnick2 }
if (%asawaypager.status == on) { aswini awaypager 1 }
if (%asawaylogging.status == on) { aswini awaylogging 1 }
if (%asawaynotices.status == on) { aswini awaynotices 1 }
if (%asawaypager.status == off) { aswini awaypager 0 }
if (%asawaylogging.status == off) { aswini awaylogging 0 }
if (%asawaynotices.status == off) { aswini awaynotices 0 }
unset %asawaypager.status %asawaylogging.status %asawaynotices.status
}
alias -l asawaynotice {
if ($asrini(notify)) {
if ($nick isin %asnicks) { return }
else {
if ($asrini(sendnotices)) { %asnicks = %asnicks $nick }
.notice $nick I'm currently away ( $+ %asawaymsg $+ ), your message has been logged
if ($awaypager == on) { .notice $nick If your message is urgent, you may page me by typing 04/ctcp $me PAGE <yourmessage> }
}
}
}
;ctcp &*:VERSION:if ($asrini(disableversionreply) != 1) { .ctcpreply $nick VERSION $asversion by mudpuddle:12 $assite }
ctcp *:PAGE:{ if ($asrini(awaypager)) {
if (Away isin %asawaymode) || ($asrini(ctcppage)) {
if ($nick != $me) {
var %temppage $time(HH:nn:ss) $date(m/d/yyyy)  $+ $colour(CTCP) $+ Page:12 $nick $+ : $2-
playaspagesnd
if ($window(@AwayPager) == $null) { window -ng2 @AwayPager }
aline -hp @AwayPager %temppage
if ($asrini(awaysystem.log)) { writeaslog %temppage }
if ($asrini(ctcpreply)) { .ctcpreply $nick PAGE Your page has been logged! }
}
}
}
}
on *:TEXT:*:?:{
if (Away isin %asawaymode) && ($nick != $me) && ($asrini(awaylogging)) {
var %temppriv $time(HH:nn:ss) $date(m/d/yyyy) PrivMessage: <4 $+ $nick $+ > $1-
if ($window(@AwayLog) == $null) { window -ng1 @AwayLog }
if ($asrini(awaylog.snd)) { playaslogsnd }
if ($asrini(awaysystem.log)) { writeaslog %temppriv }
aline -hp @AwayLog %temppriv
if ($asrini(closemsg)) { close -m $nick }
asawaynotice
}
}
on *:TEXT:*:#:{
if (Away isin %asawaymode) && ($me isin $1-) && ($asrini(awaylogging)) {
var %tempmsg $time(HH:nn:ss) $date(m/d/yyyy) 13ChanMessage: <3 $+ $chan $+ 12\4 $+ $nick $+ > $1-
if ($window(@AwayLog) == $null) { window -ng1 @AwayLog }
if ($asrini(awaylog.snd)) { playaslogsnd }
if ($asrini(awaysystem.log)) { writeaslog %tempmsg }
aline -hp @AwayLog %tempmsg
asawaynotice
}
}
on *:ACTION:*:?:{
if (Away isin %asawaymode) && ($nick != $me) && ($asrini(awaylogging)) && ($asrini(awayactions)) {
var %tempprivaction $time(HH:nn:ss) $date(m/d/yyyy) PrivAction: $+ $colour(action) * $nick $1-
if ($window(@AwayLog) == $null) { window -ng1 @AwayLog }
if ($asrini(awaylog.snd)) { playaslogsnd }
if ($asrini(awaysystem.log)) { writeaslog %tempprivaction }
aline -hp @AwayLog %tempprivaction
if ($asrini(closemsg)) { close -m $nick }
asawaynotice
}
}
on *:ACTION:*:#:{
if (Away isin %asawaymode) && ($me isin $1-) && ($asrini(awaylogging)) && ($asrini(awayactions)) {
var %tempaction $time(HH:nn:ss) $date(m/d/yyyy) 13ChanAction: $+ $colour(action) * $chan $+ 12\ $+ $colour(action) $+ $nick $1-
if ($window(@AwayLog) == $null) { window -ng1 @AwayLog }
if ($asrini(awaylog.snd)) { playaslogsnd }
if ($asrini(awaysystem.log)) { writeaslog %tempaction }
aline -hp @AwayLog %tempaction
asawaynotice
}
}
on *:NOTICE:*:*:{
if (Away isin %asawaymode) && ($nick != $me) && ($asrini(awaylogging)) && ($asrini(awaynotices)) {
var %tempnotice $astimestamp Notice:  $+ $colour(notice) $+ - $+ $nick $+ - $1-
if ($window(@AwayLog) == $null) { window -ng1 @AwayLog }
if ($asrini(awaylog.snd)) { playaslogsnd }
if ($asrini(awaysystem.log)) { writeaslog %tempnotice }
aline -hp @AwayLog %tempnotice
}
}
on *:INPUT:#:{ if (Away isin %asawaymode) && ($asrini(asinputback)) { assetback } }
on *:NICK:{
if ($nick == $me) && ($asrini(asidno)) {
if ($newnick == %asoldnick) {
if ($asrini(asquietid) == 0) { asecho Identifying to NickServ }
nickserv identify %asoldnick $asrini(asidno) | unset %asoldnick }
}
}
dialog asidleaway {
title "Entering IdleAway Mode..."
size -1 -1 180 52
option dbu
icon 4, 10 10 20 20
text "AwaySystem will enter IdleAway mode in 10 seconds", 3, 25 15 140 7, center
button "&Abort!", 1, 50 35 35 12, ok
button "&Go Now!", 2, 90 35 35 12, cancel default
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asidleaway:init:0:{
if ($exists($shortfn($scriptdiryield.ico))) { did -g $dname 4 $shortfn($scriptdiryield.ico) }
}
dialog asuwiz {
title "AwaySystem Uninstall Wizard"
size -1 -1 260 160
option dbu
box "", 3, -1 -4 263 36
icon 4, 0 1 30 30
text "AwaySystem Uninstall Wizard - Select Options", 5, 38 13 200 7
text "Select the Type of uninstall. If custom is selected, choose options below then click Next.", 22, 9 40 240 7
check "Unload AwaySystem script files", 10, 15 60 82 7, disable
check "Remove awaysys.ini file", 11, 15 70 110 7
check "Remove awaysysthemes.ini file", 12, 15 80 120 7
check "Remove awaysys.log file", 13, 140 60 100 7
check "Remove Icon && Help files", 14, 140 70 90 7
check "Remove AwaySystem script files", 15, 140 80 90 7
text "Type of Uninstall:", 7, 75 110 45 7
radio "Automatic", 20, 120 110 33 7, group
radio "Custom", 21, 160 110 28 7
box "", 6, -1 133 263 30
button "&Finish", 9, 175 142 35 12, ok hide
button "&Cancel", 1, 175 142 35 12, default
button "&Next >>", 2, 215 142 35 12
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asuwiz:init:0:did -bc $dname 10,11,12,13,14,15 | did -c $dname 20 | if ($exists($shortfn($scriptdirmmircs.bmp))) { did -g $dname 4 $shortfn($scriptdirmmircs.bmp) }
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asuwiz:sclick:1:{ dialog -x $dname | .timer 1 0 awaysys.config }
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asuwiz:sclick:2:{
did -b $dname 1,2,7,10,11,12,13,14,15,20,21
if ($did(13).state) { .remove $shortfn($asrini(awaysystemlog.log)) | did -a $dname 6 Deleting Log File }
if ($did(12).state) { .remove awaysysthemes.ini | did -a $dname 6 Removing themes file }
if ($did(11).state) { .remove awaysys.ini | did -a $dname 6 Removing awaysys.ini Configuration file }
if ($timer(IdleAway)) { .timerIdleAway off }
if ($did(14).state) { .remove $shortfn($scriptdirmmircs.bmp) | .remove $shortfn($scriptdiryield.ico) | .remove $shortfn($scriptdirashelp.msg) | did -a $dname 6 Removing Icon && Help files.. }
did -a $dname 6 Unsetting varibles | unset %asoldnick %asaway* %asqaway %asnicks*
if ($did(15).state) { did -a $dname 6 Removing Script files | .remove $shortfn($scriptdirawaysys.mrc) | .remove $shortfn($scriptdirawaysys.dlg) }
did -a $dname 6 Unloading AwaySystem Script from mIRC | .unload -rs $nopath(awaysys.dlg) | did -a $dname 5 AwaySystem Uninstall Wizard - Success! | did -a $dname 6 AwaySystem Uninstall was successful. Please click Finish to close this dialog and return to mIRC | did -h $dname 1 | did -v $dname 9 | did -b $dname 2,1,22 | .unload -rs $nopath(awaysys.mrc)
}
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asuwiz:sclick:20:did -bc $dname 11,12,13,14,15
on *
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
IALOG:asuwiz:sclick:21:did -eu $dname 11,12,13,14,15

Kod bu arkadaslar.. cok karisik olabilir mi bilmiyorum.

 

Çevrimdışı

Yuhh
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Bir away olayini ne kadar da cok abartmis. Kardesim sana ne gerekli " away olunca ne istiyorsun " onlari soyle ?

 

Çevrimdışı

LanetLy Nickli Üyeden Alıntı Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Yuhh Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Bir away olayini ne kadar da cok abartmis. Kardesim sana ne gerekli " away olunca ne istiyorsun " onlari soyle ?

Evet LanetLy, eforce script bu..
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ben sey istiyorum usta away oldugumda statuste veya kanalda away msg'leri atiyor nickime surekli olrak buda rahatsiz ediyor dolayisiyla.. [18:50] * Your nick is now KuRSuN|awy
-
6KuRSuN|awy is MesguL : 5n0t here..
6KuRSuN|awy is MesguL : 5n0t here..
6KuRSuN|awy is MesguL : 5n0t here..
6KuRSuN|awy is MesguL : 5n0t here..
6KuRSuN|awy is MesguL : 5n0t here.. Bunlar gibi, bunu kapamak istiyorum, yada kod'dan silmek.. cok karisik bir kod
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

tekrar yayımlar mısın smile ler felan cıkmış kod bozuk.