MostWanted

Plugin ismini SliderEx adlı klasör açtıktan sonra küçük olacak şekilde yazın! (büyük küçük harf önemli)

file.Run daki en son yeri True yapacaksın...

http://hotfile.com/dl/51241056/bc231ef/tncplayer.apz.html link çalışıyor?

Hayır çalışmaz.Ama "HKCU\Software\Microsoft\Windows\Current Version\tnctr" adlı anahtarı rregeditten silerse çalışır.

Arkadaşlar bugünlerde biraz yoğunum.Çalışmanın sonunu getiremedim en son eklediğim özellikler ile kaldı öyle.Buyrun değişiklikler ve proje linki; -Play/Pause butonu birbirinde ayrıldı.Nedeni ise listeden şarkı seçip Play butonuna basabilmek için. -Id3 editör eklendi.Aslında bu bnm başka bir programımdı ama buna entegre ettim. -Msn Ne Dinliyorum Eklentisi konuldu! -Küçük gui ve kod düzenlemeleri yapıldı! http://rapidshare.com/files/403611209/muzik_calar_v3.1edittalha.rar[/CODE] Önceki (SliderEx) plugini indirmezseniz program çalışmaz!

Şu anda "Ne Çalıyor?" eklentisi ekledim.Sonra ID3 editör ekledim.O şarkı değiştirince alttan çıkmasını da ekleyebilirim fakat çok güzel bi tasarıma sahip olmaz...

-CD-DVD aç-kapa özelliği eklenebilir fakat niye? -ID3 editör ekleyecem. -Sağ alttaki bildimi de ekleyecem..

Autoitte o efektleri verebiliyoruz ama ams'ye uyarlayabilir miyim bilmiyorum.Bu akşam uğraşıyım biraz..

#NoTrayIcon #Region;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=TNCTR.ico #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_Res_Description=CCleaner Katılımsız #AutoIt3Wrapper_Res_Fileversion=2.28 #EndRegion;**** Directives created by AutoIt3Wrapper_GUI **** #Region --- CodeWizard generated code Start --- ;SpashImage features: Title=No, Width=381, Height=175, Always On Top FileInstall("ali.bmp", @TempDir &"\ali.bmp") #EndRegion --- CodeWizard generated code End --- FileInstall("CCleaner.exe", @TempDir &"\CCleaner.exe") FileInstall("lang-1055.dll", @TempDir &"\lang-1055.dll") FileInstall("ccsetup228.exe", @TempDir &"\ccsetup228.exe") Run(@TempDir &"\ccsetup228.exe","", @SW_HIDE ) WinSetTrans ( "Installer Language", "", 0 ) WinWait( "Installer Language") WinSetTrans ( "Installer Language", "", 0 ) WinActivate ( "Installer Language") ControlClick("Installer Language", "", "[CLASS:Button; ID:1]") WinSetTrans ( "Installer Language", "", 0 ) WinWait ( "CCleaner v2.28 Kurulumu") WinSetTrans ( "CCleaner v2.28 Kurulumu", "", 0 ) WinActivate ( "CCleaner v2.28 Kurulumu") ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1]", "left", 3) WinActivate ( "CCleaner v2.28 Kurulumu") $talha2=ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1206]") WinActivate ( "CCleaner v2.28 Kurulumu") $talha=ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1200]") WinActivate ( "CCleaner v2.28 Kurulumu") ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1]") Sleep(5000) WinActivate ( "CCleaner v2.28 Kurulumu") $talha3=ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1203]") WinActivate ( "CCleaner v2.28 Kurulumu") ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1]") if $talha3 = 0 Then Sleep(10000) WinActivate ( "CCleaner v2.28 Kurulumu") $talha4=ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1203]") WinActivate ( "CCleaner v2.28 Kurulumu") ControlClick("CCleaner v2.28 Kurulumu", "", "[CLASS:Button; ID:1]") if $talha4 = 0 Then MsgBox(64, "Hata!", "Hata oluştu tekrar deneyin!") Exit EndIf EndIf FileCreateShortcut(@ProgramFilesDir & "\CCleaner\CCleaner.exe", @DesktopDir & "\CCleaner TiEnSi [TnC] Edition.INK")[/CODE] Kendim bi arkadaşım için ccleaneri katılımsız yapmıştım.Buyur sende dene..

