[Autoit] Trainer Melodie

02/26/2012 19:28 Kingspeedy#1
So Leute,
ich habe es jetzt endlich hinbekommen ein Trainer zu coden.:cool::)
Aber eine Frage habe ich noch. Es gibt ja Trainer die im Hintergrunde eine Melodie laufen haben. Das hab ich dann mal Gegooglet und gelesen das das .xm datein sind. Nun meine Frage wie lasse ich so eine Melodie beim Start des Trainers abspielen?:confused:

mfg
kingspeedy
02/26/2012 19:51 K1ramoX#2
Code:
#include <Sound.au3>

$sound = _SoundOpen(@ScriptDir & "\deinsound.mp3")
_SoundPlay($sound)
02/26/2012 20:05 Kingspeedy#3
Hier noch der fertige Trainer. ;)
Code:
#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.8.1
 Author:         Kingspeedy

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------

; Script Start

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <NomadMemory.au3>
#include <Sound.au3>

$GUI = GUICreate("Trainer by Kingspeedy", 350, 236, 192, 124)
$Pic = GUICtrlCreatePic(@ScriptDir & "\gothic3-logo_03.jpg", 0, 0, 350, 236)
GUICtrlSetState(-1, $GUI_DISABLE)
$ButtonAbout = GUICtrlCreateButton("About", 260, 200, 75, 25)
$ButtonGold = GUICtrlCreateButton("Gold" , 8, 16, 75, 25)
$ButtonLP = GUICtrlCreateButton("Lern Punkte" , 96, 16, 75, 25)
$ButtonSchliessen = GUICtrlCreateButton("Schließen", 8, 200, 75, 25)
GUISetState(@SW_SHOW,$GUI)
$sound = _SoundOpen(@ScriptDir & "\BRD - Teleport Prokg.mp3")
_SoundPlay($sound)


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		 Case $ButtonAbout
			MsgBox (0, "About", "Made by Kingspeedy" & @CR & _
				  "Gold = Das Gold wird auf 400000 gesetzt." & @CR & _
				  "LP     = Die Lern Punkte werden auf 2000 gesetzt.")
			   Case $ButtonGold
				  _Gold()
			   Case $ButtonLP
				  _LP()
			   Case $ButtonSchliessen
				  Exit
	EndSwitch
WEnd

Func _Gold()
   $Gothic3PID = ProcessExists("Gothic3.exe")
	$Open = _MemoryOpen($Gothic3PID)
	_MemoryWrite(0x75919AAC, $Open, "400000" ,  "DWORD")
	_MemoryClose($Open)
EndFunc	;==>_Gold

Func _LP()
   $Gothic3PID = ProcessExists("Gothic3.exe")
	$Open = _MemoryOpen($Gothic3PID)
	_MemoryWrite(0x7BC819E8, $Open, "2000" , "DWORD") 
	_MemoryClose($Open)
EndFunc	;==>_LP

; Script End
02/26/2012 20:22 lolkop#4
du kannst dir auch selbst versuchen über beeps eine melodie zu erstellen.

diese würde dann sogar ohne soundkarte funktionieren :P
02/26/2012 20:29 jacky919#5
Erwähnenswert ist vielleicht noch [Only registered and activated users can see links. Click Here To Register...], um die Musik in das Programm zu integrieren. Die meisten Trainer kommen ja ebenfalls nur mit einer .exe aus :)
02/28/2012 02:41 der-wahre-nepster#6
danke das habe ich gebraucht
02/28/2012 23:25 WennsHilft#7
Quote:
Originally Posted by lolkop View Post
du kannst dir auch selbst versuchen über beeps eine melodie zu erstellen.

diese würde dann sogar ohne soundkarte funktionieren :P
Code:
;---------------------------------- Song: SuperMario
	Beep(480,200)

    Beep(1568,200)

    Beep(1568,200)

    Beep(1568,200)



    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(783.99,200)


    Beep(369.99,200)

    Beep(392,200)

    Beep(369.99,200)

    Beep(392,200)

    Beep(392,400)

    Beep(196,400)



    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(83.99,200)

    Beep(880,200)

    Beep(830.61,200)

    Beep(880,200)

    Beep(987.77,400)


    Beep(880,200)

    Beep(783.99,200)

    Beep(698.46,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(880,200)

    Beep(830.61,200)

    Beep(880,200)

    Beep(987.77,400)

      Sleep(200)

    Beep(1108,10)
    Beep(1174.7,200)
    Beep(1480,10)
    Beep(1568,200)


    Sleep(200)
    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(783.99,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(880,200)

    Beep(830.61,200)

    Beep(880,200)

    Beep(987.77,400)


    Beep(880,200)

    Beep(783.99,200)

    Beep(698.46,200)


    Beep(659.25,200)

    Beep(698.46,200)

    Beep(784,200)

    Beep(880,400)

    Beep(784,200)

    Beep(698.46,200)

    Beep(659.25,200)



    Beep(587.33,200)

    Beep(659.25,200)

    Beep(698.46,200)

    Beep(784,400)

    Beep(698.46,200)

    Beep(659.25,200)

    Beep(587.33,200)



    Beep(523.25,200)

    Beep(587.33,200)

    Beep(659.25,200)

    Beep(698.46,400)

    Beep(659.25,200)

    Beep(587.33,200)

    Beep(493.88,200)

    Beep(523.25,200)


    Sleep(400)
    Beep(349.23,400)

    Beep(392,200)

    Beep(329.63,200)

    Beep(523.25,200)

    Beep(493.88,200)

    Beep(466.16,200)



    Beep(440,200)

    Beep(493.88,200)

    Beep(523.25,200)

    Beep(880,200)

    Beep(493.88,200)

    Beep(880,200)

    Beep(1760,200)

    Beep(440,200)



    Beep(392,200)

    Beep(440,200)

    Beep(493.88,200)

    Beep(783.99,200)

    Beep(440, 200)

    Beep(783.99,200)

    Beep(1568,200)

    Beep(392,200)



    Beep(349.23,200)

    Beep(392,200)

    Beep(440,200)

    Beep(698.46,200)

    Beep(415.2,200)

    Beep(698.46,200)

    Beep(1396.92,200)

    Beep(349.23,200)



    Beep(329.63,200)

    Beep(311.13,200)

    Beep(329.63,200)

    Beep(659.25,200)

    Beep(698.46,400)

    Beep(783.99,400)



    Beep(440,200)

    Beep(493.88,200)

    Beep(523.25,200)

    Beep(880,200)

    Beep(493.88,200)

    Beep(880,200)

    Beep(1760,200)

    Beep(440,200)



    Beep(392,200)

    Beep(440,200)

    Beep(493.88,200)

    Beep(783.99,200)

    Beep(440,200)

    Beep(783.99,200)

    Beep(1568,200)

    Beep(392,200)



    Beep(349.23,200)

    Beep(392,200)

    Beep(440,00)

    Beep(698.46,200)

    Beep(659.25,200)

    Beep(698.46,200)

    Beep(739.99,200)

    Beep(783.99,200)

    Beep(392,200)

    Beep(392,200)

    Beep(392,200)

    Beep(392,200)

    Beep(196,200)

    Beep(196,200)

    Beep(196,200)



    Beep(185,200)

    Beep(196,200)

    Beep(185,200)

    Beep(196,200)

    Beep(207.65,200)

    Beep(220,200)

    Beep(233.08,200)

    Beep(246.94,200)
:D