blackman12

Büyük Ö yü sesliden saymıyo program dostum

Yok öyle bişi en azından autoitte şimdi c öğreniyo ya artistlik taslıyor neyse konu başlığını autoit genel diye değiştirim isterseniz hı? fonksiyonlar hariç herşeyi sordunuz yahu

Bunu diyen adam nerde ne kadar kütüphane dosyası varsa include eder.

[code]http://www.tnctr.com/topic/25294-tnc-coklukopyala-102/page__view__findpost__p__799614[/code] Kodlar burada verilmiş ama epey bir düzenleme istiyor aslında

Adam örnek vermedi diye hemen istemen gerek yani, bi kendim buliyim çabası yok. Neyse bu tartışmayı uzatmıcam.

Yani fonksiyona daha önceden tanımlanmış bir değişken gönderecekseniz byrefi kullanabilirsiniz ama bu zorunlu değildir değişkenlerin hafızada kapladığı alanı optimize etmek için kullanılır. Blue_Life ın verdiği örnekte _test fonksiyonunu _Test("Selam Millet") şeklinde kullanıcaksak byref yazmamak lazım.

Bana kızmayın ama asla programlamayı öğrenemiceksin Mehmetben, bu nedir arkadaşım yani adamın açtığı tüm konulara bir örnek bir örnek diye mesaj atmışsın görende uzay üssü inşa ettik nasıl kullanacağını öğretmiyoruz sanacak. yapacağın tek şey fonksiyonu çalıştırıp bir MsgBox la dönen veriyi görmek yani. [code]#include <file.au3> _FileCreate(@DesktopDir& "\"&__GetRandomName(&".tmp") Func __GetRandomName($rLength) Local $i = 0, $string, $number Do $number = Random(48, 122, 1) If $number > 57 And $number < 65 Then ContinueLoop If $number > 90 And $number < 97 Then ContinueLoop $string = $string & Chr($number) $i = $i + 1 Until $i = $rLength Return ($string) EndFunc ;==>__GetRandomName[/code] @YılmazRail, eğlence tarzın nasıldır bilmiyorum ama bu bir autoit fonksiyonu AMS ile alakası yok ve gelişmiş bir arayüz falan derken neden bahsettiğinden emin misin?

Zaten split edip array dönüyor orada sıkıntı yok. @CRLF yerine @LF ile ayırmamın nedenini deneyerek bulabilirsin her kelime arasına boş arraylar giriyo onun yerine @LF ile ayırıp sağdaki @CR yi sildirmek daha mantıklı

paylaşamam.

Ben böyle örnekleri abarmayı severim biraz, şimdi de counterın yönünü istenildiği anda değiştirmek, istenilen değeri değiştirmek ve counterı durdurmak gibi opsiyonlar ekledim örneğe: [code]_Sayac(0,10) Func _Sayac($CountDown = 0,$Sayi = 15) Local $Son = $Sayi, $Yon = "Yönü Değiştir: Yukarı", $Varsayilan = $Sayi if not $CountDown Then $Yon = "Yönü Değiştir: Aşağı" if not $CountDown Then $Son = 0 Local $TIMER_1[6] = [TimerInit(), 0, 0, $Son,True,$Varsayilan] Local $Form1 = GUICreate("Sayaç Örneği by BlueLife", 300, 170, -1, -1, 0x00080000) Local $ChangeCounter = GUICtrlCreateButton($Yon,5,20,200,25,0x0001) Local $Input = GUICtrlCreateInput("",215,18,60,Default,0x2000) GUICtrlSetLimit(-1,2) Local $Button1 = GUICtrlCreateButton($TIMER_1[3] & " Saniye", 5, 110, 285, 25, 0x0001) GUISetState(@SW_SHOW,$Form1) While 1 $nMsg = GUIGetMsg() ;Guiden gelen mesajları algılamak için gerekli komut Switch $nMsg Case -3 ExitLoop ;Döngüden çıkma komutu Case $Button1 if $TIMER_1[4] Then $TIMER_1[4] = False GUICtrlSetData($Button1,"Durduruldu - ["&$TIMER_1[3]&"]") Else $TIMER_1[4] = True EndIf Case $ChangeCounter if $Yon = "Yönü Değiştir: Yukarı" Then $Yon = "Yönü Değiştir: Aşağı" $CountDown = 0 if Number(GUICtrlRead($Input)) > 0 Then $Sayi = Number(GUICtrlRead($Input)) Else $Sayi = $TIMER_1[5] EndIf Else $Yon = "Yönü Değiştir: Yukarı" $CountDown = 1 $Sayi = 0 EndIf GUICtrlSetData($ChangeCounter,$Yon) EndSwitch if $TIMER_1[4] Then If $CountDown And $TIMER_1[3] <= 0 Then ExitLoop ;Süre bitmişse döngüden çıkış yapıyoruz if not $CountDown And $TIMER_1[3] >= $Sayi Then ExitLoop $TIMER_1[1] = Round(TimerDiff($TIMER_1[0]) / 1000) If $TIMER_1[1] <> $TIMER_1[2] Then $TIMER_1[2] = $TIMER_1[1] if $CountDown Then $TIMER_1[3] -= 1;Bir azaltıyoruz if not $CountDown Then $TIMER_1[3] += 1;Bir azaltıyoruz GUICtrlSetData($Button1, $TIMER_1[3] & " Saniye") ;Bu komut ile butondaki yazıyı değiştiriyoruz EndIf EndIf WEnd GUIDelete($Form1) EndFunc[/code]

Fonksiyonda ufak bir değişiklik yaparak ikisini bir araya getirdim. Böylece Sayacın yönünü belirleyebiliyoruz, gerisayım yaparken sayım bittiğinde, ileri sayım yaparken verilen saniye değerine ulaştığında istenen işlemi yapması sağlandı. [code]_Sayac(0,10) Func _Sayac($CountDown = 0,$Sayi = 15) Local $Son = $Sayi if not $CountDown Then $Son = 0 Local $TIMER_1[4] = [TimerInit(), 0, 0, $Son] Local $Form1 = GUICreate("Sayaç Örneği by BlueLife", 300, 170, -1, -1, 0x00080000) GUISetBkColor(0xFFFFFF) Local $Label_1 = GUICtrlCreateLabel("Arkadaşlar bu örnekte, basit bir sayım yapıp GUICtrlSetData komutuyla butona uyguluyoruz.", 5, 5, 285, 100, 1, 1) GUICtrlSetColor(-1, 0x000000) ;Arkaplan rengini beyaz yaptık Local $Button1 = GUICtrlCreateButton($TIMER_1[3] & " Saniye", 5, 110, 285, 25, 0x0001) GUICtrlSetBkColor(-1, 0x000650) ;Arkaplan rengi GUICtrlSetColor(-1, 0xFFFFFF) ;yazı rengi GUISetState(@SW_SHOW,$Form1) While 1 $nMsg = GUIGetMsg() ;Guiden gelen mesajları algılamak için gerekli komut Switch $nMsg Case -3 ExitLoop ;Döngüden çıkma komutu Case $Button1 ExitLoop EndSwitch If $CountDown And $TIMER_1[3] = 0 Then ExitLoop ;Süre bitmişse döngüden çıkış yapıyoruz if not $CountDown And $TIMER_1[3] = $Sayi Then ExitLoop $TIMER_1[1] = Round(TimerDiff($TIMER_1[0]) / 1000) If $TIMER_1[1] <> $TIMER_1[2] Then $TIMER_1[2] = $TIMER_1[1] if $CountDown Then $TIMER_1[3] -= 1;Bir azaltıyoruz if not $CountDown Then $TIMER_1[3] += 1;Bir azaltıyoruz GUICtrlSetData($Button1, $TIMER_1[3] & " Saniye") ;Bu komut ile butondaki yazıyı değiştiriyoruz EndIf WEnd GUIDelete($Form1) EndFunc[/code]

he hiç yapılmamış bi fikrim var ama sırf sen trilyoner ol diye seninle paylaşacağım canım türkiyem.

[code]list[0][0] = "ali" list[0][1] = "ali, arkadaş" list[1][0] = "mustafa" list[1][1] = "mustafa, abasıyanık, gözübüzük" . . . . . list[n][0] = "son" list[n][1] = "son, bu son, olsun"[/code] gibi bir array oluşturursun arrayın [n][0] bölümündeki değerleri listeye ekletirsin, aramanı da [n][1] de yaptırırsın. örneğin "gözübüzük" aramasını yaparsam arama sonucu olarak [1][1] sonucu gelecek ama bulunan değeri gösterirken [1][0] değerini gösterirsen sonuç olarak "mustafa" değeri bulunmuş olur

Ulen 6*32 yani 192 sayı var 192 yi 3 e böl 64 yani 1den 64e kadar olan sayılar yazıyor her kolonda. yani her sayıdan 3 tane var. siz hangi kolonda olduğunu söylediğinizde 3 kolon söliceksiniz zaten. şimdi dağılın!

doğum günün kutlu olsun. nice senelere

Winrarı aç > Seçenekler > Ayarlar > Bütünleşme > Kabuk Bütünleşmesinde 1. ve 3. checkboxları işaretle ve tamam diyerek çık. Bilgisayarı ya da explorerı yenidemn başlatmak gerekebilir

Bu projeyi tek başına yaptıysan helal olsun. Çok kapsamlı ve üzerinde uzun uğraş gerektirecek bir iş. Desteğe ihtiyacın olduğunda söylemen yeter, ben pek AMS den fazla anlamasamda lobileri çalıştırırız

