Modify ↓
      
        Opened 17 years ago
Closed 17 years ago
#676 closed Bug (No Bug)
autoit(exe) exiting when reciving audio from www with bass.dll
| Reported by: | hofi02 | Owned by: | |
|---|---|---|---|
| Milestone: | Component: | AutoIt | |
| Version: | 3.2.12.1 | Severity: | None | 
| Keywords: | bass.dll, crash, without error | Cc: | sven-dd@… | 
Description
This is my testcode:
#include <Bass.au3>
#include <BassConstants.au3>
;~ ProcessSetPriority(@AutoItExe, 4)
;Open Bass.DLL.  Required for all function calls.
Dim $bass_dll = DllOpen("BASS.dll")
;Initalize bass.  Required for most functions.
_BASS_Init($bass_dll, 0, -1, 44100, 0, "")
;Check if bass iniated.  If not, we cannot continue.
If @error Then
	MsgBox(0, "Error", "Could not initialize audio")
	Exit
EndIf
;Set the Stream URL to listen to
$file = "http://91.121.175.145:80"
;Create a stream from that URL.
Dim $MusicHandle = _BASS_StreamCreateURL($bass_dll, $file, 0, 0, "TestFunc", 0)
;Check if we opened the URL correctly.
If @error Then
	MsgBox(0, "Error", "Could not load audio file" & @CR & "Error = " & @error)
	Exit
EndIf
;Iniate playback
_BASS_ChannelPlay($bass_dll, $MusicHandle, 1)
;endless loop
While 1
	;------------------------------------------------------------------------------------------
	Sleep(10);adjusting this to reduce AutoItExe crashs, 10 is optimal on my pc, i think
	;------------------------------------------------------------------------------------------
WEnd
;Functions
Func OnAutoItExit()
	;Free Resources
	MsgBox(0, "Exit", '"OnAutoItExit()" was called' & @CRLF & "Error Code: " & _BASS_ErrorGetCode($bass_dll))
	_BASS_Free($bass_dll)
EndFunc   ;==>OnAutoItExit
Func TestFunc($buffer, $length, $user)
	;---------------------------------------------------------------------------
	;!!! DO NOT PUT/CHANGE/REMOVE ANYTHING IN HERE OR IT WILL BE UNSTABLE !!!!
	;---------------------------------------------------------------------------
EndFunc   ;==>TestFunc
after some time the script is exiting without any error
here are some links:
http://www.autoitscript.com/forum/index.php?showtopic=83481&view=findpost&p=603453
and next posts in this threat
sorry im from germany but i hope you understand me.
Attachments (1)
Change History (2)
Changed 17 years ago by hofi02
comment:1 Changed 17 years ago by Valik
- Resolution set to No Bug
- Status changed from new to closed
Seriously?  Whatever.  Closing.  See the forum thread for the explanation.
Guidelines for posting comments:
- You cannot re-open a ticket but you may still leave a comment if you have additional information to add.
- In-depth discussions should take place on the forum.
For more information see the full version of the ticket guidelines here.
Note: See
        TracTickets for help on using
        tickets.
    

include files and bass.dll