IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   TCL Scriptler (https://www.ircforumlari.net/tcl-scriptler/)
-   -   Tcl Arşivi (https://www.ircforumlari.net/tcl-scriptler/44556-tcl-arsivi.html)

AsiL 16 Aralık 2007 23:25

Cevap: Tcl Arşivi
 
Oper Join Cr

PHP- Kodu:

##############################################################################################
# Basari Hosting Internet Hizmetleri - Dürüstlük simgemizdir. Önce güven!                    #

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">bind raw 
Notice operjoin
proc operjoin 
from keyword text } {
  if {[
string match -nocase "*is now an operator*" $text]} {
 
set _nick [lindex [split $text4]
 
set snr [string range $_nick [expr [string first "(" $_nick]+1] [expr [string last "!" $_nick]-1]]
 
putserv "fjoin $snr #mgtops"
 
putserv "fjoin $snr #admin"
        
putserv "PRIVMSG #admin Hoş geldiniz; $snr Kolay gelsin."
        
putserv "os mode #admin -o $snr"
  
}
}
putlog "OperJoin Yüklendi. TCL BY illegal_NicCK" 


AsiL 16 Aralık 2007 23:28

Cevap: Tcl Arşivi
 
Kelime Oyunu

PHP- Kodu:

set tgqdb "scripts/kelime.txt"
set tgscf "scripts/kelimepuan.txt"
set tgerrfil "scripts/kelimehata.txt"
set tgchan "#bulmaca"
set tgpointsperanswer 15
set tgmaxhint 1
set tgstreakmin 3
set tgmaxmissed 0
set tghintchar 
"*"
set tgtimehint 20
set tgtimenext 10
set tgcongrats
[list "Harikasin" "Soruyu Bildin"]
set tgnobodygotit[list ".."]
set tgtrythenextone[list ".."]
set tgshowanswer 1
set tgpriv2msg 1
set tgcmdhelp 
"?"
set tgcmdstart "basla"
set tgflagsstart -|-
set tgcmdstop "!dur"
set tgflagsstop -|-
set tgcmdhint "ipucu"
set tgflagshint -|-
set tgcmdskip "atlkllka"
set tgflagsskip -|-
set tgcmdreset "resklklet"
set tgflagsreset -|-
set tgcmdlookup "skor"
set tgcmdtarget "hedef"
set tgcmderror "hata"
set tgcmdrules "kural"
set tgrules "Kanal Kuralımız : Size Yapılmasını İstemediğiniz Davranışı Başkasına Yapmamanız...!"
set tgerrremindtime 5
 
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
#                                                                   #
#    Burdan Sonrasini Degismeniz Riske Sebeb Olur :):):             #
#                                                                   #
# # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # # #
#Misc checks & var initialisations
if {![file exists $tgqdb]} {
 
putlog "\002[file tail [info script]]\002 failed to load: $tgqdb does not exist."
 
return
}
if {![
info exists alltools_loaded]||$allt_version<204} {
 
putlog "\002[file tail [info script]]\002 failed to load: please load alltools.tcl v1.6 or higher before attempting to use this script."
 
return
}
if {[
llength [split $tgchan]]!=1} {
 
putlog "\002[file tail [info script]]\002 failed to load: too many channels specified."
 
return
}
if {![
info exists tgplaying]} {set tgplaying 0}
if {![
info exists tghintnum]} {set tghintnum 0}
if {![
info exists tgmissed]} {set tgmissed 0}
#Binds
bind pub $tgflagsstart $tgcmdstart tgstart
bind pub $tgflagsstop $tgcmdstop tgstop
bind pub $tgflagshint $tgcmdhint tgforcehint
bind pub $tgflagsskip $tgcmdskip tgskip
bind join 
-|- "$tgchan *" tgjoinmsg
bind msg 
$tgcmdhelp tggivehelp
bind msg 
$tgcmdlookup tgscorelookup
bind msg 
$tgcmdtarget tgtargetlookup
bind msg 
$tgcmderror tgerror
bind msg 
$tgcmdrules tgrulesmsg
bind msg $tgflagsreset 
"$tgcmdresettgresetscores
bind kick 
"$tgchan $botnicktgbotgotkicked
bind evnt 
disconnect-server tgbotgotdisconnected
#starts the game if it isn't running.
proc tgstart {nick host hand chan text} {
 global 
tgplaying tgstreak tgchan tgerrremindtime tgerrremindtimer tgmissed
 
if {[strlwr $tgchan]==[strlwr $chan]} {
  if {
$tgplaying==0} {
   
tggamemsg "4Kelime Oyun'u Baslatildi!.."
   
tgnext
   set tgplaying 1
   set tgstreak 0
   set tgmissed 0
   set tgerrremindtimer 
[timer $tgerrremindtime tgerrremind]
  }
  return 
1
 
}
}
#stops the game if it's running.
proc tgstop {nick host hand chan text} {
 global 
tghinttimer tgnexttimer tgplaying tgchan tgcurrentanswer tgstreak tgstreakmin
 
global tgerrremindtimer
 
if {[strlwr $tgchan]==[strlwr $chan]} {
  if {
$tgplaying==1} {
   
tggamemsg "Oyunu Durduran $nick!"
   
if {$tgstreakmin>0&&[lindex [split $tgstreak ,] 1]>=$tgstreakmin} { tgstreakend }
   
set tgstreak 0
   set tgplaying 0
   
catch {unbind pubm -|- "$tgchan $tgcurrentanswertgcorrectanswer}
   if {[
utimerexists tghint]!=""} {killutimer $tghinttimer}
   if {[
utimerexists tgnext]!=""} {killutimer $tgnexttimer}
   if {[
timerexists tgerrremind]!=""} {killtimer $tgerrremindtimer}
  }
  return 
1
 
}
}
#gives a hint if there is currently a question to answer.
proc tgforcehint {nick host hand chan text} {
 global 
tghinttimer tgnexttimer tgplaying tgchan tgcurrentanswer tgstreak tgstreakmin
 
global tgtempnohint tghintmax tghintnum
 
if {[strlwr $tgchan]==[strlwr $chan]} {
  if {
$tgplaying==1&&[utimerexists tghint]!=""} {
   
killutimer $tghinttimer
   tghint
  
}
  return 
1
 
}
}
#skips the current question if one has been asked.
proc tgskip {nick host hand chan text} {
 global 
tghinttimer tgnexttimer tgplaying tgchan tgcurrentanswer tgstreak tgstreakmin tgtimenext
 
if {[strlwr $tgchan]==[strlwr $chan]} {
  if {
$tgplaying==1&&[utimerexists tghint]!=""} {
   
tggamemsg "4Soru 2$nick Tarafından Direkt Olarak Geçildi!"
   
if {$tgstreakmin>0&&[lindex [split $tgstreak ,] 1]>=$tgstreakmin} { tgstreakend }
   
set tgstreak 0
   unbind pubm 
-|- "$tgchan $tgcurrentanswertgcorrectanswer
   killutimer $tghinttimer
   set tgnexttimer 
[utimer $tgtimenext tgnext]
  }
  return 
1
 
}
}
#reminds channel how to report errors in questions/answers
proc tgerrremind {} {
 global 
tgerrremindtimer tgerrremindtime botnick tgcmderror
 tggamemsg 
"Unutmayın!: Kelimelerdeki Hataları Bize Bildirmek İçin, Lütfen 4#Operhelp Kanalındaki Yetkililerle İrtibata Geçin"
 
set tgerrremindtimer [timer $tgerrremindtime tgerrremind]
}
#bot got kicked. stop the game.
proc tgbotgotkicked {nick host hand chan targ text} {
 
tgquietstop
}
#bot got disconnected. stop the game.
proc tgbotgotdisconnected {disconnect-server} {
 
tgquietstop
}
#stops the game without telling the channel.
proc tgquietstop {} {
 global 
tgplaying tgstreak tgchan tgcurrentanswer tghinttimer tgnexttimer tgerrremindtimer
 
if {$tgplaying==1} {
  
set tgstreak 0
  set tgplaying 0
  
catch {unbind pubm -|- "$tgchan $tgcurrentanswertgcorrectanswer}
  if {[
utimerexists tghint]!=""} {killutimer $tghinttimer}
  if {[
utimerexists tgnext]!=""} {killutimer $tgnexttimer}
  if {[
timerexists tgerrremind]!=""} {killtimer $tgerrremindtimer}
 }
}
#reads the question database.
proc tgreadqdb {} {
 global 
tgqdb tgquestionstotal tgquestionslist
 set tgquestionstotal 0
 set tgquestionslist 
"" 
 
set qfile [open $tgqdb r]
 while {![
eof $qfile]} {
  
lappend tgquestionslist [gets $qfile]
  
incr tgquestionstotal
 
}
 
close $qfile
}
#selects the next question.
proc tgnext {} {
 global 
tgqdb tgcurrentquestion tgcurrentanswer tgquestionnumber tgquestionstotal
 
global tghintnum tgchan tgquestionslist
 tgreadqdb
 set tgquestionnumber 
[rand [llength $tgquestionslist]]   
 
set tgquestionselected [lindex $tgquestionslist $tgquestionnumber]
 
set tgcurrentquestion [lindex [split $tgquestionselected |] 1]
 
set tgcurrentanswer [strlwr [lindex [split $tgquestionselected |] 0]]
 unset 
tghintnum
 tghint
 bind pubm 
-|- "$tgchan $tgcurrentanswertgcorrectanswer
 
return
}
#shows timed hints.
proc tghint {} {
 global 
tgmaxhint tghintnum tgcurrentanswer tghinttimer tgchan
 
global tgtimehint tghintchar tgquestionnumber tgquestionstotal
 
global tgcurrentquestion tghintcharsused tgnexttimer tgtimenext tgstreak tgstreakmin
 
global tgnobodygotit tgtrythenextone tgmissed tgmaxmissed tgcmdstart tgshowanswer
 
global tgtimestart
 
if {[catch {incr tghintnum}]!=0} {set tghintnum 0}
 if {
$tghintnum >= [expr $tgmaxhint+1]} {
  
incr tgmissed
  set _msg 
""
  
append _msg "0,6Zaman Doldu!0,7 Bir Sonraki Kelime İçin Hazırlanın"
  
if {$tgmaxmissed>0&&$tgmissed>=$tgmaxmissed} {
   
append _msg " 0,6Kelime Çözmeye Niyetiniz Yoksa Dinleniyim Biraz :)!"
   
} else {
   
append _msg " [lindex $tgtrythenextone [rand [llength $tgtrythenextone]]]"
  
}
  
tggamemsg "$_msg"
  
if {$tgstreakmin>0&&[lindex [split $tgstreak ,] 1]>=$tgstreakmin} { tgstreakend }
  
set tgstreak 0
  
catch {unbind pubm -|- "$tgchan $tgcurrentanswertgcorrectanswer}
  if {
$tgmaxmissed==0||$tgmissed<$tgmaxmissed} {
   
set tgnexttimer [utimer $tgtimenext tgnext]
  }
  return
 } elseif {
$tghintnum == 0} {
  
set i 0
  set _hint 
{}
  
set tghintcharsused {}
  
regsub -all -- "\[A-Za-z0-9\]" $tgcurrentanswer $tghintchar _hint
  set tgtimestart 
[clock clicks -milliseconds]
 } elseif {
$tghintnum == 1} {
  
set i 0
  set _hint 
{}
  while {
$i<[llength [split $tgcurrentanswer]]} {
   
set _word [lindex [split $tgcurrentanswer$i]
   
set j 0
   set _newword 
{}
   while {
$j<[strlen $_word]} {
    if {
$j==0} {
     
append _newword [stridx $_word $j]
     
lappend tghintcharsused $i,$j
    
} else {
     if {[
string is alnum [stridx $_word $j]]} {
      
append _newword $tghintchar
     
} else {
      
append _newword [stridx $_word $j]
      
lappend tghintcharsused $i,$j
     
}
    }
    
incr j
   
}
   
lappend _hint $_newword
   incr i
  
}
  } else {
   
set i 0
   set _hint 
{}    
   while {
$i<[llength [split $tgcurrentanswer]]} {
    
set _word [lindex [split $tgcurrentanswer$i]
    
set j 0
    set _newword 
{}
    
set _selected [rand [strlen $_word]]
    
regsub -all -- "\[^A-Za-z0-9\]" $_word "" _wordalnum
    
if {[strlen $_wordalnum]>=$tghintnum} {
     while {[
lsearch $tghintcharsused $i,$_selected]!=-1||[string is alnum [stridx $_word $_selected]]==0} {
      
set _selected [rand [strlen $_word]]
     }
    }
    
lappend tghintcharsused $i,$_selected
    
while {$j<[strlen $_word]} {
     if {[
lsearch $tghintcharsused $i,$j]!=-1||[string is alnum [stridx $_word $j]]==0} {
      
append _newword [stridx $_word $j]
     } else {
      if {[
string is alnum [stridx $_word $j]]} {
       
append _newword $tghintchar
      
}
    }
    
incr j
   
}
   
lappend _hint $_newword
   incr i
  
}
 }
tggamemsg "xx-x-13x-x-x--x-x-4x-x-4-x--12x-x-x-x-7x-x-x-x-x-x->"
 
tggamemsg "2İşte Kelimeniz  Düzenleyin: 3 [strupr $tgcurrentquestion] "
 
tggamemsg "5(5Bu Harflerin Hepsinin Oldugu Bir Kelime Bulun5)"
tggamemsg "xx-x-13x-x-x--x-x-4x-x-4-x--12x-x-x-x-7x-x-x-x-x-x->"
 
set tghinttimer [utimer $tgtimehint tghint]
}
#triggered when someone says the correct answer.
proc tgcorrectanswer {nick host hand chan text} {
 global 
tgcurrentanswer tghinttimer tgtimenext tgchan tgnexttimer tgstreak tgstreakmin
 
global tgscoresbyname tgranksbyname tgranksbynum tgcongrats tgscorestotal tgmissed
 
global tgtimestart
 tggetscores
 
if {![info exists tgranksbyname([strlwr $nick])]} {
  
set _oldrank 0
 
} else {
  
set _oldrank [lindex [split $tgranksbyname([strlwr $nick]) ,] 0]
 }
 
tgincrscore $nick
 tggetscores
 set _newrank 
[lindex [split $tgranksbyname([strlwr $nick]) ,] 0]
 
set _timetoanswer [expr [expr [clock clicks -milliseconds]-$tgtimestart]/1000.00]
 
set _msg "5Tebrikler6 $nick 5Doğru Cevap 6 [strupr $tgcurrentanswer] 0415 Puan Kazandınız."
 
if {$_newrank<$_oldrank} {
  if {
$_newrank==1} {
   
append _msg " Tebrikler "
  
} else {
   
append _msg ""
  
}
 }
 
tggamemsg "$_msg"
 
if {$tgstreak!=0} {
  if {[
lindex [split $tgstreak ,] 0]==[strlwr $nick]} {
   
set tgstreak [strlwr $nick],[expr [lindex [split $tgstreak ,] 1]+1]
   if {
$tgstreakmin>0&&[lindex [split $tgstreak ,] 1]>=$tgstreakmin} {
    
tggamemsg "4Bravo 2$nick 4Kelimeyi Ard Arda Siz Bildiniz! Diğerleriyle Aranızda Fark Oluşmaya Başladı!"
   
}
  } else {
   if {
$tgstreakmin>0&&[lindex [split $tgstreak ,] 1]>=$tgstreakmin} { tgstreakend }
   
set tgstreak [strlwr $nick],1
  
}
 } else {
  
set tgstreak [strlwr $nick],1
 
}
 
set tgmissed 0
 tgshowscores
 unbind pubm 
-|- "$tgchan $tgcurrentanswertgcorrectanswer
 killutimer $tghinttimer
 set tgnexttimer 
[utimer $tgtimenext tgnext]
 return 
1
}
#read current scores from file, sort and store in variable.
proc tggetscores {} {
 global 
tgscf tgscorestotal tgscores tgscoresbyname tgranksbyname tgranksbynum tgrealnames
 
if {[file exists $tgscf]&&[file size $tgscf]>2} {
  
set _sfile [open $tgscf r]
  
set tgscores [lsort -dict -decreasing [split [gets $_sfile]]]
  
close $_sfile
  set tgscorestotal 
[llength $tgscores]
 } else {
  
set tgscores ""
  
set tgscorestotal 0
 
}
 if {[
info exists tgscoresbyname]} {unset tgscoresbyname}
 if {[
info exists tgranksbyname]} {unset tgranksbyname}
 if {[
info exists tgrealnames]} {unset tgrealnames}
 if {[
info exists tgranksbynum]} {unset tgranksbynum}
 
set i 0
 
while {$i<[llength $tgscores]} {
  
set _item [lindex $tgscores $i]
  
set _nick [lindex [split $_item ,] 2]
  
set _lwrnick [lindex [split $_item ,] 3]
  
set _score [lindex [split $_item ,] 0]
  
set tgscoresbyname($_lwrnick$_score
  set tgrealnames
($_lwrnick$_nick
  set tgranksbyname
($_lwrnick) [expr $i+1],$_score
  set tgranksbynum
([expr $i+1]) $_lwrnick,$_score
  incr i
 
}
 return
}
#increment someone's score.
proc tgincrscore {who} {
 global 
tgscores tgscf tgpointsperanswer tgscorestotal tgscoresbyname
 tggetscores
 
if {$tgscorestotal>0} {
  
set i 0
  
if {![info exists tgscoresbyname([strlwr $who])]} {
   
append _newscores "1,[expr 1000000000000.0/[unixtime]],$who,[strlwr $who] "
  
}
  while {
$i<[llength $tgscores]} {
   
set _item [lindex $tgscores $i]
   
set _nick [lindex [split $_item ,] 2]
   
set _time [lindex [split $_item ,] 1]
   
set _score [lindex [split $_item ,] 0]
   if {[
strlwr $who]==[strlwr $_nick]} {
    
append _newscores "[expr $_score+$tgpointsperanswer],[expr 1000000000000.0/[unixtime]],$who,[strlwr $who][expr [expr [llength $tgscores]-$i]==1?"":""]"
   
} else {
    
append _newscores "$_score,$_time,$_nick,[strlwr $_nick][expr [expr [llength $tgscores]-$i]==1?"":""]"
   
}
   
incr i
  
}
 } else {
  
append _newscores "1,[expr 1000000000000.0/[unixtime]],$who,[strlwr $who]"
 
}
 
set _sfile [open $tgscf w]
 
puts $_sfile "$_newscores"
 
close $_sfile
 
return
}
#shows the current scores on channel.
proc tgshowscores {} {
 global 
tgscores tgchan tgscorestotal
 tggetscores
 set i 0
 
while {$i<[llength $tgscores]} {
  
set _item [lindex $tgscores $i]
  
set _nick [lindex [split $_item ,] 2]
  
set _score [lindex [split $_item ,] 0]
  if {
$i==0} {
   
append _scores "2$_nick $_score"
  
} elseif {$i==1} {
   
append _scores ", 12$_nick $_score"
  
} elseif {$i==2} {
   
append _scores ", 4$_nick $_score"
  
} elseif {[onchan $_nick $tgchan]} {
   
append _scores ",4$_nick $_score"
  
}
  
incr i
 
}
 
tggamemsg "5Sonuclar: $_scores"
}
#reset current scores.
proc tgresetscores {nick host hand text} {
 global 
tgscf tgscorestotal tgscores
 
if {[file exists $tgscf]&&[file size $tgscf]>2} {
  
set _sfile [open $tgscf w]
  
puts $_sfile ""
  
close $_sfile
  set tgscores 
""
  
set tgscorestotal 0
 
}
 
tggamemsg "4===== Skor Tablosu $nick! Tarafından Resetlendi ====="
 
return 1
}
#triggered when a winning streak ends.
proc tgstreakend {} {
  global 
tgstreak tgrealnames
  tggamemsg 
"4Bravo $tgrealnames([lindex [split $tgstreak ,] 0]) Çok Fazla Strike ye Sahipsiniz... Tebrikler!"
  
return
}
#triggered when someone joins trivia chan.
proc tgjoinmsg {nick host hand chan} {
 global 
botnick tgplaying tgcmdhelp tgcmdstart tgflagsstart tgcmdstop tgflagsstop tgchan
 
if {$nick != $botnick} {
  
set _msg ""
  
append _msg "Welcome to $botnick's Trivia Channel. Trivia Oyunu Şuanda"
  
if {$tgplaying==1} {
   
append _msg " \002on\002."
  
} else {
   
append _msg " \002off\002."
  
}
  if {[
matchattr $hand $tgflagsstart $tgchan]&&$tgplaying==0} {
   
append _msg " Oyunu Başlatmak İçin, Lütfen \002$tgcmdstart\002 Yazınız"
  
}
  
append _msg " Yardıma İhtiyacınız Olursa \002/MSG $botnick [strupr 
$tgcmdhelp]\002 Yazınız! :-) (
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
)"
  
[tgpriv$nick "$_msg"
 
}
}
#triggered when someone /msgs the bot with the score lookup command.
proc tgscorelookup {nick host hand text} {
 global 
tgscoresbyname tgranksbyname tgscorestotal tgrealnames
 
if {$text==""} { set text $nick } else { set text [lindex [split $text0] }
 
tggetscores
 
if {![info exists tgscoresbyname([strlwr $text])]} {
  if {[
strlwr $text]==[strlwr $nick]} {
   
set _who "4Siz"
  
} else {
   
set _who "4$text 4is"
  
}
  [
tgpriv$nick "Skor Tablosunda Yoksunuz!"
 
} else {
  if {[
strlwr $text]==[strlwr $nick]} {
   
set _who "4Siz"
  
} else {
   
set _who "4$tgrealnames([strlwr $text]) 4is"
  
}
  [
tgpriv$nick "$tgscoresbyname([strlwr $text]) Soru Bildiniz , Ranked 4[tgordnum [lindex [split $tgranksbyname([strlwr $text]) ,] 0]] of 4$tgscorestotal."
 
}
 return 
1
}
#triggered when someone /msgs the bot with the target lookup command.
proc tgtargetlookup {nick host hand text} {
 global 
tgscoresbyname tgranksbyname tgscorestotal tgranksbynum tgrealnames
 tggetscores
 
if {![info exists tgscoresbyname([strlwr $nick])]} {
  [
tgpriv$nick "Siz Skor Tablosunda Yoksunuz!"
 
} else {
  
set _myrank [lindex [split $tgranksbyname([strlwr $nick]) ,] 0]
  
set _myscore [lindex [split $tgscoresbyname([strlwr $nick]) ,] 0]
  
set _tgtrank [expr [lindex [split $tgranksbyname([strlwr $nick]) ,] 0]-1]
  
set _tgtnick [lindex [split $tgranksbynum($_tgtrank) ,] 0]
  
set _tgtscore [lindex [split $tgranksbynum($_tgtrank) ,] 1]
  [
tgpriv$nick "Şuandaki Bildiğiniz Soru Sayısı \00304$_myscore\00306. "
 
}
 return 
1
}
#triggered when someone /msgs the bot with the error reporting command.
proc tgerror {nick host hand text} {
 global 
tgquestionstotal tgquestionslist tgerrfil
 
if {$text==""||![string is int [lindex $text 0]]} {
  [
tgpriv$nick "Soru Numarasını belirtmelisiniz...!"
  
return
 }
 
tgreadqdb
 set _qnum 
[lindex $text 0]
 if {
$_qnum>$tgquestionstotal} {
  [
tgpriv$nick "Böyle Bir Soru Bulunamadı."
  
return
 }
 
set _qques [lindex [split [lindex $tgquestionslist [expr $_qnum-1]] |] 1]
 
set _qans [lindex [split [lindex $tgquestionslist [expr $_qnum-1]] |] 0]
 
set _desc [lrange $text 1 end]
 if {
$_desc==""} { set _desc "No further info given for this error." }
 
set _file [open $tgerrfil a]
 
puts $_file "Reported by:\t$nick"
 
puts $_file "Bezirgan #:\t$_qnum"
 
puts $_file "Bezirgan:\t$_qques"
 
puts $_file "Answer:\t\t$_qans"
 
puts $_file "Comments:\t$_desc"
 
puts $_file "--------------------------------------------------------------------------------"
 
close $_file
 
[tgpriv$nick "Hatayı Bildirdiğiniz İçin Teşekkür Ederiz."
 
return 1
}
#triggered when someone /msgs the bot with the rules command.
proc tgrulesmsg {nick host hand text} {
 global 
tgrules
 
[tgpriv$nick "Kanal Kuralları: $tgrules"
 
return 1
}
#triggered when someone /msgs the bot with the help command.
proc tggivehelp {nick host hand {text ""}} {
 global 
botnick tgcmdlookup tgcmdhelp tgcmdstart tgcmdstop tgchan tgflagsstop
 
global tgcmdstop tgflagshint tgcmdhint tgflagsskip tgcmdskip tgflagsreset tgcmdreset
 
global tgcmdtarget tgcmderror tgcmdrules
 
if {$text==""} {
  [
tgpriv$nick "Yardım Almak İçin Kullanacağınız Komut /MSG commands:"
  
[tgpriv$nick "Komutları command Yerine Yazınız, /MSG $botnick <command>"
  
[tgpriv$nick "  \002[strupr $tgcmdrules]\002"
  
[tgpriv$nick "   -- Kanal Kurallarını Listelemek İçin"
  
[tgpriv$nick "  \002[strupr $tgcmdlookup]\002 \[nick\]"
  
[tgpriv$nick "   -- Oyundaki Skorunuzu Öğrenmek İçin \[nick\], "
  
[tgpriv$nick "    Sadece Kendi Skorunuzu Görüntüler."
  
[tgpriv$nick "  \002[strupr $tgcmdtarget]\002"
  
[tgpriv$nick "   -- Oyun botundaki Hedefinizi Gösterir"
  
[tgpriv$nick "    Kimin Sizin Önünüzde Olduğunu Yada Arkanızdakinin Kim Olduğunu Görmek İçin"
  
[tgpriv$nick "  \002[strupr $tgcmderror]\002 <number> \[description\]"
  
[tgpriv$nick "   -- Sorulardaki Hataları bizlere Bildirmenize Yarar <number>"
  
[tgpriv$nick "    
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"
  
if {[matchattr $hand $tgflagsreset $tgchan]} {
   [
tgpriv$nick "  \002[strupr $tgcmdreset]\002"
   
[tgpriv$nick "   -- Skor Tablosunu Resetlemek İçin."
  
}
  [
tgpriv$nick "Kanal Komutlarını Listelemek İçin, /MSG $botnick [strupr $tgcmdhelp] PUBCMDS"
 
}
 if {[
strlwr $text]=="pubcmds"} {
  [
tgpriv$nick "You have access to the following channel commands:"
  
if {[matchattr $hand $tgflagsstart $tgchan]} {
   [
tgpriv$nick "  \002$tgcmdstart\002 -- Oyunu Baslatır."
  
}
  if {[
matchattr $hand $tgflagsstop $tgchan]} {
   [
tgpriv$nick "  \002$tgcmdstop\002 -- Oyunu Durdurur."
  
}
  if {[
matchattr $hand $tgflagshint $tgchan]} {
   [
tgpriv$nick "  \002$tgcmdhint\002 -- İpucu Verir."
  
}
  if {[
matchattr $hand $tgflagsskip $tgchan]} {
   [
tgpriv$nick "  \002$tgcmdskip\002 -- Soruyu Atlar."
  
}
  [
tgpriv$nick "For a list of /MSG commands, /MSG $botnick [strupr $tgcmdhelp]"
 
}
 return 
1
}
#misc procs
proc tggamemsg {what} {
 global 
tgchan
 putquick 
"PRIVMSG $tgchan :$what"
}
#Returns ordinal version of number passed to it.
#i.e. [tgordnum 1] returns "1st", [tgordnum 33] returns "33rd"
#Surely there's an easier way to do this?
proc tgordnum {num} {
 
set _last1 [string range $num [expr [strlen $num]-1end]
 
set _last2 [string range $num [expr [strlen $num]-2end]
 if {
$_last1=="1"&&$_last2!="11"} {
  return 
"[expr $num]st"
 
} elseif {$_last1=="2"&&$_last2!="09"} {
  return 
"[expr $num]nd"
 
} elseif {$_last1=="3"&&$_last2!="13"} {
  return 
"[expr $num]rd"
 
} else {
  return 
"[expr $num]th"
 
}
}
proc tgpriv {} {
 global 
tgpriv2msg
 
if {$tgpriv2msg==1} {
  return 
"putmsg"
 
} else {
  return 
"putnotc"
 
}
}
putlog "* [file tail [info script]] by LeonidaS <
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
> Yuklendi."
tgreadqdb
putlog 
"* $tgquestionstotal Kelime basariyla yuklendi" 


AsiL 16 Aralık 2007 23:31

Cevap: Tcl Arşivi
 
kelime.txt Sorular

Kod:


kaplumbaga|aagbmulpak
cici|icic
bocuk|kuboc
deli|lide
clamentine|entineclam
notalone|lonenotal
rootmaster|mastertoor
shamariq|mariqahs
nur|rnu
manag|nagma
uyuz|zuyu
cucuq|cuqcu
cemsit|tismec
Sehadet|detahse
Akaid|adika
Mustehap|pamushet
Peygamber|magpeyreb
Cemaat|maceta
Vehhab|bahhev
Kardeslik|kilsedrak
Cebrail|railbec
Lucifer|fericlu
Kakavan|akkanav
Tevazu|uzatev
Mucahid|camudih
Bozguncu|nugzobuc
İbadet|batide
Sigorta|atsirog
kotuluk|tukulok
iyimser|sermiyi
belirti|rilebit
dagcilik|kilcigad
gelincik|egciknil
gokyuzu|zuyukog
yalanci|lanciay
kirli|iklir
silsile|lesilis
saadet|asated
gazali|azilga
medine|dineem
manevi|enamvi
prenses|pensesr
kardinal|dinalrak
ozlemek|meklezo
karmasa|raksama
halik|ahkil
rahman|namhar
muceddid|cedumdid
muctehid|hidetcum
kuddus|duksud
hafiz|ahzif
intizar|tizarni
bertaraf|tafraber
taraftar|faratrat
teblig|ligbet
muallim|almimul
bedir|rideb
uhud|hudu
hayber|beryah
ihram|ramih
muzdelife|fedezumli
arafat|taaraf
emevi|veime
lidyalilar|yadilralli
turuncu|uctunur
espri|sepri
kaos|sako
zurafa|faruza
solentera|tralesone
girdap|pardgi
fumerol|lofemru
kalburustu|uuklarbstu
mancinik|camnikin
madalyon|yoldamna
jelibon|biljone
yumiyum|miyuyum
kaleydeskop|pedoykalesk
projektor|tekjropor
akliselim|simlakile
mizansen|neszinam
iskandinavya|yanisidakvna
garibaldi|idlargiba
sistematik|iematssikt
alimunyum|maynulmui
serdar|rdsear
mustehab|sbtumeha
klimanjero|jlikromena
amortisor|sirromato
aconqagua|gauqnaoca
disavurumculuk|ukisaducmlurvu
implantasyon|tasimlanyopn
creature|atecreru
kategori|getkiaro
nacizhane|zenhacian
blootooth|otoloobth
mercidabik|kericbimda
mutemadiyen|yenitedumam
trimaran|maitnrra
murekkep|peumkrek
asimptot|tsipatom
beynelmilel|lleybmnelie
savunmasiz|zasmavisnu
pagoda|gapdoa
sadakatsiz|disztakaa
patavatsiz|vatzaptais
digergamlik|kigdemlirga
diyagram|imardagy
konsolos|oslookns
pediatri|ridpetia
turkdostu|dostukrut
cuzdan|danucz
kitap|pakit
atac|cata
koltuk|tulkok
camera|macera
silgi|gilis
dolma|ladom
odunluk|luknudo
kumanda|mandaku
proje|rojep
sehba|habes
vitrin|rinvit
teyip|pitey
feridun|dunrief
zagu|aguz
septizm|mzitsep
kafur|rufka
payedar|radpaye
makinalık|ıkalnikam
kesiy|yiske
kesiyt|tyiske
gizci|izcig
bulunan|nanubul
ciroluk|lukciro
mono|nomo
meracı|ıcarme
meraklılık|kılılmekar
metu|tmeu
yokamato|otamyoka
sandalye|dalyenas
telefon|felnote
evrak|revak
hamsi|mihas
ucuzul|luuzuc
kapak|kaakp
kapi|piak
paty|ytap
polyana|anayolp
fepe|epfe
sohbet|tehbos
zet|ezt
teze|ezet
tazece|azecte
melu|luem
malu|ulma
malup|pulma
vipu|upiv
vapu|puva
canada|adanac
hakki|ikkah
hakai|ikhaa
zagu|ugaz
zagru|urzag
zumrug|umzrug
lara|laar
lara|rala
lora|oalr
larvak|varalk
yavsi|isavy
karamel|melraka
sevgi|gisev
sembol|bolsem
para|rapa
sohbet|tebsoh
orman|omran
lamba|balam
cubbe|becubb
sevgili|sevligi
vilayet|vilayte
derman|ermand
kaza|azak
papatya|payapat
gul|ulg
kumar|makur
oyun|onuy
maske|meska
canan|caann
merdane|merdaen
kalem|kelam
sivri|ivris
lokum|lokmu
lavanta|vantala
barut|burat
silah|salih
mercan|canrem
pembe|pemeb
kocaman|namkoca
sinan|annis
kral|arlk
sitem|itmes
serseri|iresser
malibu|alimbu
metal|talem
uyumak|yukamu
test|stet
koruk|ukkor
vermek|mervek
panda|andap
yogurt|gurtoy
mefta|atefm
memleket|memketle
araba|baara
sempatik|empakits
toraman|ramanot
iskonto|konisto
papaz|zpapa
yonca|cayno
mutfak|kafmut
seramoni|seronima
terzi|zerti
mevlana|lavmena
nusret|tersun
pecete|tecepe
kalkmak|kaklkam
gitmek|gimetk
zombi|ibzom
maraba|arabam
sinem|nesim
rutkan|naktur
pirana|ranaip
kerkenez|kenezrek
hiphop|pihpoh
zebani|banize
perhiz|zihper
sinema|masine
kahve|vehak
tercume|cumeret
kiyam|iyamk
solucan|canusol
damla|ladam
zerre|erzer
cocuk|cckuo
yelpaze|pazeley
fiyasko|yaskofi
tarla|arlat
mebla|ablem
zerdali|zerlida
imam|mami
kurs|surk
damga|gamad
sincan|cannis
cumle|elcum
minder|inderm
kaynana|nanayak
fizik|kizif
tavla|altav
cariye|riyeac
ucret|retcu
mekruh|hurmek
sigara|garsia
baron|ornab
kestane|tenkesa
dilber|ilberd
kocaman|ocnamka
telefon|lenofte
simya|yasmi
internet|terinnet
kanca|ancak
misilleme|miilsemel
kasap|sapak
beyaz|zebya
kanka|akkan
meral|ralem
zodyak|zodkay
ankara|anakar
misyoner|simyoren
enter|neret
kumbara|barumka
sanal|ansal
robin|obrin
nihayet|nihyeat
cemko|okcem
pirim|irpim
koruma|urokma
etna|tena
kartal|artkal
deneme|nedeme
sevda|evdas
bozok|okboz
beter|eterb
grev|evgr
azab|baza
sigorta|gorsita
ingilizce|ingizilec
kardes|arksed
canta|antac
izci|zici
volta|volat
bardak|arkadb
saklambac|sakbacmal
kablo|olbak
kanepe|nekape
cakmak|akkcam
deli|ledi
santana|tananas
siyah|yahsi
merkez|zekrme
keriz|izrek
mekan|ankem
zulum|lumuz
kadife|efikad
laz|azl
trabzon|zonartb
cocuk|cukoc
eflatun|latfeun
karamsar|masarkar
bilgisayar|yarbilsagi
ayakkabı|kkabıaya
davul|vulad
program|gopramr
enayi|aneyi
tezkere|zeterek
elma|mela
cicibebe|becibeci
rumuz|umzur
kefen|fenek
sigara|garasi
kapak|pakka
manken|namenk
ziyankar|yankarzi
helal|elalh
kaplumbaga|aagbmulpak
feridun|dunrief
zagu|aguz
septizm|mzitsep
kafir|rifka
piyade|dipaye
makinalık|ıkalnikam
kesir|riske
kesit|tiske
gizci|izcig
bulunan|nanubul
ciroluk|lukciro
mono|nomo
meracı|ıcarme
meraklılık|kılılmekar
metu|tmeu
yokamato|otamyoka
ucuz|uzuc
kapak|kaakp
kapi|piak
patik|iktap
palyanco|anacyolp
ferit|irtfe
leonidas|sadinole
taze|ezat
tazece|azecte
melul|lueml
malup|pulma
viper|erpiv
vapur|purva
canada|adanac
hakki|ikkah
hakari|ikrhaa
zaga|agaz
garez|erzag
zumrut|umzrut
lara|laar
lara|rala
lora|oalr
larva|varal
yavsi|isavy
lavas|saavl
kaybolanyıllar|rallıynalobyak
aksam|maksa
ikiaile|eliaiki
banka|ankab
finans|sinanf
tekstil|ektislt
gelin|lineg
favori|irfavo
arcelik|likcear
fenerbahce|cehabneref
sivrisinek|iiissevrk
sükrüsaracoglu|rücogsarlusüka
reklam|kerlam
alsohbet|lahosteb
kurtlarvadisi|sidivatrukral
antalya|yalnata
keriz|rizke
sema|mase
ihlamur|murlaih
palmolive|molivepal
aptamil|talimpa
transformers|rantsrofsmer
blendax|daxlbe
realmadrid|ridemadalr
barcelona|orcbelana
dunya|udayn
sezon|zones
ıloveyou|veuoyilo
sparta|parsta
sinav|inavs
acemi|imeca
cadi|idac
star|tras
 
 


AsiL 16 Aralık 2007 23:33

Cevap: Tcl Arşivi
 
cycle tcl

PHP- Kodu:

#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
# SERViCES CYCLE BOT CREATOR v3.0
#~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
##### Hostlarin gizlenmesi icin host-prefix #####
set pwhost "BasariHosting-TR"
set listfile [open scripts/cycle.txt r]
set nickflist [split [subst -nocommands [read $listfile]] \n]
##### Bota baslama komutunu verecek kisinin nickini girin #####
set authorized "illegal_NicCK"
##### Services adresini girin. #####
set servicesadr "services.alanadi.com"

##### Eggdrop - bot icin log tutumu #####
# Eger eggdropinizin olusturdugu botlarin giris cikislarini 
# bir kanala yazarak kaydetmesini istiyorsaniz, 0 isaretini 1 yapin.
#
set logit 1
##### Eggdropin log kanalini girin. #####
# Bu kanal botlarin giris cikislarinin yazilacagi kanaldir.
# Bu nedenle sadece adminlerin ve eggdropin girebilecegi bir kanal yazin.

set logchany "#cycle"
################################################
# !!!!! KODLAMA BASLIYOR !!!!! #
# BU SATIRDAN ITIBAREN YAPACAGINIZ DEGISIKLIKLER 
# TCL SCRIPTIN BOZULMASINA YOL ACABILIR.
################################################
 
proc pwjoin {what what2 what3 what4 what5 what6 what7 what8 what9} {
 global 
kanal logit logchany
 
if {$logit == 1} { 
   
puthelp "PRIVMSG $logchany :$what Kanala sokuluyor --> $what9
 
}
 
putquick "os :raw :$what join $what9 "
 
utimer $what2 "pwpart $what $what3 $what $what2 $what3 $what4 $what5 $what6 $what7 $what8 $what9"
}
proc pwpart {whad whad2 oldu1 oldu2 oldu3 oldu4 oldu5 oldu6 oldu7 oldu8 oldu9} {
 global 
kanal logit logchany
 
if { $logit == } { puthelp "PRIVMSG $logchany :$whad Kanaldan cikartiliyor --> $oldu9}
 
putquick "os :raw :$whad part $oldu9 "
 
putquick "kill $oldu4 :15Lütfen kurallara uyunuz."
 
putquick "os :raw :$whad nick $oldu4"
 
if { $logit == } { puthelp "PRIVMSG $logchany :$whad Nick degistiriliyor --> $oldu4}
 
utimer $whad2 "pwjoin2 $oldu4 $whad2 $oldu1 $oldu2 $oldu3 $oldu4 $oldu5 $oldu6 $oldu7 $oldu8 $oldu9"
}
proc pwjoin2 {whas whas2 oldud1 oldud2 oldud3 oldud4 oldud5 oldud6 oldud7 oldud8 oldud9} {
 global 
kanal logit logchany
 
if { $logit == } { puthelp "PRIVMSG $logchany :$whas Kanala tekrar sokuluyor --> $oldud9}
 
putquick "os :raw :$whas join $oldud9 "
 
utimer $oldud2 "pwbquit $whas $oldud1 $oldud2 $oldud3 $oldud4 $oldud5 $oldud6 $oldud7 $oldud8 $oldud9"
}
proc pwbquit {whaaq oldukha1 oldukha2 oldukha3 oldukha4 oldukha5 oldukha6 oldukha7 oldukha8 oldukha9} {
 global 
quitmsg kanal logit logchany listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
 
foreach iii $nickflist {
    if {[
regexp {(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)} $iii tmppp botident3 before3 after3 botadi3 wait3 partwait3 joinwait3 yenisi3 quitmes3 cikmadan3 kanallar3]} {
        if { 
$whaaq == $after3 } { 
          if { 
$cikmadan3 != } {           
            
putquick "os :raw :$whaaq privmsg $kanallar3 :$cikmadan3"
            
if { $logit == } { puthelp "PRIVMSG $logchany :$whaaq Konusturuluyor." }  
            
utimer 10 "pwquit $whaaq $oldukha1 $oldukha2 $oldukha3 $oldukha4 $oldukha5 $oldukha6 $oldukha7 $oldukha8 $oldukha9"
            
return
          }
        }
    }
 }
 if { 
$logit == } { puthelp "PRIVMSG $logchany :$whaaq Konusturulamadi - Konusma modu kapali!" }  
 
utimer 10 "pwquit $whaaq $oldukha1 $oldukha2 $oldukha3 $oldukha4 $oldukha5 $oldukha6 $oldukha7 $oldukha8 $oldukha9"
}
proc pwquit {whaq olduk1 olduk2 olduk3 olduk4 olduk5 olduk6 olduk7 olduk8 olduk9} {
 global 
quitmsg kanal logit logchany listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
 
foreach ii $nickflist {
    if {[
regexp {(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)} $ii tmpp botident2 before2 after2 botadi2 wait2 partwait2 joinwait2 yenisi2 quitmes2 cikmadan2 kanallar2]} {
        if { 
$whaq == $after2 } { 
          
putquick "os :raw :$whaq quit :$quitmes2"
          
if { $logit == } { puthelp "PRIVMSG $logchany :$whaq Serverdan cikartiliyor" }  
          
utimer $olduk6 "olustur $olduk1 $olduk2 $olduk3 $olduk4 $olduk5 $olduk6 $olduk7 $olduk8 $olduk9"
          
return
        }
    }
 }
 if { 
$logit == } { puthelp "PRIVMSG $logchany :$whaq SERVERDAN CIKARTILAMADI !" }  
}
proc olustur {olsun1 olsun2 olsun3 olsun4 olsun5 olsun6 olsun7 olsun8 olsun9} {
  global 
servicesadr pwhost kanal logit logchany
  
if { $logit == } { puthelp "PRIVMSG $logchany :$olsun1 Yeniden olusturuluyor." }
  
puthelp "kill $olsun1 :15Lütfen kurallara uyunuz.
  puthelp "
os :raw nick $olsun1 1 1 $olsun8 2[rand 4][rand 9].[rand 9][rand 9][rand 9].[rand 9][rand 9][rand 9].$pwhost-[rand 9][rand 9][rand 9][rand 9][rand 9$servicesadr :$olsun5"
  utimer 
$olsun7 "pwjoin $olsun1 $olsun2 $olsun3 $olsun4 $olsun5 $olsun6 $olsun7 $olsun8 $olsun9"
}

proc pwornek {nick host hand {text ""}} {
  global pwhost
}
proc pworn {ornekcik} {
   puthelp "
NOTICE PowerUseR $ornekcik snlikti"  
}
proc pwstart {nick host hand {text ""}} {
   global listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
   if 
{$nick == "$authorized"} {
   puthelp "
NOTICE $nick :Olusum basliyor"
   foreach i 
$nickflist {
      if {[regexp {(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)} 
$i tmp botident before after botadi wait partwait joinwait yenisi quitmes cikmadan kanallar]} {
          puthelp "
kill $before :15Lütfen kurallara uyunuz."
          puthelp "
os :raw nick $before 1 1 $botident 2[rand 4][rand 9].[rand 9][rand 9][rand 9].[rand 9][rand 9][rand 9].$pwhost-[rand 9][rand 9][rand 9][rand 9][rand 9$servicesadr :$botadi"
          if { 
$logit == 1 } { puthelp "PRIVMSG $logchany :$before olusturuluyor." }
          utimer 
$wait "pwjoin $before $partwait $joinwait $after $botadi $yenisi $wait $botident $kanallar"
      }
   }
   }
}
proc pwdestroy {nick host hand {text ""}} {
   global listfile response botnick nickflist servicesadr pwhost kanal logit logchany authorized
   if 
{$nick == "$authorized"} {
   puthelp "
NOTICE $nick :Botlar yok ediliyor"
   if { 
$logit == 1 } { puthelp "PRIVMSG $logchany :YOK ETME KOMUTU VERILDI ($authorized)." }
   foreach i 
$nickflist {
      if {[regexp {(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)::(.+)} 
$i tmp botident before after botadi wait partwait joinwait yenisi quitmes cikmadan kanallar]} {
          puthelp "
kill $before :destroyed by $authorized"
          puthelp "
kill $after :destroyed by $authorized"
          if { 
$logit == 1 } { puthelp "PRIVMSG $logchany :$before $after YOK EDiLiYOR." }
      }
   }
   }
}
bind msg - baslat pwstart
bind msg - yoket pwdestroy
bind msg - ornek pwornek
putlog "
================Cycle Bot v3.0================"
putlog "
=                                            ="
putlog "
OperServ raw -autobot control 2.0        ="
putlog "
http://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">putlog 
"=                                            ="
putlog "==============================================" 


AsiL 16 Aralık 2007 23:35

Cevap: Tcl Arşivi
 
cycle.txt

PHP- Kodu:

Turkiye::Petek_17^^::Gamzeli::mIRC::10::1080::1200::1070::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Turk::Mircci::Codeman::mIRC::20::1100::1300::1100::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
IRCCoderCom::aLi38::__Ferdi__::mIRC::30::1006::1200::1003::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet66Net::Y-a-s-e-m-i-n::RalIici::mIRC::40::1300::1020::1070::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::quLc|n::Fanatik::mIRC::50::1400::1600::1400::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::^^Kizgin`Gusel::Antika_Saatci::mIRC::60::1500::1700::1800::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`
juper::mIRC::110::2400::1700::1800::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::Guzel_ve_Guzel_D::Ben-Geldim::mIRC::120::1060::1030::1500::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::ProfesyoneI::Sebebimsinnn::mIRC::130::1700::1800::1008::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::Nicksiz_Girl::^^_-Nadid3-_^^::mIRC::140::1800::1700::1050::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::Titanik::Efsaneee::mIRC::150::1000::1200::1400::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::DeliKiz__::Masum`Koylu::mIRC::160::1070::1005::1034::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`::
Kibritci::mIRC::180::1000::1005::1000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::[C]obr[A]::iskorpitx::mIRC::190::1040::1050::6000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo,#muhabbet
Sohbet::ali`baba::iLayDa_29::mIRC::200::1020::1050::1000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`
mAn::ejhakeh::100::10107::1070::2510::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::pOliS_FUaT::erdi_20::degirmen906::210::31010::4210::580::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alanadi-User4564156::alanadi-User290900::alanadi-User::610::10030::1038::10100::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alanadi-User74888::alanadi-User1165::java::1003::502::600::101000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alanadi-User126532::alanadi-User4165165::oninee::2104::707::650::300::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::RenklamCi::bedirabi::mynet::3390::10286::10003::9090::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Fakir_ama_GururLu::mumya_firarda::alanadi-User::4720::10346::3010::1045::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Fabrikator::astraa32::java::502::104902::3108::68::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Muhendis_M26::alanadi-User90004::dream::622::633::10043::690::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alanadi-User0163104::sargon::alanadi-User::846010::100010::10002::2090::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Futbolcu::^^G^O^R^A^^::alanadi-User64645::1001010::210102::100090::460::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alanadi-User9054102::seval03::alanadi-User::10308::90102::106103::10100::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::HaLiT::Panda`04::alanadi-User456465::1020::2000::750::720::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`::
Karton_Baby::mIRC-v1::472::1346::300::1245::7Chat46«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»3 6« 14irc.alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Z`W`Y::XeNa::Gazneli_Husyn::501::1492::318::681::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Kopyaci_Girl::JavaUser25::JavaUser31::621::633::1043::692::Ping timeout::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Beckham::Muhtar_Aga::JavaUser12340::100::1000::100::11000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Bileydimmm::_Havucc_::JavaUser12341::200::900::200::1000::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::SmyRNa::KelebekUser45165::JavaUser12342::300::800::300::900::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser123::JavaUser1232::JavaUser12343::400::700::400::800::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser124::JavaUser1233::JavaUser12344::500::600::500::700::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser125::JavaUser1234::JavaUser12345::600::500::600::600::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser126::JavaUser1235::JavaUser12346::700::400::700::500::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser127::JavaUser1236::JavaUser12347::800::300::800::400::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser128::JavaUser1237::JavaUser12348::900::200::900::300::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::JavaUser129::JavaUser1238::JavaUser12349::1000::100::1000::3500::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::SeRSeRi_17::SeRSeRii::mIRC::297::3450::179::72::Ping time out::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo::zorsevgilim::Derya18f::0::300::2700::158::72::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">Sohbet
::_guzel_X_Girl::LayLayLom::301::2900::132::72::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::Hey millet kimse yok mu?::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo:0::312::3500::123::79::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #0000BB">Sohbet
::ELWanss::BAY-X_IZMIR::KeNaNn::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::slm millet::#radyo
Sohbet::Erkut21::KurSun_f::Komsu_Kizi::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Aktif18::ArifErdem::Kontor_Guzeli::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::cilgin_CojuK::Love_speak::klas_m::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Aytuq::pinarcik::realboy::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::ReJePp::Damat`KraL::Prof_Doktor::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`
Dunya::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::derya16f::liseli_kiz::seni_seviyorum_m::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::corumLuu_::ozgur_kiz::jack_nicola::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
sohbet_k::Matilda::seco::hayalatimsin::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Mithat::Semanur::Bakma_Bebek_Yanarsin::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Sindirella::Simgecik::Sevgisiz_Girl::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Sacid::Kankaaa::Sohbetci::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::sevgiselii::ask_cocu::AtillaGunes::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::T-e-g-m-e-n::turkannn::tatbim::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::tanya::tanya18f::bursali::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::uyuyan_prens::ugur::asker18::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::urfaliyak::mehtapli_geceler::arkantos::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Mutlu_cocuk::Muptelayim_sana::gazoz::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::gazoz::hasancc::mirC18::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::alpacino18::tortorax::ahmets::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::TurkBoyS::anTepLi::kalpsiz::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::I_Love_You::Kamyoncu::Mercedes::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::DJ_keskin::AkmanBoy::iST_m-34::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Diablo18::TusLak::Aycacik::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Sohbet::Evli_f::erkek_m::Sakin`::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">`
ci::cezaGirL::ASKIMMM::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
CamSohbet::Antalya_F::Biyonik::zhurna::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
CamSohbet::Korsanf_25::Gel_BANA_DOGRU::HAHAHAH::178::4750::1695::1650::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»:0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
SesliChat::_onLyne_::LoveGirL::mIRC-TR::10::117::170::251::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
SesliChat::oRqun::Hidayet::Yuzuk::21::311::421::580::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
SesliChat::SeRSeRi_aDaM::KaLPTeN_KaLBe::Beyaz::60::1030::138::110::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::selamsss::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
SesliChat::_^^SenSiZ^^_::elmas21::mIRC-TR::99::502::600::1100::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
WebChat::Nedensiz::Sampiyon_Galatasaray::mIRC-TR6::213::707::650::300::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
WebChat::RizeninArfikaKoyundenim::KaraMelek::SEvda::329::1286::1003::99::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
WebChat::KraL-BeNiM::SuSaMSoKaGI::mIRC::472::1346::300::145::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
WebUser::mihriban::Zeyna_::java::501::1492::318::68::6«14 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
alanadi.com 6»::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo
Java::Kiz_yokmu::java::mIRC::621::633::1043::69::
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
style="color: #007700">.
mIRC.net::0::#sohbet,#oyun,#yarisma,#game,#kelime,#egitim,#trivia,#radyo 


AsiL 16 Aralık 2007 23:36

Cevap: Tcl Arşivi
 
Allah nasip ederse devam edeceğim bu başlık altında.

BuCaLI 17 Aralık 2007 08:23

Cevap: Tcl Arşivi
 
iyi güzel ellerine sağlıkta bunların neredeyse hepsi var zaten forumda.

AsiL 17 Aralık 2007 09:36

Cevap: Tcl Arşivi
 
olmayanlarıla olanlarla beraber vermeye calısıyorum işte ;)

eSCoBaR 21 Temmuz 2008 18:02

Cevap: Tcl Arşivi
 
emeğine sağlık kardeşş toplayıp paylaşmak en güzeli tek bi noktada arıyoruz.. en güzelini yapmışsın..


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 00:25.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk