BumBum662

moze i lepsze , ale ja tylko chcialem przetestowac playsound bo wczesniej tego nie robilem

Jest to prosty odtwarzacz muzyki.. Wystarczy zrobic folder na pulpicie "Moja Muzyka" i wrzucac tam piosenki , nastepnie wlaczyc program , wpisac nazwe z rozszezeniem i się odtwarza #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> HotKeySet("esc","wylacz") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Mini Odtwarzacz Muzyki", 615, 438, 192, 124) $Zanim = GUICtrlCreateButton("Zanim zaczniesz uzywac programu kliknij!!!", 0, 0, 611, 30) $Wybierz = GUICtrlCreateButton("Wybierz Muzyke !", 192, 64, 219, 153) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### func wylacz() Exit EndFunc While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Zanim msgbox(0,"Witaj! : " , "Zrob Folder na pulpicie o nazwie Moja Muzyka i umiesc w nim muzyke ktora chcesz sluchac! ") case $Wybierz $a = InputBox("Nazwa","Wpisz Nazwe Muzyki + rozszezenie , np. .mp3 itp","","",150,150,150) $b = InputBox("Ile-Razy","Ile razy program ma odwtorzyc muzyke?","","",150,150,150) SoundPlay(@DesktopDir & "\Moja Muzyka\" & $a,$ EndSwitch WEnd @EDIT Ulepszony , dzięki sopelek :P wlasnie sie zastanawialem jak to zrobic wczesniej #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> HotKeySet("esc","wylacz") #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Mini Odtwarzacz Muzyki", 615, 438, 192, 124) $Wybierz = GUICtrlCreateButton("Wybierz Muzyke !", 192, 64, 219, 153) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### func wylacz() Exit EndFunc While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Wybierz $a = FileOpenDialog("", @DesktopDir & "", "Muzyka (*.mp3;*.avi;*.wav)", 1) $b = InputBox("Ile-Razy","Ile razy program ma odwtorzyc muzyke?","","",150,150,150) SoundPlay($a,$ EndSwitch WEnd

Dlaczego się nie da ?

Witam... Mam pomysł aby napisać coś co szuka w sfgame jak stawiasz zloto do gry zeby wiecej wygrac gdzie jest kulka pod kubkiem. Coś w stylu kodu do sapera który napisał nam wojtek HotKeySet("{ESC}","koniec") $bialy=16777215 $czarny=0 WinWaitActive("Saper") Send("xyzzy+{ENTER}") while 1 sprawdzaj() WEnd func sprawdzaj() if WinActive("Saper")=True Then if PixelGetColor(0,0)=$czarny Then ToolTip("Bomba!") EndIf if PixelGetColor(0,0)=$bialy Then ToolTip("Wal smialo!") EndIf EndIf EndFunc func koniec() Exit EndFunc

co 3 poziomy sie rozmanażam ;d - doszłem do 8 @ed nie co 3 pozimy tylko co jakiś czas

jest problem... program tworzy plik .ini - lecz wystarczy zmienić w nim [Glowne] L=0 na [Glowne] L=500000000 i masz : Twój najlepszy lv to : 5000000000 itp..

z

Polecam wam hosting NiceShoot Aktualnie pracuję nad grą Minecraft. Projekt : Klik Hosting serwerów Counter strike , Cod itp. : Niceshoot : Przenieś!

ogarnij sie noobie.

raport.

co to kopacz bot >.<

a kopacz bot to?...

kup se vps wlacz nostale i bota xDDDD

Szukasz serwera z doskonale dobranym teamem, wieloma pluginami oraz takiego na którym się nie zawiedziesz? Już teraz możesz zaczac swietnie się bawić w wiecie MineUP! Wystarczy, że dasz się oprowadzić po bajce jaka jest Nasz serwer. (...) Wyruszaamy... IP serwera - 5.39.190.237 Jest to sprawa pierwszorzędna, bo bez tego ani rusz... Oto kilka sieci jakie dla Was przygotowalismy! Nie wiesz kiedy możesz oczekiwać na MineUP? Oto podana rozpiska na cały tydzień: Screenshooty - (kliknij)

dodaj SS