..wWw.SohbetLim.net... Türkiye'nin 1 numaraLi Chat SoHBeT OdalariNa hoşgeLdiniZ..

Menü

   Ana Sayfa
   Sohbet'e Giriş
  Hazır mesajlar
  sesli şiirler
  Altın Yumruklar
  Aşka Dair
  bedava program indir
  Canakkale Ozel
  Damar SözLer
  Dini Sohbetler
  Diyet Listeleri
  Evlilik
  FiLm izLe
  Foto Galeri
  Güzel sözler
  Güzeller Galerisi
  Hazır Mirc Kodları
  Hikayeler
  KomikLikLer
  Kurtlar Vadisi Pusu
  Magazin Haberleri
  Mircte Sohbet
  Mobilya Dekorasyon
  Muzik video
  Nostalji Klipler
  Rüya TabirLeri
  Sohbet Komutları
  Sohbet odaLarı
  SohbetLim özeL videoLar
  Türk Destanları
  Yabancı Video Klipler
  Yemek tarifleri
  şarkı sözleri
  Şiirler
  İletişim
 

      sitemap

 mIRC Pc-win (/loadbar)

mIRC Pc-win (/loadbar) mIRC Pc-win (/loadbar), mIRC Pc-win (/loadbar) kod, mIRC Pc-win (/loadbar) kodu, mirc scripting, hazır kod - - Sohbet ve chat aramaları - için kullanıcılarına hizmet veren - Türkiye'nin en iyi sohbet sitesi - sohbet siteleri - chat odaları - damar sözler - aşk sözleri - güzel sözler - canlı sohbet - islami chat - dini sohbet - islami sohbet - dini chat - hayata dair aşka dair Sohbet arkadaşlıkları kurmak isteyenlere  

Okunma

2836
islami sohbet

Ozellik(Kullanim):

Baslik ismini belirliyebilirsiniz.

6 adet tema secenegi mevcut.

Minimum 1, maksimum 5 text ekleyebilirsiniz.

Yuklenme hizini belirliyebilirsiniz.(MS formatinda)

Not: Title-name kismina girece?iniz textde, bosluk yerine “-” kullanmalisiniz.

Resimdeki yukleniyor efekti gri renkte siz renkleri degistirebilirsiniz.

Kullanim sekli: /loadbar [title-name] [red|blue|green|grey|yellow|orange] [load speed] [loadtext1+loadtext2+3../max 5 loadtext])

Ornek: /loadbar Baslik-ismi.(title) grey 20 Birinci text+ikinci text+Ucuncu text+Dorduncu text+Besinci text

Kod;

alias loadbar {

var %echo = (/loadbar [title-name] [red|blue|green|grey|yellow|orange] [load speed] [loadtext1+loadtext2+3../max 5 loadtext])

if ($regex($1-,/\\\\s/g) < 3) { echo $color(info) -e */loadbar: Hatal? veya eksik kullan?m. %echo | halt }

$iif($window(@loadbar),window -c @loadbar) | unset %load | clr $2

set %fill $hget($2,fill) | set %rect $hget($2,rect) | set %ptitle $hget($2,title) | set %clr $2

window -aCpdhBk0 +d @loadbar 0 0 220 65 | window -a @loadbar | drawfill -r @loadbar %fill %fill 0 0

drawrect -r @loadbar %rect 2 0 0 220 65 0 0 220 17 7 37 206 22 | drawrect -rf @loadbar %ptitle 1 2 2 216 13

drawtext -rbo @loadbar %fill %ptitle Arial 9 5 3 $ll($regsubex($1,/-/g,$chr(32))) | drawtext -rb @loadbar %fill %ptitle Arial 9 202 2 = x

.timerload -m 200 $3 inc %load $(|) drawrect -rf @loadbar %ptitle 1 10 40 $!(%load,2) 16 $(|) drawtext -rbo @loadbar %rect %fill Arial 9 7 22 $!+(Load,$chr(40),%,$round($calc($(%load,2) /2),0),$chr(41)) $(|) txt %clr $4-

}