Daha öğrenicen mostwanted, hele bi matematik 2 al. Bu tür durumlarda seriye açarak yakınsak değerler buluruz. Verilen fonksiyonu açılımını bildiğimiz serilere dönüştürmeye çalışırız taylor mclaurin gibi. ama kök almak için kullanılan farklı algoritmalarda mevcut geçenlerde yine sorulmuştu son 1 haftadır ismini düşünmeme rağmen aklıma gelmiyo

-.- of işte böyle sorular gelince hiç yardım edesim gelmiyo. au3 dosyana sağ tıkla compile with options de ve compile et exe dosyan oluşacaktır

Hayır o satır değil ama [code]If TestInno($ProgramToAnalyze) = 1 Then[/code] bu satır hata veriyor nedeni, testinno fonksiyonunun sizde bulunmaması. ben bunu size örnek olsun diye gösterdiğim için testinno fonksiyonunu vermeme gerek yok.

MAKINCI, png yi diğer resim formatlarıyla karıştırma, autoitte png kullanmak çok baş belası birşey olabiliyor ama senin istediğin basit bir şey: [code]#include <GuiConstants.au3> #include <WindowsConstants.au3> #include <GDIPlus.au3> #include <WinAPI.au3> ;~ Splash Global Const $AC_SRC_ALPHA = 1 _GDIPlus_Startup() $pngSrc = "splash.png" $hImage = _GDIPlus_ImageLoadFromFile($pngSrc) $width = _GDIPlus_ImageGetWidth($hImage) $height = _GDIPlus_ImageGetHeight($hImage) $Splash = GUICreate("", $width, $height, -1, -1, $WS_POPUP, $WS_EX_LAYERED, $DS_MODALFRAME) GUISetState(@SW_LOCK) SetBitmap($Splash, $hImage, 0) GUISetState() WinSetOnTop($Splash, "", 1) For $i = 0 To 255 Step 1 SetBitmap($Splash, $hImage, $i) ;Sleep(10) Next Sleep(1000) For $i = 255 To 0 Step -1 SetBitmap($Splash, $hImage, $i) Next GUIDelete($Splash) _GDIPlus_ImageDispose($hImage) _GDIPlus_Shutdown() Func SetBitmap($hGUI, $hImage, $iOpacity) Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend $hScrDC = _WinAPI_GetDC(0) $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap) $tSize = DllStructCreate($tagSIZE) $pSize = DllStructGetPtr($tSize) DllStructSetData($tSize, "X", _GDIPlus_ImageGetWidth($hImage)) DllStructSetData($tSize, "Y", _GDIPlus_ImageGetHeight($hImage)) $tSource = DllStructCreate($tagPOINT) $pSource = DllStructGetPtr($tSource) $tBlend = DllStructCreate($tagBLENDFUNCTION) $pBlend = DllStructGetPtr($tBlend) DllStructSetData($tBlend, "Alpha", $iOpacity) DllStructSetData($tBlend, "Format", $AC_SRC_ALPHA) _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteObject($hBitmap) _WinAPI_DeleteDC($hMemDC) EndFunc ;==>SetBitmap[/code]

blue_lifein dediği gibi USSF autoitle yazılmış bir program ve kolayca decompile edilebiliyor, çalışma mantığı da sizin ussfe yapmak istediğinizle aynı. peid i çalıştırıyor ve peid paketi inceliyor, neyle sıkıştırıldığını bir labele yazıyor. ussf bu labeli okuyor ve ona göre parametre veriyor size. ben de bunu çözerek UPP ta kullandım. ussf yerine otomatik peidden alıyorum verileri. sizde öyle yapabilirsiniz. ayrıca ussfin yazarının akıl etmediği bişi daha var. peidin dll versiyonu mevcut yani dllcall ile direk paketin türünü değişken olarak alabilirsiniz.ü Örnek olarak UPPta hazırladığım fonksiyonu ve dllyi koyuyorum buraya: http://www.mediafire.com/?5eccmnl3e8xr4xm

Bunun tam bir ölçütü olacağını sanmıyorum. Ama harcanan mürekkep miktarını gösteren programlar var.

aa pardon ya sen fonksiyonu vermişsin zaten ben görmemişim. buyur anladığım kadarıyla yaptım: [code];~ #include <Array.au3> Global $Title = _Read_Data("http://blackman12.zzl.org/version.txt") ;~ _ArrayDisplay($Title) for $T in $Title $T = StringReplace($T,@CR,"") if WinExists($T) Then MsgBox(0,"Buyur:","Bu Pencere var: "&$T) Next Func _Read_Data($Link) Local $sData = InetRead($Link) ;~ $sdata = FileRead(@DesktopDir&"\a.txt") If @error = 0 Then $sdata = BinaryToString($sData) $ayir = StringSplit($sdata,@LF) Return $ayir Else Return SetError(1,0,"") EndIf EndFunc[/code]

_read_data fonksiyonunu görmemiz gerekli. return olarak handle döndüğünü sanmıyorum o fonksiyondan dolayısıyla winwait komutunda tıkanma olacaktır.