MMBuilder14 BlissVorbisPage 1†џџџYmInfo Text GroupџџџџOЫњFile Info RectangleџџџPx+р?ѓџџџ MS Sans SerifџџџџџџџџџџџџџџџџЮLFull RectangleРРРџџџ))р?єџџџМ ArialџџџџџџџџџџџџџџџџоГ]аTweakџџџџџџр?\Shared\Tweak.dllєџџџМ ArialџџџџџџџџџџџџџџџџOЬћMediaBoxџџџџџџр?\Shared\BoxPlugIn.dllєџџџМ ArialџџџџџџџџџџџџTitle Bar GroupџџџџКЪExitџџџџџџР'  JxœлОчРvЂQ[gIю'#|h_@‘ЈBEl щР'  JxœлОчРvЂQ[gIю'#|h_@‘ЈBEl щР'  Gxœ ˆ 'ЕuіAH"бі= ъO]ЙL ЂP=Ф‘Ш аD0ЭGV€ЉЋ{„HїcULѓIr?сCѕј‚Є т М!р?єџџџМ Arialџџџџ# ExitScriptџџџџџџџџџџџџџџџџ ЪTitle Bar Groupџџџџџџр? 16 objectsExitMinimizeLine1Line2Line3Line4Line5Line6Line7Line8Line9Line10Line11Line12TitleClient Area HotSpotєџџџМ ArialџџџџџџџџџџџџTitle Bar GroupџџџџЈИMinimizeџџџџџџР'  2xœлОчРvЂQ[g 2o%SuЪ}Т §“ў`о2ХQ Аё.ЋФЫZ!Щу˜м;ќ§L[А͘˜-7rxЖf>bUouCЩ_р?єџџџМ ArialџџџџџџџџџџџџTitle Bar GroupџџџџІClient Area HotSpot EnableCADџџџџџџр?єџџџМ ArialNTweakEnableClientAreaDragџџџџџџџџNTweakDisableClientAreaDragџџџџџџџџџџџџTime Display Groupџџџџ3*CounterRectangleРРРџџџ;/р?єџџџМ Arialџџџџџџџџџџџџџџџџ ШFMain Panel Controls Groupџџџџџџр? 7 objects Slider GroupOggOpenOggPlayOggPauseOggStopMultiOnMultiOffLoopOnLoopOffShowListѕџџџџ Arialџџџџџџџџџџџџ Counter Groupџџџџ)Minџ€Рр?00ѓџџџМ Arialџџџџџџџџџџџџ Counter Groupџџџџ/)Secџ€Рр?00ѓџџџМ Arialџџџџџџџџџџџџ Counter Groupџџџџ(Colonџ€Рр?:ѓџџџМ ArialџџџџџџџџџџџџTime Display Groupџџџџ /) Counter Groupџџџџџџр? 3 objectsMinSecColonѕџџџ Arialџџџџџџџџџџџџџџџџ 3*Time Display Groupџџџџџџр? 2 objects Counter GroupCounterRectangleѕџџџ Arialџџџџџџџџџџџџ Slider Groupџџџџ:Ќ* Slider RectKИИџџџ ШBр?шџџџ MS Sans Serifџџџџџџџџџџџџ Slider Groupџџџџ;Ћ$ Slider Lineџџџр?шџџџ MS Sans Serifџџџџџџџџџџџџ Slider Groupџџџџ<F(Slider DisableCADРРРџџџo—4\р?шџџџ MS Sans Serifdcurrentfile$=''џџџџџџџџeџџџџcslide=1џџџџcx = OBJECTX(Slider)џџџџc xm = MOUSEX()џџџџc startx = xm-xџџџџ# MoveSliderџџџџџџџџcslide=0џџџџџџџџџџџџSlider Script GroupџџџџЌ‰џџџМ™џџџ MoveSliderџџџџџџр?шџџџ MS Sans Serifџџџџ&dslide=1џџџџc xm = MOUSEX()џџџџc ym = MOUSEY()џџџџcnewx = xm-startxџџџџdnewx<60џџџџc newx = 60џџџџeџџџџdnewx>160џџџџc newx = 160џџџџeџџџџdxm<60 | xm>170 | ym<25 | ym>40џџџџcslide=0џџџџeџџџџTSlidernewx,25џџџџWџџџџШ***џџџџcslidepos=OBJECTX(Slider)џџџџcslidepos=slidepos-60џџџџc%position=INT(duration*(slidepos/100))џџџџcmin=INT(position/60)џџџџc minms=min*60џџџџcsec=INT(position-minms)џџџџcsec$=CHAR(sec)џџџџcmin$=CHAR(min)џџџџdsec<10џџџџcsec$='0' + CHAR(sec)џџџџeџџџџdmin<10џџџџcmin$='0' + CHAR(min)џџџџeџџџџOMinmin$џџџџOSecsec$џџџџШ***џџџџ$ MoveSlider100џџџџeџџџџdslide=0џџџџ#SetSlideџџџџeџџџџџџџџџџџџ Script Groupџџџџ ЌuџџџМеџџџSlider Script Groupџџџџџџр? 5 objects MoveSliderSetSlideKeySlide KeySlideL KeySlideRѕџџџ ArialџџџџџџџџџџџџSlider Script GroupџџџџЌuџџџМ…џџџSetSlideџџџџџџр?шџџџ MS Sans SerifџџџџNTweakEnableClientAreaDragџџџџdslidepos=0 | slidepos=100џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџeџџџџd slidepos=100џџџџNMediaBoxOggStopџџџџcpaused=0џџџџctimer=0џџџџc slidepos=0џџџџTSlider60,25џџџџOMin00џџџџOSec00џџџџOggPlayџџџџOggPauseџџџџџџџџeџџџџdtimer=1џџџџLMediaBoxslideposџџџџNMediaBoxOggSetPositionџџџџd slidepos=0џџџџNMediaBoxOggStopџџџџNMediaBoxOggPlayџџџџeџџџџ$ TimerLoop500џџџџeџџџџџџџџџџџџMain Panel Controls Groupџџџџ :Ќ* Slider Groupџџџџџџр? 5 objects Slider Rect Slider LineSliderшџџџ MS Sans Serifџџџџџџџџџџџџ Script Groupџџџџ>uџџџN…џџџ TimerLoopџџџџџџр?єџџџМ ArialџџџџNdtimer=0џџџџџџџџeџџџџLTweakgetsec$џџџџNTweak DateFormatџџџџMTweaknewpos$џџџџcnewpos=VAL(newpos$)џџџџd oldpos=newposџџџџcnewpos=newpos+1џџџџeџџџџd oldpos>newposџџџџc oldpos=-1џџџџeџџџџc!position=position+(newpos-oldpos)џџџџdtimer=2џџџџc position=0џџџџctimer=0џџџџeџџџџc oldpos=newposџџџџШ***џџџџcmin=INT(position/60)џџџџc minms=min*60џџџџcsec=INT(position-minms)џџџџcsec$=CHAR(sec)џџџџcmin$=CHAR(min)џџџџdsec<10џџџџcsec$='0' + CHAR(sec)џџџџeџџџџdmin<10џџџџcmin$='0' + CHAR(min)џџџџeџџџџOMinmin$џџџџOSecsec$џџџџШ***џџџџdposition=>durationџџџџctimer=0џџџџV3000џџџџNMediaBoxOggStopџџџџTSlider60,25џџџџOMin00џџџџOSec00џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџd multiplay=1џџџџ# PlayQueueџџџџџџџџeџџџџdloop=1 & multiplay=0џџџџNMediaBoxOggStopџџџџNMediaBoxOggPlayџџџџctimer=1џџџџcpaused=0џџџџc position=0џџџџc slidepos=0џџџџOMin00џџџџOSec00џџџџLTweakgetsec$џџџџNTweak DateFormatџџџџMTweakoldpos$џџџџcoldpos=VAL(oldpos$)џџџџ$ TimerLoop500џџџџџџџџeџџџџOggPlayџџџџOggPauseџџџџџџџџeџџџџШ***џџџџdslide=0џџџџc%slidepos=INT((position/duration)*100)џџџџTSliderslidepos+60,25џџџџeџџџџШ***џџџџdtimer=1џџџџ$ TimerLoop1000џџџџeџџџџџџџџџџџџџџџџ pџџџrџџџš Script Groupџџџџџџр? 7 objects ExitScript media handlerdoubleclick handler PlayScript PauseScript StopScript PlayQueue OpenScriptQueueAdd InitMediaBox QueueHandler ToggleLoopGetHelp ToggleMultiTimer TimerLoopODGetMultiItemPlayCurrentFromStartPlayNext PlayPrevious VolumeDownVolumeUpSlider Script GroupList Display Script Group EnableCAD DisableCADѕџџџџ Arialџџџџџџџџџџџџ Script Groupџџџџ>ЇџџџNЗџџџ ExitScriptESCџџџџџџр?єџџџМ Arialџџџџ0 defaultdir defaultdir$џџџџ0listdirlistdir$џџџџ0looploopџџџџ0 showqueue showqueueџџџџ0 multiplay multiplayџџџџ џџџџџџџџџџџџ Script Groupџџџџqџџџѕџџџџџџ media handlerMџџџџџџр?єџџџМ Verdanaџџџџџџџџџџџџ Script Groupџџџџpџџџрџџџ€џџџ№џџџdoubleclick handlerDџџџџџџр?єџџџМ VerdanaџџџџNMediaBox LBGetItemPathџџџџMMediaBox currentfile$џџџџMMediaBox currentfileџџџџШ***џџџџNMediaBoxOggStopџџџџШ***џџџџLMediaBox currentfile$џџџџNMediaBox OggOpenFileџџџџШ*** Retrieves OGG Audio Duration in secondsџџџџNMediaBoxOggGetDurationџџџџMMediaBoxdurationџџџџШ** PlayџџџџNMediaBoxOggPlayџџџџШ** Resetџџџџctimer=1џџџџcpaused=0џџџџc position=0џџџџc slidepos=0џџџџOMin00џџџџOSec00џџџџ$Timer500џџџџOggPauseџџџџOggPlayџџџџџџџџџџџџ Script Groupџџџџvџџџrџџџ†џџџ‚џџџ PlayScriptSPACEџџџџџџр?ѓџџџ MS Sans Serifџџџџ>d totalfiles=0џџџџctimer=0џџџџџџџџeџџџџdcurrentfile$=''џџџџLMediaBox1џџџџNMediaBox LBGetSpecItemџџџџMMediaBox currentfile$џџџџLMediaBox currentfile$џџџџNMediaBox OggOpenFileџџџџNMediaBoxOggGetDurationџџџџMMediaBoxdurationџџџџNMediaBoxOggPlayџџџџШ** ResetџџџџWџџџџc currentfile=1џџџџc position=0џџџџc slidepos=0џџџџOMin00џџџџOSec00џџџџeџџџџc"pausevisible=ISVISIBLE("OggPause")џџџџdpausevisible=1џџџџ# PauseScriptџџџџџџџџeџџџџdpaused=0џџџџNMediaBoxOggPlayџџџџd!listcontent$='info' & showqueue=1џџџџ#ShowInfoScript2џџџџeџџџџdslidepos<>0 & slidepos<>100џџџџV0џџџџLMediaBoxslideposџџџџNMediaBoxOggSetPositionџџџџeџџџџeџџџџdpaused=1џџџџd#slidepos<>oldslidepos & slidepos<>0џџџџLMediaBoxslideposџџџџNMediaBoxOggSetPositionџџџџeџџџџd slidepos<>0џџџџNMediaBoxOggPauseџџџџeџџџџd slidepos=0џџџџNMediaBoxOggStopџџџџNMediaBoxOggPauseџџџџNMediaBoxOggPlayџџџџeџџџџeџџџџШ***џџџџLTweakgetsec$џџџџNTweak DateFormatџџџџMTweakoldpos$џџџџcoldpos=VAL(oldpos$)џџџџШ***џџџџctimer=1џџџџcpaused=0џџџџ$ TimerLoop500џџџџOggPauseџџџџOggPlayџџџџџџџџџџџџ Script Groupџџџџvџџџ†џџџ†џџџ–џџџ PauseScriptSPACEџџџџџџр?ѓџџџ MS Sans Serifџџџџ dcurrentfile$=''џџџџџџџџeџџџџNMediaBoxOggPauseџџџџcoldslidepos=slideposџџџџctimer=0џџџџcpaused=1џџџџOggPlayџџџџOggPauseџџџџџџџџџџџџ Script Groupџџџџvџџџšџџџ†џџџЊџџџ StopScriptENDџџџџџџр?ѓџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџџџџџeџџџџdpaused=1џџџџNMediaBoxOggPauseџџџџeџџџџNMediaBoxOggStopџџџџctimer=0џџџџcpaused=0џџџџOggPlayџџџџOggPauseџџџџTSlider60,25џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџOMin00џџџџOSec00џџџџџџџџџџџџ Script GroupџџџџuџџџM…џџџ]ODGetMultiItemџџџџџџр?єџџџМ Verdanaџџџџfi=1countџџџџLMediaBoxiџџџџNMediaBoxODGetMultiItemџџџџMMediaBox MultiItem$џџџџdMultiItem$<>''џџџџccurrentfile$=MultiItem$џџџџ#QueueAddџџџџdi=countџџџџШ ** Play Queueџџџџ# PlayQueueџџџџџџџџeџџџџeџџџџgiџџџџџџџџџџџџ Script Groupџџџџvџџџ:†џџџJ PlayQueueџџџџџџр?єџџџМ VerdanaџџџџHdcurrentfile$=''џџџџџџџџeџџџџNMediaBoxOggStopџџџџШ** Resetџџџџcpaused=0џџџџc position=0џџџџc slidepos=0џџџџcoldpos=0џџџџcnewpos=0џџџџOMin00џџџџOSec00џџџџШ** Set current trackџџџџdcurrentfile=-1џџџџccurrentfile=totalfiles-1џџџџeџџџџdcurrentfile>totalfilesџџџџc currentfile=0џџџџccurrentfile$=''џџџџctimer=0џџџџOggPlayџџџџOggPauseџџџџd!listcontent$='info' & showqueue=1џџџџ#ShowInfoScript2џџџџeџџџџџџџџeџџџџdcurrentfile=totalfilesџџџџc currentfile=0џџџџccurrentfile$=''џџџџdloop=0џџџџctimer=0џџџџOggPlayџџџџOggPauseџџџџd!listcontent$='info' & showqueue=1џџџџ#ShowInfoScript2џџџџeџџџџџџџџeџџџџeџџџџШ** Loadџџџџccurrentfile=currentfile+1џџџџШ***џџџџLMediaBox currentfileџџџџNMediaBoxLBGetSpecItemPathџџџџMMediaBox currentfile$џџџџШ***џџџџdcurrentfile$=''џџџџc currentfile=0џџџџџџџџeџџџџШ***џџџџLMediaBox currentfile$џџџџNMediaBox OggOpenFileџџџџШ** Retrieve duration in secondsџџџџNMediaBoxOggGetDurationџџџџMMediaBoxdurationџџџџШ** Get system clock secondsџџџџLTweakgetsec$џџџџNTweak DateFormatџџџџMTweakoldpos$џџџџcoldpos=VAL(oldpos$)џџџџШ** PlayџџџџNMediaBoxOggPlayџџџџOggPauseџџџџOggPlayџџџџctimer=1џџџџ$ TimerLoop500џџџџШ ** Show Infoџџџџd!listcontent$='info' & showqueue=1џџџџ#ShowInfoScript2џџџџeџџџџџџџџџџџџ Script Groupџџџџ>ŠџџџNšџџџTimerџџџџџџр?ыџџџџ Times New RomanџџџџШ"** perform cyclic redundancy checkџџџџNMediaBox OggCheckCRCџџџџMMediaBoxcrcџџџџdcrc=0џџџџCRC Result: Bad OggcrcџџџџџџџџeџџџџLTweakgetsec$џџџџNTweak DateFormatџџџџMTweakoldpos$џџџџcoldpos=VAL(oldpos$)џџџџd slidepos<>0џџџџV0џџџџLMediaBoxslideposџџџџNMediaBoxOggSetPositionџџџџeџџџџ# TimerLoopџџџџџџџџџџџџ Script GroupџџџџvџџџЎџџџ†џџџОџџџ OpenScriptOџџџџџџр?ѓџџџ MS Sans Serifџџџџ0Ш#** Sets dialogbox initial directoryџџџџddefaultdir$<>''џџџџLMediaBox defaultdir$џџџџNMediaBox ODSetInitDirџџџџeџџџџШ#** Sets dialogbox initial file nameџџџџLMediaBoxifn$џџџџNMediaBoxODSetInitFileNameџџџџШ@** Sets dialogbox file filter mask. Use | as mask item separatorџџџџc"filter$='Ogg Files (*.ogg)|*.ogg|'џџџџLMediaBoxfilter$џџџџNMediaBoxODSetFileFilterџџџџШ** Displays OpenFile dialogboxџџџџNMediaBoxODShowџџџџШ=** If selection confirmed, retrieve selected file name & pathџџџџMMediaBoxcountџџџџdcount>1џџџџ#ODGetMultiItemџџџџџџџџeџџџџMMediaBox selected$џџџџd selected$<>''џџџџNMediaBoxOggStopџџџџccurrentfile$=selected$џџџџLMediaBox currentfile$џџџџNMediaBox OggOpenFileџџџџ#QueueAddџџџџШ*** Retrieves OGG Audio Duration in secondsџџџџNMediaBoxOggGetDurationџџџџMMediaBoxdurationџџџџШ** PlayџџџџNMediaBoxOggPlayџџџџШ** ResetџџџџWџџџџccurrentfile=totalfilesџџџџctimer=1џџџџcpaused=0џџџџc position=0џџџџc slidepos=0џџџџOMin00џџџџOSec00џџџџ$Timer500џџџџOggPauseџџџџOggPlayџџџџd!listcontent$='info' & showqueue=1џџџџ#ShowInfoScript2џџџџeџџџџeџџџџџџџџџџџџ Script Groupџџџџvџџџ&†џџџ6QueueAddџџџџџџр?ѓџџџ MS Sans Serifџџџџctotalfiles=totalfiles+1џџџџc%currentfile$[totalfiles]=currentfile$џџџџLMediaBox currentfile$џџџџNMediaBox LBPutItemџџџџШ***џџџџLMediaBox totalfilesџџџџNMediaBox LBGetSpecItemџџџџMMediaBox filename$џџџџcfilename$[totalfiles]=filename$џџџџШ***џџџџLMediaBox totalfilesџџџџNMediaBoxLBGetSpecItemFolderџџџџMMediaBoxdir$џџџџddir$<>''џџџџcdefaultdir$=dir$џџџџeџџџџџџџџџџџџ Script GroupџџџџpџџџЬџџџ€џџџмџџџ InitMediaBoxџџџџџџр?єџџџМ VerdanaџџџџLШ&** MediaBox PlugIn Registration ScriptџџџџcRegName$='Chris Walton'џџџџLMediaBoxRegName$џџџџNMediaBox SetRegNameџџџџc RegSerial$='98POVU1076XW321GNML'џџџџLMediaBox RegSerial$џџџџNMediaBoxSetRegSerialNoџџџџШ-** End of MediaBox PlugIn Registration Scriptџџџџcvar$='CTRL,ALT,SHIFT,D'џџџџLMediaBoxvar$џџџџNMediaBoxSetItemHandlerџџџџcvar$='CTRL,ALT,SHIFT,M'џџџџLMediaBoxvar$џџџџNMediaBoxSetMediaHandlerџџџџШ***џџџџc var$='TWO'џџџџLMediaBoxvar$џџџџNMediaBox LBSetClickџџџџШ***џџџџШ**var=1џџџџШ**PluginSet("MediaBox","var")џџџџШ%**PluginRun("MediaBox","LBUseDelKey")џџџџШ***џџџџLMediaBoxvarџџџџNMediaBox LBMultiSelectџџџџШ***џџџџШ**PluginSet("MediaBox","var")џџџџШ'**PluginRun("MediaBox","LBShowHScroll")џџџџШ***џџџџNMediaBox LBShowNameџџџџШ***џџџџc var$='Arial'џџџџLMediaBoxvar$џџџџNMediaBox LBSetFontџџџџШ***џџџџcfontcolor$='64,224,208'џџџџLMediaBox fontcolor$џџџџNMediaBox LBSetColorFџџџџШ***џџџџcbgcolor$='0,0,0'џџџџLMediaBoxbgcolor$џџџџNMediaBox LBSetColorBџџџџШ***џџџџcvar=8џџџџLMediaBoxvarџџџџNMediaBox LBSetFontSizeџџџџШ***џџџџNTweakEnableClientAreaDragџџџџШ***џџџџLTweak5џџџџNTweakSetEdgeSnapDistanceџџџџNTweakEnableEdgeSnapџџџџШ***џџџџ1XXџџџџ1YYџџџџШ***џџџџd showqueue=0џџџџR ResizeWindow206,76џџџџd3 X>ScreenWidth-206 | Y>ScreenHeight-76 | X<0 | Y<0 џџџџR CenterWindowџџџџeџџџџџџџџeџџџџШ***џџџџd showqueue=1џџџџNMediaBoxShowџџџџInfo Text Groupџџџџ ShowQueueџџџџShowInfoџџџџR ResizeWindow206,276џџџџd4 X>ScreenWidth-206 | Y>ScreenHeight-276 | X<0 | Y<0 џџџџR CenterWindowџџџџeџџџџџџџџeџџџџШ***џџџџџџџџџџџџ Script Groupџџџџvџџџ†џџџ" QueueHandlerQџџџџџџр?ѓџџџ MS Sans Serifџџџџd showqueue=0џџџџdlistcontent$='info'џџџџNMediaBoxHideџџџџ#ShowInfoScriptџџџџInfo Text Groupџџџџ ShowQueueџџџџShowInfoџџџџeџџџџdlistcontent$='queue'џџџџNMediaBoxShowџџџџInfo Text Groupџџџџ ShowQueueџџџџShowInfoџџџџeџџџџR ResizeWindow206,276џџџџc showqueue=1џџџџџџџџeџџџџd showqueue=1џџџџNMediaBoxHideџџџџR ResizeWindow206,76џџџџc showqueue=0џџџџeџџџџџџџџџџџџList Panel Controls Groupџџџџ §'ListLoadЏююРр?Loadєџџџ Courier Newџџџџ Ш** Sets dialogbox titleџџџџcodtitle$='Load List'џџџџLMediaBoxodtitle$џџџџNMediaBox ODSetTitleџџџџШ***џџџџLMediaBoxifn$џџџџNMediaBoxODSetInitFileNameџџџџШ***џџџџc#filter$='Text Files (*.txt)|*.txt|'џџџџLMediaBoxfilter$џџџџNMediaBoxODSetFileFilterџџџџШ***џџџџLMediaBoxlistdir$џџџџNMediaBox ODSetInitDirџџџџШ***џџџџNMediaBoxODShowџџџџШ=** If selection confirmed, retrieve selected file name & pathџџџџMMediaBox loadlist$џџџџШ***џџџџd loadlist$<>''џџџџLMediaBox loadlist$џџџџNMediaBox LBListLoadџџџџШ** Put string to comboboxџџџџLMediaBox loadlist$џџџџNMediaBox CBPutItemџџџџШ** extract folderџџџџLMediaBox1џџџџNMediaBoxCBGetSpecItemFolderџџџџMMediaBoxlistdir$џџџџШ** Clear ComboBoxџџџџNMediaBox CBClearListџџџџeџџџџџџџџџџџџџџџџ §ЫList Panel Controls Groupџџџџџџр? 5 objectsListLoadListSaveListAdd ListDelete ListClear ShowQueueShowInfoѕџџџџ ArialџџџџџџџџџџџџList Panel Controls Groupџџџџ '§KListSaveЏююРр?Saveєџџџ Courier Newџџџџ(Ш***џџџџcsdtitle$='Save List'џџџџLMediaBoxsdtitle$џџџџNMediaBox SDSetTitleџџџџШ***џџџџLMediaBoxifn$џџџџNMediaBoxSDSetInitFileNameџџџџШ***џџџџc#filter$='Text Files (*.txt)|*.txt|'џџџџLMediaBoxfilter$џџџџNMediaBoxSDSetFileFilterџџџџШ:** Sets dialogbox file filter mask default extension indexџџџџcext=1џџџџLMediaBoxextџџџџNMediaBoxSDSetDefaultExtџџџџШ** Auto-append extensionџџџџc ext$='.txt'џџџџLPlugInext$џџџџNPlugIn SDSetAutoExtџџџџШ***џџџџLMediaBoxlistdir$џџџџNMediaBox SDSetInitDirџџџџШ***џџџџNMediaBoxSDShowџџџџШ=** If selection confirmed, retrieve selected file name & pathџџџџMMediaBox savelist$џџџџШ***џџџџd savelist$<>''џџџџLMediaBox savelist$џџџџNMediaBox LBListSaveџџџџШ** Put string to comboboxџџџџLMediaBox loadlist$џџџџNMediaBox CBPutItemџџџџШ** extract folderџџџџLMediaBox1џџџџNMediaBoxCBGetSpecItemFolderџџџџMMediaBoxlistdir$џџџџШ** Clear ComboBoxџџџџNMediaBox CBClearListџџџџeџџџџџџџџџџџџList Panel Controls Groupџџџџ K§oListAddЏююРр?Addєџџџ Courier Newџџџџ# ListAddScriptџџџџџџџџџџџџList Panel Controls Groupџџџџ o§“ ListDeleteЏююРр?Delєџџџ Courier Newџџџџ#ListDeleteScriptџџџџџџџџџџџџList Panel Controls Groupџџџџ “§З ListClearЏююРр?Clearєџџџ Courier Newџџџџ#ListClearScriptџџџџџџџџџџџџ Script GroupџџџџаџџџЇџџџрџџџЗџџџ ToggleLoopLџџџџџџр?шџџџ MS Sans Serifџџџџ dloop=1џџџџcloop=0џџџџLoopOnџџџџLoopOffџџџџџџџџeџџџџdloop=0џџџџcloop=1џџџџLoopOffџџџџLoopOnџџџџџџџџeџџџџџџџџџџџџ Script Groupџџџџ>ЛџџџNЫџџџGetHelpF1џџџџџџр?шџџџ MS Sans SerifџџџџШ0**Run("\BlissVorbis\BlissVorbis.txt","")џџџџ1BlissVorbisHelpActiveBlissVorbisHelpActiveџџџџdBlissVorbisHelpActive=0џџџџ\Bliss.exe(\BlissVorbis\BlissVorbisHelp.mbxџџџџeџџџџdBlissVorbisHelpActive=1џџџџHelp is already open.џџџџeџџџџџџџџџџџџList Display Script GroupџџџџоўџџџюShowInfoScriptџџџџџџр?ѓџџџ MS Sans Serifџџџџclistcontent$='info'џџџџNMediaBoxHideџџџџInfo Text GroupџџџџShowInfoџџџџ ShowQueueџџџџШ***џџџџ#ShowInfoScript2џџџџџџџџџџџџList Panel Controls Groupџџџџ Й§ЫShowInfoЏююРр?Iєџџџ Courier Newџџџџ#ShowInfoScriptџџџџџџџџџџџџList Panel Controls Groupџџџџ Й§Ы ShowQueueЏююРр?Qєџџџ Courier Newџџџџclistcontent$='queue'џџџџ#ShowQueueScriptџџџџџџџџџџџџList Display Script Groupџџџџою"ShowQueueScriptџџџџџџр?ѓџџџ MS Sans SerifџџџџNMediaBoxShowџџџџInfo Text Groupџџџџ ShowQueueџџџџShowInfoџџџџџџџџџџџџInfo Text GroupџџџџT:b TextFileName@ра€Рр? File Nameѕџџџџ Arialџџџџџџџџџџџџџџџџ OЫњInfo Text Groupџџџџџџр? 14 objects TextFileName TextLengthTextSampleRate TextBitrate TextChannels InfoFileNameInfoMinInfoSec InfoColonInfoSampleRate InfoBitrate InfoChannels TextCurrent TextTotal InfoCurrent InfoTotalFile Info Rectangleѕџџџ ArialџџџџџџџџџџџџInfo Text Groupџџџџ}(‹ TextLength@ра€Рр?Lengthѕџџџџ ArialџџџџџџџџџџџџInfo Text Groupџџџџ‘FŸTextSampleRate@ра€Рр? Sample Rateѕџџџџ ArialџџџџџџџџџџџџInfo Text GroupџџџџЅ'Г TextBitrate@ра€Рр?Bitrateѕџџџџ ArialџџџџџџџџџџџџInfo Text GroupџџџџЙ6Ч TextChannels@ра€Рр?Channelsѕџџџџ ArialџџџџџџџџџџџџInfo Text Groupџџџџ fЩt InfoFileName@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџInfo Text Groupџџџџa}n‹InfoMin@ра€Рр?00ѕџџџ"ArialџџџџџџџџџџџџInfo Text Groupџџџџt}‹InfoSec@ра€Рр?00ѕџџџ"ArialџџџџџџџџџџџџInfo Text Groupџџџџo}r‹ InfoColon@ра€Рр?:ѕџџџ"ArialџџџџџџџџџџџџInfo Text Groupџџџџa‘ЩŸInfoSampleRate@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџInfo Text GroupџџџџaЅЩГ InfoBitrate@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџInfo Text GroupџџџџaЙЩЧ InfoChannels@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџInfo Text GroupџџџџеJу TextCurrent@ра€Рр? Current Indexѕџџџџ ArialџџџџџџџџџџџџInfo Text GroupџџџџчPѕ TextTotal@ра€Рр?Total in Queueѕџџџџ ArialџџџџџџџџџџџџInfo Text GroupџџџџaеЄу InfoCurrent@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџInfo Text GroupџџџџaчЄѕ InfoTotal@ра€Рр?ѕџџџ"ArialџџџџџџџџџџџџList Display Script GroupџџџџоўџџџюShowInfoScript2џџџџџџр?ѓџџџ MS Sans Serifџџџџ=Ш ** File Nameџџџџd currentfile=0џџџџcfilename$='No File Loaded'џџџџO InfoFileName filename$џџџџOInfoMin00џџџџOInfoSec00џџџџOInfoSampleRate0 HzџџџџO InfoBitrate0 kbpsџџџџc ichan$=''џџџџO InfoChannelsichan$џџџџ InfoCurrent currentfileџџџџ InfoTotal totalfilesџџџџџџџџeџџџџШ***џџџџШ%**PluginSet("MediaBox","currentfile")џџџџШ'**PluginRun("MediaBox","LBGetSpecItem")џџџџШ#**PluginGet("MediaBox","filename$")џџџџLMediaBox currentfile$џџџџNMediaBoxFileExtractNameџџџџMMediaBox filename$џџџџO InfoFileName filename$џџџџШ ** DurationџџџџNMediaBoxOggGetDurationџџџџMMediaBoxidurџџџџcimin=INT(idur/60)џџџџciminms=imin*60џџџџcisec=INT(idur-iminms)џџџџcisec$=CHAR(isec)џџџџcimin$=CHAR(imin)џџџџdisec<10џџџџcisec$='0' + CHAR(isec)џџџџeџџџџdimin<10џџџџcimin$='0' + CHAR(imin)џџџџeџџџџOInfoMinimin$џџџџOInfoSecisec$џџџџШ** File LengthџџџџШ%**PluginRun("MediaBox","OggFileSize")џџџџШ**PluginGet("MediaBox","isize")џџџџШ**isize$=CHAR(isize)+' bytes'џџџџШ#**LoadText("InfoFileSize","isize$")џџџџШ** Sample RateџџџџNMediaBoxOggGetSampleRateџџџџMMediaBoxisampџџџџcisamp$=CHAR(isamp)+' Hz'џџџџOInfoSampleRateisamp$џџџџШ ** BitrateџџџџNMediaBox OggGetBitRateџџџџMMediaBoxibitџџџџcibit$=CHAR(ibit)+' kbps'џџџџO InfoBitrateibit$џџџџШ** Channel ModeџџџџNMediaBoxOggChannelModeџџџџMMediaBoxichan$џџџџO InfoChannelsichan$џџџџШ***џџџџ InfoCurrent currentfileџџџџШ***џџџџ InfoTotal totalfilesџџџџџџџџџџџџ Script Groupџџџџ ощџџџюšList Display Script Groupџџџџџџр? 4 objects ToggleListDisplayMode ListAddScript ListAddMultiShowInfoScriptShowInfoScript2ShowQueueScript MoveItems MoveItemsUp MoveItemsDownListDeleteScriptListClearScriptѕџџџ Arialџџџџџџџџџџџџ Script GroupџџџџаџџџЛџџџрџџџЫџџџ ToggleMultiMџџџџџџр?шџџџ MS Sans Serifџџџџ d multiplay=1џџџџc multiplay=0џџџџMultiOnџџџџMultiOffџџџџџџџџeџџџџd multiplay=0џџџџc multiplay=1џџџџMultiOffџџџџMultiOnџџџџџџџџeџџџџџџџџџџџџList Display Script GroupџџџџощџџџюљџџџToggleListDisplayModeQџџџџџџр?шџџџ MS Sans Serifџџџџ dlistcontent$='queue'џџџџclistcontent$='info'џџџџ#ShowInfoScriptџџџџџџџџeџџџџdlistcontent$='info'џџџџclistcontent$='queue'џџџџ#ShowQueueScriptџџџџџџџџeџџџџџџџџџџџџList Display Script Groupџџџџо&ю6 ListAddScriptAџџџџџџр?ѓџџџ MS Sans Serifџџџџ$ddefaultdir$<>''џџџџLMediaBox defaultdir$џџџџNMediaBox ODSetInitDirџџџџeџџџџШ***џџџџLMediaBoxifn$џџџџNMediaBoxODSetInitFileNameџџџџШ***џџџџc"filter$='Ogg Files (*.ogg)|*.ogg|'џџџџLMediaBoxfilter$џџџџNMediaBoxODSetFileFilterџџџџNMediaBoxODShowџџџџMMediaBoxaddcountџџџџd addcount>1џџџџ# ListAddMultiџџџџџџџџeџџџџMMediaBox selected$џџџџd selected$<>''џџџџctotalfiles=totalfiles+1џџџџШ$**currentfile$[totalfiles]=selected$џџџџLMediaBox selected$џџџџNMediaBox LBPutItemџџџџШ***џџџџШ$**PluginSet("MediaBox","totalfiles")џџџџШ'**PluginRun("MediaBox","LBGetSpecItem")џџџџШ#**PluginGet("MediaBox","filename$")џџџџШ!**filename$[totalfiles]=filename$џџџџШ***џџџџLMediaBox totalfilesџџџџNMediaBoxLBGetSpecItemFolderџџџџMMediaBoxdir$џџџџddir$<>''џџџџcdefaultdir$=dir$џџџџeџџџџeџџџџџџџџџџџџList Display Script Groupџџџџо:юJ ListAddMultiџџџџџџр?єџџџМ Verdanaџџџџfi=1addcountџџџџLMediaBoxiџџџџNMediaBoxODGetMultiItemџџџџMMediaBox MultiItem$џџџџdMultiItem$<>''џџџџccurrentfile$[i]=MultiItem$џџџџctotalfiles=totalfiles+1џџџџc#currentfile$[totalfiles]=MultiItem$џџџџLMediaBox MultiItem$џџџџNMediaBox LBPutItemџџџџШ***џџџџLMediaBox totalfilesџџџџNMediaBox LBGetSpecItemџџџџMMediaBox filename$џџџџcfilename$[totalfiles]=filename$џџџџd i=addcountџџџџLMediaBox totalfilesџџџџNMediaBoxLBGetSpecItemFolderџџџџMMediaBoxdir$џџџџddir$<>''џџџџcdefaultdir$=dir$џџџџeџџџџeџџџџeџџџџgiџџџџџџџџџџџџSlider Script GroupџџџџЌџџџМ­џџџKeySlideџџџџџџр?шџџџ MS Sans Serifџџџџ"d keyslide=1џџџџcnewx = slidepos-1џџџџeџџџџd keyslide=2џџџџcnewx = slidepos+1џџџџeџџџџdnewx<0џџџџcnewx = 0џџџџeџџџџdnewx>100џџџџc newx = 100џџџџeџџџџTSlider newx+60,25џџџџWџџџџШ***џџџџc slidepos=newxџџџџШ***џџџџc%position=INT(duration*(slidepos/100))џџџџcmin=INT(position/60)џџџџc minms=min*60џџџџcsec=INT(position-minms)џџџџcsec$=CHAR(sec)џџџџcmin$=CHAR(min)џџџџdsec<10џџџџcsec$='0' + CHAR(sec)џџџџeџџџџdmin<10џџџџcmin$='0' + CHAR(min)џџџџeџџџџOMinmin$џџџџOSecsec$џџџџШ***џџџџc keyslide=0џџџџ$SetSlide600џџџџџџџџџџџџSlider Script GroupџџџџЌБџџџМСџџџ KeySlideLLEFTџџџџџџр?шџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџџџџџeџџџџc keyslide=1џџџџ#KeySlideџџџџџџџџџџџџSlider Script GroupџџџџЌХџџџМеџџџ KeySlideRRIGHTџџџџџџр?шџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџџџџџeџџџџc keyslide=2џџџџ#KeySlideџџџџџџџџџџџџ Script Groupџџџџrџџџ‚џџџPlayCurrentFromStartHOMEџџџџџџр?ѓџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџctimer=0џџџџџџџџeџџџџ# StopScriptџџџџ# PlayScriptџџџџџџџџџџџџ Script GroupџџџџБџџџСџџџ VolumeDownDOWNџџџџџџр?шџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџџџџџeџџџџ/џџџџџџџџџџџџ Script GroupџџџџХџџџеџџџVolumeUpUPџџџџџџр?шџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџџџџџeџџџџ.џџџџџџџџџџџџ Script Groupџџџџ†џџџ–џџџPlayNextTABџџџџџџр?ѓџџџ MS Sans Serifџџџџ dcurrentfile$=''џџџџctimer=0џџџџџџџџeџџџџNMediaBoxOggStopџџџџTSlider60,25џџџџOMin00џџџџOSec00џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџ# PlayQueueџџџџџџџџџџџџ Script GroupџџџџšџџџЊџџџ PlayPreviousTABџџџџџџр?ѓџџџ MS Sans Serifџџџџdcurrentfile$=''џџџџctimer=0џџџџџџџџeџџџџNMediaBoxOggStopџџџџTSlider60,25џџџџOMin00џџџџOSec00џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџccurrentfile=currentfile-2џџџџ# PlayQueueџџџџџџџџџџџџList Display Script GroupџџџџоNю^ MoveItemsџџџџџџр?єџџџМ Verdanaџџџџ,Ш** get selected itemџџџџNMediaBox LBGetItemџџџџMMediaBoxitem$џџџџMMediaBoxindexџџџџdindex=0џџџџџџџџeџџџџШ** disable multi selectџџџџLMediaBox0џџџџNMediaBox LBMultiSelectџџџџШ**џџџџd moveitem=-1џџџџcnewindex=index-1џџџџcoldindex=index+1џџџџd newindex>0џџџџLMediaBoxitem$џџџџLMediaBoxnewindexџџџџNMediaBox LBInsertItemџџџџLMediaBoxoldindexџџџџNMediaBoxLBEraseSpecItemџџџџeџџџџeџџџџd moveitem=1џџџџcnewindex=index+2џџџџcoldindex=indexџџџџdnewindex<=totalfilesџџџџLMediaBoxitem$џџџџLMediaBoxnewindexџџџџNMediaBox LBInsertItemџџџџLMediaBoxoldindexџџџџNMediaBoxLBEraseSpecItemџџџџeџџџџdnewindex>totalfilesџџџџLMediaBoxitem$џџџџNMediaBox LBPutItemџџџџLMediaBoxoldindexџџџџNMediaBoxLBEraseSpecItemџџџџeџџџџeџџџџШ** enable multi selectџџџџLMediaBox1џџџџNMediaBox LBMultiSelectџџџџШ**џџџџcindex=0џџџџџџџџџџџџList Display Script GroupџџџџоNю^ MoveItemsUpUPџџџџџџр?єџџџМ Verdanaџџџџc moveitem=-1џџџџ# MoveItemsџџџџџџџџџџџџList Display Script Groupџџџџоbюr MoveItemsDownDOWNџџџџџџр?єџџџМ Verdanaџџџџc moveitem=1џџџџ# MoveItemsџџџџџџџџџџџџ Script Groupџџџџuџџџu…џџџ… DisableCADџџџџџџр?єџџџМ VerdanaџџџџNTweakDisableClientAreaDragџџџџџџџџџџџџ Script Groupџџџџuџџџ‰…џџџ™ EnableCADџџџџџџр?єџџџМ VerdanaџџџџNTweakEnableClientAreaDragџџџџџџџџџџџџMain Panel Controls Groupџџџџ/3FOggOpenџџџџџџР' (шlxœc`Ѓ`иЉШP‡P.‹UM=В šF‚–BЬDу"kЧcВ ІFЌгƒpЋЩГn1іт$5œс*Љх_"]‹–ZpйK|ќJШVуВ—ИєŒе <щ™`8‚Q0д:щхёр?єџџџМ Arial# OpenScriptџџџџџџџџџџџџџџџџMain Panel Controls Groupџџџџ7/cFOggPlayџџџџџџР' (ш\xœc`Ѓ`˜‡рH*2Y—bЌ\\Z№лKŒ!@WЁ9"$с Zи‹2ј‰З—`8уђf d/AA<ЁA†gIЕOPSб^\~ЄŠНЃ` QТ•Ѕёр?єџџџМ Arial# PlayScriptџџџџџџџџџџџџџџџџMain Panel Controls Groupџџџџ7/cFOggPauseџџџџџџР' (шoxœc`Ѓ`‡рH*2MS%&Ј гdcбЬA3ЋQИ\‚Щ†kСхlbьХъT‚іт <і"ы…ИHТјэЅ0œ‰єяЮXCkxbJВу— Г‘У9HЩ чQ0 †)Їѕ р?єџџџМ Arial# PauseScriptџџџџџџџџџџџџџџџџMain Panel Controls Groupџџџџg/“FOggStopџџџџџџР' (шjxœc`Ѓ`иЉШP‡ Ш†ТEрЋz4]h‘Х1\ šљp)ЌŽ„˜‰ЦEж‚Љ—НИЄ№+Fs0ёіb gќітqёсL’-Фћ—HыЈПIсЬ@\z&ЦоQ0 †4PкХiр?єџџџМ Arial# StopScriptџџџџџџџџџџџџџџџџMain Panel Controls Groupџџџџ™2ЎFMultiOnџџџџџџР' 06xœc`ž vо’Ф!R˜ВXбd‘`Š`u\ 2ПLӉႇG 1тфiъ…Щ7Ћр?єџџџМ Arialc multiplay=1џџџџMultiOffџџџџMultiOnџџџџџџџџџџџџџџџџMain Panel Controls Groupџџџџ™2ЎFMultiOffџџџџџџР' 06xœc`žрРџџ$‰CЄ0eБ ЂЩ"+РСъИd~-˜†ЃbФЩг2дПЬREр?єџџџМ Arialc multiplay=0џџџџMultiOnџџџџMultiOffџџџџџџџџџџџџџџџџMain Panel Controls GroupџџџџГ2ШFLoopOnџџџџџџР' 0xœc`Ю vоQ-tа‚ŒHе>ДЊpEр?єџџџМ Arialcloop=1џџџџLoopOffџџџџLoopOnџџџџџџџџџџџџџџџџMain Panel Controls GroupџџџџГ2ШFLoopOffџџџџџџР' 0xœc`ЮрРџџЃZш ‘Њ}hRS щр?єџџџМ Arialcloop=0џџџџLoopOnџџџџLoopOffџџџџџџџџџџџџџџџџMain Panel Controls GroupџџџџВШ+ShowListџџџџџџР' `Кxœc`0РТХЧ-Љˆ,Т%&ЧЬЮ…G PVXлJ=М8ќР8R -жЖš†KаXЭш* JЃ‚iQхš1U@ЋSц41_ТЬТ7vˆрїPAV/ЬСœ@в0o1Кt’[ FF ф’d”В„Љ›qб btќeю)Єa dшЅwєrm„k ЅpщТ_@Н"К6ј#9mˆ›ИBЌЦя)LЋё8Œn„М]–р?єџџџМ Arial# QueueHandlerџџџџџџџџџџџџџџџџList Display Script Groupџџџџоvю†ListDeleteScriptDELETEџџџџџџр?єџџџМ VerdanaџџџџNMediaBoxLBMultiSelCountџџџџMMediaBoxindexџџџџctotalfiles=totalfiles-indexџџџџNMediaBoxLBEraseMultiItemџџџџdpaused=1џџџџNMediaBoxOggPauseџџџџeџџџџШ***џџџџџџџџШ***џџџџd totalfiles=0џџџџNMediaBoxOggStopџџџџccurrentfile$=''џџџџc currentfile=0џџџџctimer=0џџџџcpaused=0џџџџOggPlayџџџџOggPauseџџџџTSlider60,25џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџOMin00џџџџOSec00џџџџeџџџџџџџџџџџџList Display Script GroupџџџџоŠюšListClearScriptџџџџџџр?єџџџМ VerdanaџџџџNMediaBox LBClearListџџџџc totalfiles=0џџџџdpaused=1џџџџNMediaBoxOggPauseџџџџeџџџџШ***џџџџџџџџШ***џџџџNMediaBoxOggStopџџџџccurrentfile$=''џџџџc currentfile=0џџџџctimer=0џџџџcpaused=0џџџџOggPlayџџџџOggPauseџџџџTSlider60,25џџџџc slidepos=0џџџџc position=0џџџџcoldpos=0џџџџcnewpos=0џџџџOMin00џџџџOSec00џџџџџџџџџџџџє1 defaultdir defaultdir$џџџџ1listdirlistdir$џџџџ1looploopџџџџdloop=1џџџџLoopOffџџџџLoopOnџџџџeџџџџ1 showqueue showqueueџџџџclistcontent$='queue'џџџџ1 multiplay multiplayџџџџd multiplay=1џџџџMultiOffџџџџMultiOnџџџџeџџџџ0BlissVorbisHelpActive0џџџџc getsec$='%s'џџџџcifn$=' 'џџџџcfilename$='No File Loaded'џџџџc ichan$='0'џџџџ$ InitMediaBox0џџџџџџџџMaster Page 000џџџYєџџџџMaster Layer 000џџџYєџџџџЪ8ЮLnqf2xsglxsptipfcqokEepdpxtkof 33719986;7.3 BlissVorbis