Türkçe mIRC indir – Resmi mIRC indirme Sitesi
Türkçe mirc resmi adresi TurkIRC. Mirc indir, mirc sohbet, mirc chat odaları, mirc addonları, IRC Client komutları alanında kaliteli hizmet vermektedir.
massmsg { set %msg $$?=”Mass msg girin?” set %people 1 :loop if ($nick(#,%people) == cs) { inc %people | goto loop | halt } if ($nick(#,%people) == $me) { inc %people | goto loop | halt } if ($nick(#,%people) == $opnick) { inc %people | goto loop | halt } else { .msg $nick(#,%people) %msg } inc %people if ($nick(#,%people) […]
» Devamını OkuTürkçe mirc Mirc indir Türkçe mirc indir 1.Userlarin Nicklerini Zorla Degistirme: komut : /MSG OperServ RAW SVSNICK oldnick newnick :0 örnek :/msg operserv raw svsnick batur A-Red-Line :0 2.Serviceslerin Nicklerini Degistirme komut : /MSG OperServ RAW :NickServ NICK NickServer örnek /msg operserv raw :NickServ Cemil NickServ 3.Servicesleri Konusturma: komut: /MSG OperServ RAW :InfoServ PRIVMSG #Channel :Merhaba! 4.Servicesleri Kanala Sokma & […]
» Devamını OkuBugun size mirce nasıl kod ekleyeceğimizi anlatacağım İlk olarak mirc indir mircimize eklemek istediğimiz kodu buluyoruz. Bu kodlar aslında cok önemli kodu alacağınız sitenin kesinlikle güvenilir bir site olmasına özen gösterin. Kodu almadan önce kodun verildiği sayfanın altında yorum kısmı varsa yorumları okuyun kodun işe yarayıp yaramadığı hakkında ilgi sahibi olursunuz. Kodumuzu bulduktan sonra kodu mirce entegre etmek için 2 […]
» Devamını OkuMergeStrings(ListBox1.Items, ListBox2.Items); } procedure MergeStrings(Dest, Source: TStrings); var i : integer; begin for i := 0 to -1 + Source.Count do if Dest.IndexOf(Source[i]) = -1 then Dest.Add(Source[i]); end; TurkIRC ©
» Devamını Oku< % Function Kelimebul(Gelen) Gelen=Trim(Gelen) If Gelen="" Then Exit Function KelimeParcala=Split(Gelen," ") Kelimebul=Ubound(KelimeParcala,1)+1 End Function Kelime="merhaba deneme yazisi yazdik kelime sayisini bulacagiz " Saybakalim=Kelimebul(Kelime) Response.Write (Saybakalim) 'Sonuç 7 Kelime %> TurkIRC ©
» Devamını OkuCREATE FUNCTION [dbo].[fn_GSM] ( @deger nvarchar(1000) ) RETURNS @RtnValue table ( GSM nvarchar(10), Durum bit ) AS BEGIN SET @deger = LTRIM(RTRIM(@deger)) DECLARE @karakterler NVARCHAR(10) SET @karakterler = ‘0123456789’ DECLARE @deger_ NVARCHAR(1000) SET @deger_ = ” DECLARE @say INT SET @say = 1 DECLARE @harf NVARCHAR(1) WHILE (@say < = LEN(@deger)) BEGIN SET @harf = '' SET @harf = SUBSTRING(@deger, [...]
» Devamını Oku// show 1,2,3,4,5 message boxes var i: integer; begin for i := 1 to 5 do begin ShowMessage(‘Box: ‘+IntToStr(i)); end; end; var i: integer; begin for i := 5 downto 1 do begin ShowMessage(‘T minus ‘ + IntToStr(i) + ‘seconds’); end; ShowMessage(‘For sequence executed!’); end; var i,j: integer; begin //be aware: //this double loop is executed 4×4=16 times for i:= […]
» Devamını Oku