on *:sockopen:burc*:{
  sockwrite -n $sockname GET /yildizfali/ $+ %burc $+ .asp HTTP/1.1
  sockwrite -n $sockname Host: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
  sockwrite -n $sockname $crlf 
}
on *:sockread:burc*:{
  var %ghs
  sockread %ghs
  if (*img height="80" alt="*" hspace="3" src="[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]*" width="80" align="left" * iswm %ghs) { set %else ok! }
  elseif (%else) {
    if (<p align="left"> isin %ghs) { set %else1 ok! }
    elseif (%else1) {
      msg %burcnick : $remove($htmlfree(%ghs),&nbsp;)
      unset %else
      unset %else1
      unset %burcnick
      sockclose $sockname
    }
  }
}
on *:text:*:#:{
  if $1 == !burc {
    if (!%buclar) set %buclar koc|boga|ikizler|yengec|aslan|basak|terazi|akrep|yay|oglak|kova|balik
    if $2 == $null { msg $chan : $nick Lutfen Burc Belirtiniz. | halt }
    if !$istok(%buclar,$bufak($2),124) {  msg $chan :Burç adını yanlış girdiniz. Doğru kullanım: !burc %buclar | halt }
    msg $chan : $regsubex($bufak($2),/(.)/i,$iif(2 \\ \n,$upper(\1),$lower(\1))) burcuna bakılıyor lütfen bekleyiniz.
    var %rand $rand(1,9999)
    set %burcnick $chan
    set %burc $bufak($2)
    sockopen $+(burc,%rand) [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80
  }
}
alias bufak {
  return $replace($1,A,a,B,b,C,c,Ç,c,ç,c,D,d,E,e,F,f,G,g,Ğ,g,ğ,g,H,h,I,i,ı,i,İ,i,J,j,K,k,L,l,M,m,N,n,O,o,Ö,o,ö,o,P,p,R,r,S,s,Ş,s,ş,s,T,t,U,u,Ü,ü,V,v,Y,y,Z,z,W,w,@,a)
}

«02:11:05» <ChanServ> !burc dada
«02:11:05» <GhoSt> :Burç adını yanlış girdiniz. Doğru kullanım: !burc koc|boga|ikizler|yengec|aslan|basak|terazi|akrep|yay|oglak|kova|balik
«02:11:10» <ChanServ> !burc balik
«02:11:10» <GhoSt> : Balik burcuna bakılıyor lütfen bekleyiniz.
«02:11:10» <GhoSt> : Uzun süreli beraberliğinizin artık zamanını doldurduğu kanısındasınız, ama nasıl davranmanız gerektiğini de bilememek elinizi kolunuzu bağlıyor! İş yoğunluğunuz artabilir. Başarı grafiğinizin yükselmesi için iş arkadaşlarınızı ya da ortaklarınızı da dikkate alın. Eğer kendinizi hızlı para kazanmak için şans oyunlarına kaptırırsanız, elinizdekileri de kaybedebilirsiniz. Kendinizi iş konusunda fazla zorlamanız, aşırı yorgunluğa bağlı strese neden olabilir. Dikkat edin