Jump to content

DevilishCo

Members
  • Posts

    5
  • Joined

  • Last visited

Everything posted by DevilishCo

  1. yea i know, i couldn't get that work... The id3 tags are working its the fact that some of the song names are longer than the input box, so i'd like it to scroll now. thats the only thing from keeping this project being done for now.
  2. func GetMp3Tag() $id3_ptr = _BASS_ChannelGetTags($MusicHandle, $BASS_TAG_META) Local $struct = DllStructCreate("char v0[3]; char v1[130];char v2[30];char v3[30];char v4[4];char v5[30];char v6[1]", $id3_ptr) $id3_ptr_text = DllStructGetData($struct, 1) $STag = $id3_ptr_text ; Not Used $id3_ptr_text = DllStructGetData($struct, 2) $STitle = $id3_ptr_text $id3_ptr_text = DllStructGetData($struct, 3) $SArtist = $id3_ptr_text $id3_ptr_text = DllStructGetData($struct, 4) $S1 = $id3_ptr_text ;Website.com $id3_ptr_text = DllStructGetData($struct, 5) $S2 = $id3_ptr_text ;Not Used Ever $id3_ptr_text = DllStructGetData($struct, 6) $S3 = $id3_ptr_text ;Not Used Ever $NameList = "" $info = StringTrimLeft($STitle&"", 10) $result = StringInStr($info&"", ";",1) ;NameList = $result $NameList = Stringleft($info,($result - 2)) ;$NameList = $STitle IF $NameList = "" then $NameList = "No Stream Loaded" EndIf ControlSetText($window, "", $Artist, $NameList) ; $Namelist is the actual artist/and title ;$Artist is the control variable ex: $artist = GUICtrlCreateInput("No Stream Loaded.",105,16,230) EndFunc Although right now i would like a way to have the text scroll, i tried using but it just makes the gui stop responding cause of the delay of 100, if i set to 0 it scrolls to fast. need a way to do multithread, or even multiprocess that evals vars. Func texteffect($winhandle, $control_id, $text = "", $delay = 100, $static = 0) Opt ("WinTitleMatchMode", 4) If $text <> "" Then For $i = StringLen($text) to 0 Step - 1 If $static Then GUISetState(@SW_LOCK) ControlSetText($winhandle, "", $control_id, StringRight($text, $i)) Sleep($delay) If $static Then GUISetState(@SW_UNLOCK) Next Return 1 Else Return 0 EndIf EndFunc ;==>_txt_eff__slide_left
  3. I was able to figure it out. thanks for the reply btw. I did some major searching
  4. Ok i couldn't find an edit button to edit my last post, but i did find this function.... $NameList = "" $NameList = _BASS_ChannelGetTags($MusicHandle, $BASS_TAG_META) GUICtrlSetData(5,""&$NameList) and its only replying a hex number such as... 0x01DAA300 Its a shoutcast steam also using DNAS.
  5. OK i'm tring to get BASSTags to work while streaming a .pls from shoutcast. I can get the shoutcast to stream and all.. What i can't get is the BassTags to work.. morless update... I'm a noob at autoit, just asking for a lil help? i think the _BASS_Free() is closing them both.? is there a way to do this._BASS_Free()?
×
×
  • Create New...