Ludek at 11:48, 24 May 2007

2007-05-24T11:48:07Z

← Older revision		Revision as of 11:48, 24 May 2007
Line 6:		Line 6:
	' This script demonstrates how to plug-in a script that manages how Auto-DJ works.		' This script demonstrates how to plug-in a script that manages how Auto-DJ works.
	'		'
	' [~~SearchAMG~~]		' [AutoDJSample]
	' FileName=AutoDJSample.vbs		' FileName=AutoDJSample.vbs
	' DisplayName=AutoDJ Sample Plug-in		' DisplayName=AutoDJ Sample Plug-in

Jiri at 12:23, 2 May 2007

2007-05-02T12:23:33Z

New page

This script demonstrates how to plug-in a script that manages how Auto-DJ works.

<source lang="vb">
' Sample AutoDJ script
'
' This script demonstrates how to plug-in a script that manages how Auto-DJ works.
'
' [SearchAMG]
' FileName=AutoDJSample.vbs
' DisplayName=AutoDJ Sample Plug-in
' Language=VBScript
' ScriptType=4

' This procedure is called when this script should show some UI on Options Panel (note that it's about a very small
' panel to be shown, more details should be configured in a separate window)
' Panel = Panel where script can place its controls
Sub InitConfigSheet( Panel)
' TBD: Add some UI, mainly a button that would open another dialog with more controls for setting parameters of this AutoDJ.
End Sub

' This procedure is called when this script should remove its UI from Options Panel.
' Panel = Panel where UI controls were previously placed by the script
' SaveConfig = Whether user pressed Ok and values in the dialog should be applied and saved (to registry, ini file, or so)
Sub CloseConfigSheet( Panel, SaveConfig)
' TBD: Save values to Registry, apply them to our internal variables.
End Sub

' This function prepares a new track to be added to Now Playing queue
Function GenerateNewTrack
' This example only takes a random track from DB
Set Iter = SDB.Database.OpenSQL( "SELECT ID FROM Songs ORDER BY random(*)")
ID = Iter.ValueByIndex(0)
Set Iter = SDB.Database.QuerySongs( "ID=" & ID)
Set GenerateNewTrack = Iter.Item
End Function
</source>

Sample Auto-DJ script - Revision history

Ludek at 11:48, 24 May 2007

Jiri at 12:23, 2 May 2007