| VonPauluS | 05 Mayıs 2012 21:27 |
Cevap: !burc Burcunuz Yeni
Alıntı:
takiLsana Nickli Üyeden Alıntı
(Mesaj 1041082144)
Buyur arkadasım gule gule kullan... Kod:
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), )
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)
}
Deneme: Kod:
«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
Coded By GhoSt
|
Adam buraya atmıs sız hala neyı arıyorsunuz :)) |