alias -l clr {

if ($regex(red,$1)) { hadd -m red fill $rgb(169,14,21) | hadd -m red rect $rgb(43,0,14) | hadd -m red title $rgb(60,0,13) }

if ($regex(blue,$1)) { hadd -m blue fill $rgb(30,72,240) | hadd -m blue rect $rgb(5,20,78) | hadd -m blue title $rgb(9,33,132) }

if ($regex(green,$1)) { hadd -m green fill $rgb(0,200,0) | hadd -m green rect $rgb(0,35,0) | hadd -m green title $rgb(0,60,0) }

if ($regex(grey,$1)) { hadd -m grey fill $rgb(85,85,85) | hadd -m grey rect $rgb(25,25,25) | hadd -m grey title $rgb(50,50,50) }

if ($regex(yellow,$1)) { hadd -m yellow fill $rgb(255,255,0) | hadd -m yellow rect $rgb(85,85,0) | hadd -m yellow title $rgb(105,105,0) }

if ($regex(orange,$1)) { hadd -m orange fill $rgb(255,128,0) | hadd -m orange rect $rgb(66,33,0) | hadd -m orange title $rgb(128,64,0) }

}

alias -l ll var %t = $iif($len($1-) >= 29,$+($left($1-,28),..),$1-) | var %tt = $regsubex(%t,/(?<=^)(.)/g,$upper(\\\\1)) | return %tt

alias -l mse if ($mouse.x >= $gettok($1,1,45) && $mouse.x < $gettok($1,2,45)) && ($mouse.y >= $gettok($1,3,45) && $mouse.y < $gettok($1,4,45)) return $true

alias -l txt {

var %:- = $timer(load).reps

if ($regex(%:-,^190$)) { drawrect -rf @loadbar %fill 1 62 20 148 15 | set -e %t1 $gettok($2-,1,43) | drawtext -rb @loadbar %rect %fill Arial 9 62 22 $ll(%t1) }

if ($regex(%:-,^140$)) { drawrect -rf @loadbar %fill 1 62 20 148 15 | set -e %t2 $iif(!$gettok($2-,2,43),%t1,$gettok($2-,2,43)) | drawtext -rb @loadbar %rect %fill Arial 9 62 22 $ll(%t2) }

if ($regex(%:-,^90$)) { drawrect -rf @loadbar %fill 1 62 20 148 15 | set -e %t3 $iif(!$gettok($2-,3,43),%t2,$gettok($2-,3,43)) | drawtext -rb @loadbar %rect %fill Arial 9 62 22 $ll(%t3) }

if ($regex(%:-,^50$)) { drawrect -rf @loadbar %fill 1 62 20 148 15 | set -e %t4 $iif(!$gettok($2-,4,43),%t3,$gettok($2-,4,43)) | drawtext -rb @loadbar %rect %fill Arial 9 62 22 $ll(%t4) }

if ($regex(%:-,^10$)) { drawrect -rf @loadbar %fill 1 62 20 148 15 | set -e %t5 $iif(!$gettok($2-,5,43),%t4,$gettok($2-,5,43)) | drawtext -rb @loadbar %rect %fill Arial 9 62 22 $ll(%t5) }

if ($regex(%:-,^0$)) .timer 1 1 drawtext -rbo @loadbar %rect %fill Arial 9 7 22 $+(Veriler ba?ar?yla yüklendi.,$str($chr(160),30)) $(|) unset %t1 %t2 %t3 %t4 %t5 $(|) .timercls 1 3 window -c @loadbar

}

on *:close:@loadbar:$iif($timer(cls),.timercls off)

menu @loadbar {

sclick:$iif($mse(202-207-4-9),window -n @loadbar) | if ($mse(209-216-4-11)) window -c @loadbar | .timerload off

mouse: {

$iif($mse(202-207-4-9),drawtext -rbo @loadbar $rgb(255,255,255) %ptitle Arial 10 202 2 =,drawtext -rb @loadbar %fill %ptitle Arial 9 202 2 = $+(x,$chr(160)))

$iif($mse(209-216-4-11),drawtext -rbo @loadbar $rgb(255,255,255) %ptitle Arial 10 210 2 x)

}

}

 

 



  Yorumlar

 
Gökhan Gönül krizi


tüdanya - yanar ağlarsın


Ne ZaMaN EskiYor SevgiLer - İclaL AydıN


özlem tekin - kimse bilmez - 2010


Kendimi Sende Unuttum


Colbie Caillat - I Do


Ramazan Diyeti


Ali Kınık - Senin Uğruna 2011


İlKaY AkKaYa - FıRTıNaDa GeMiM izle


Bazı Moda İkonları Asla Ölmez!


sohbetlim 2018 sohbet
sohbetsila
Mobil Chat Nedir? Nasıl Kullanılır
telefonda sohbet etmek
Neden mi Sohbetlim.net
Teknoloji ve Sohbet
sohbetlim-chat
sohbetlim-sohbet
Kesintisiz Sohbet İçin Doğru Adres
Ücretsiz Sohbetin Kaliteli Yeri

Copyright © 2006 Tüm Hakları Saklıdır SoHBeTLiM.NeT

Desing By NiLdeniZ