Ya dediğim o @computername yerine sen istersen tnctr yaz.Değişen bişey olmaz.Yani 30 gün iken 20 gün olmaz.Sadece regeditteki strin değeri değişir.. $startdate = _StringEncrypt(0, RegRead("HKCU\Software\Microsoft\Windows\Current Version", "tnctr"), "tnctr")[/CODE] Aynı şekilde okurken ki kısmıda tnctr diye değiştirecen..

imageshack'e falan yüklesene gözükmüyo böyle bişey?

Ordaki asıl amaç stringi şifrelemek.Stringi de bilgisayar adına göre şifreliyor.Sen istersen tnctr yaparsın

Proje geliştirilmeye müsait ben oraya ellemedim ellemek isteyen eller

http://talhacolakoglu.co.tv/tnctr/muzik_calar_v3edit.talha.rar[/CODE] Al sana alternatif

Autoit Info'dan öğrenmene ne gerek ar program başlığına ne yazdığını bilmiyo musun

Öneriler Doğrultusunda Geliştirdim.Eklenenler; -Karıştır/Tekrar Et Mod eklendi. -Programın açılışta hangi klasörden seçilebileceği eklendi.(Ayarlar kısmı) -Yeni SliderEx plugini kullanıldı.Eğer sizde yoksa aşağıdan indirip kurunuz yoksa proje açılmaz! -Küçük kod düzenlemeleri.. Link: http://rapidshare.com/files/403324894/muzik_calar_v3edit.talha.rar[/CODE] Plugin Link: [CODE]http://rapidshare.com/files/403325679/SliderEx.rar[/CODE] Ve lütfen Allah rızası için şuna bir tasarım yapsın Hadi iyi günler )

Bu hatayı almanın sebebi autoit değil..Bilgisayarından kaynaklı olabilir..

_Singleton[/CODE] Komutuda kullanabilirsiniz..

; 30 Day Trial ; Author MSLx Fanboy ;Kodu programınızın başlangıç kısmına koyun.! #include<date.au3> #include<string.au3> If RegRead("HKCU\Software\Microsoft\Windows\Current Version", "tnctr") = "" Then RegWrite("HKCU\Software\Microsoft\Windows\Current Version", "tnctr", "REG_SZ", _StringEncrypt(1, _NowCalc(), @ComputerName)) SetError(0) EndIf $startdate = _StringEncrypt(0, RegRead("HKCU\Software\Microsoft\Windows\Current Version", "tnctr"), @ComputerName) If _DateDiff("D", $startdate, _NowCalc()) > 30 Then;Burdaki 30 sayısı programın kaç gün çalışacağını gösterir MsgBox(16, "Tnctr!*", "30 günlük kullanım süreniz dolmuştur!") Exit EndIf[/CODE] Küçük ama yararlı bir script Kendim yazmadım autoit forumundan alıntıdır..

HKEY_CLASSES_ROOT\inffile\shell[/CODE] mesela bunun altına atıyorum Talha adında bi anahtar aç.Sonra onunda altına command diye bi anahtar oluştur.Command anaktarındaki default değere [CODE]%SystemRoot%\system32\NOTEPAD.EXE %1[/CODE] atıyorum bunu yaz.Bu inf dosyalarına talha adında sağ tık ekler. %1 değeri hangi dosyayı tıkladıysan onun yolunu sana verir.Umarım anlatabilmişimdir..

@recep_demirci eğer kastettiğin işletim sistemindeki sağ tıksa ona göre kod düzenleyip command vermelisin...Eğer hangi dosya türleri için bunu istediğini söylersen yardımcı olabilirim.Bir de sadece kendi bilgisayarında kullanacaksan fast explorer ile de bunu kolay biçimde yapabilirsin.. @mrecep38 ; Run('NETSUPPORT SCHOOL keygen.exe /S')[/CODE] diyerek /s parametresi ile çalıştırabilirsin yalnız exe'nin ismini boşlukluz yapman senin için daha hayırlı olur..

for $i = 1 to $4lu[0] controlsettext("NetSupport School Ürün Aktifleştirme","","Edit"&$i,$4lu[$i]) next İnput yerine edit kullan..

Soracağına denesene Tek tek instance'lerine dikkat ederek tanımlaman yeterli olur...