DISCO

Component

Subroutine/Function

Description

Developer

Status

frmSplash

 -> Dim Picture1 As PictureBox

Our Sweet Logo!

Benjamin P Paratore

-

 -> Dim Label1 As Label

"Click to begin"

Benjamin P Paratore

-

 -> Dim lblPlatform As Label

"Platform: Win32"

Benjamin P Paratore

-

 -> Dim lblVersion As Label

"1.0"

Benjamin P Paratore

-

Private Sub Form_Click()

Simply unloads frmSplash and shows mainForm

Benjamin P Paratore

Done

Private Sub Form_KeyPress (KeyAscii As Integer)

Simply unloads frmSplash and shows mainForm

Benjamin P Paratore

Done

Private Sub Form_Load()

Immediately loads mainForm

Benjamin P Paratore

Done

Private Sub Picture1_Click()

Simply unloads frmSplash and shows mainForm

Benjamin P Paratore

Done

SetupForm

 -> Dim numIn As Integer

 Number of inputs in the form

Benjamin P Paratore

-

 -> Dim numOut as Integer

 Number of outputs in the form

Benjamin P Paratore

-

 ->

-

Private Sub cancelButt_Click()

 Unloads the Setup Form making no changes

Benjamin P Paratore

Done

Private Sub DetectButt_Click()

 Starts timer to detect inputs being pressed

Benjamin P Paratore

Pending

Private Sub initIns()

 Loads all the input icons on the left side

Benjamin P Paratore

Done

Private Sub initOuts()

 Loads all the output icons on the right side

Benjamin P Paratore

Done

Private Sub Form_Load()

 Shows the SetupForm to the screen

Benjamin P Paratore

Done

Private Sub inIcon_Click(Index As Integer)

 Allows Input Icons to be changed when clicked on

Benjamin P Paratore

Done

Private Sub outIcon_Click(Index As Integer)

 Allows Output Icons to be changed when clicked on

Benjamin P Paratore

Done

Private Sub saveButt_Click()

 Saves changes to the .ini file and refreshes mainForm

Benjamin P Paratore

Done

Private Sub testButt_Click()

 Starts timer to test ouputs

Benjamin P Paratore

?

Private Sub TestTimer_Timer()

 Actually tests outputs one at a time

Benjamin P Paratore

?

sequence

 -> Dim seqLen

 Number of Icons in the Sequence

Benjamin P Paratore

-

 -> Dim lpBuffer As String

 Used by getIni

Benjamin P Paratore

-

 -> Dim lpDefault As String

 Used by getIni

Benjamin P Paratore

-

 -> Dim ret As Long

 Used by getIni

Benjamin P Paratore

-

 -> Dim Selected As Integer

 Is the current one selected

Benjamin P Paratore

-

 -> 

-

 -> 

-

Private Sub seqIcons_Click(Index As Integer)

 Unhighlights old selected and highlights new selected one

Benjamin P Paratore

Active

Public Sub unHighlight()

 Unhighlights lcon at Selected

Benjamin P Paratore

Done

Public Sub highlight()

 Highlights Icon at Selected

Benjamin P Paratore

Done

Private Sub UserControl_Initialize()

 Sets initial values of length and background color

Benjamin P Paratore

Done

Public Sub receiveDrop
(Pict As String, Id As String, param As String)

 Inserts Specified icon into a sequence

Benjamin P Paratore

Active

Public Function getSequence() As String

 Returns a list of names of all inputs and outputs in the Sequence

Benjamin P Paratore

Active

Public Sub Clear()

 Removes all icons from a sequence

Benjamin P Paratore

Done

mainForm

 -> Dim lpBuffer As String

 Used by getIni

Benjamin P Paratore

-

 -> Dim lpDefault As String

 Used by getIni

Benjamin P Paratore

-

 -> Dim ret As Long

 Used by getIni

Benjamin P Paratore

-

 -> Dim IniFileName As String

 Filename of the active .ini file

Benjamin P Paratore

-

 -> Dim Selected As Integer

 Number of selected Sequence

Benjamin P Paratore

-

 -> Dim numIn As Integer

 Number of inputs in window

Benjamin P Paratore

-

 -> Dim numOut As Integer

 Number of outputs in window

Benjamin P Paratore

-

 -> Dim numSeq As Integer

 Total number of sequences

Benjamin P Paratore

-

 -> Dim mySeqLength As Integer

 Number of sequences displayed

Benjamin P Paratore

-

 -> Dim topShift As Integer 

 Amount of shift when sequences are scrolled

Benjamin P Paratore

-

 -> Dim myTOKEN As String

 Is the token created by toker()

Benjamin P Paratore

-

 -> 

Private Sub Form_Load()

 Opens initial .ini file, and calls supporting initialize functions

Benjamin P Paratore

Pending

Private Sub initSeq()

 Displays the ActiveX Sequence holders to the window

Benjamin P Paratore

Done

Private Sub initMenu()

 Displays top row of icons to the window

Benjamin P Paratore

Done

Private Sub initInputIcons()

 Displays the Icons along the left representing the input

Benjamin P Paratore

Done

Private Sub initOutputIcons()

 Displays the Icons along the left representing the output

Benjamin P Paratore

Done

Private Sub initIcons()

 Calls all the other init Icon functions

Benjamin P Paratore

Done

Public Sub refreshIcons()

 Deletes all the Icons and then re-initializes them

Benjamin P Paratore

Done

Private Sub openIcon_Click()

 Will open a saved .ini file and refresh the window

Benjamin P Paratore

Done

Private Sub saveIcon_Click()

 Copies the current disco.ini to the specified location

Benjamin P Paratore

Done

Private Sub sequence_DragDrop
(Index As Integer, Source As Control, X As Single, Y As Single)

 Puts dropped icon into a sequence, prompts for audio or video file

Benjamin P Paratore

Active

Private Sub sequence_GotFocus(Index As Integer)

 Highlights the selected icon

Benjamin P Paratore

Done

Private Sub setupIcon_Click()

 Tells the Setupform to display

Benjamin P Paratore

Done

Public Function getIni(section As String, field As String)

 Reads from the ini file

Benjamin P Paratore

Done

Public Sub setIni(section As String, field As String, value As String)

 Writes to the ini file

Benjamin P Paratore

Done

Private Sub Scroll_Down()

 Scrolls down one row

Mike Robak

Done

Private Sub Scroll_Up()

 Scrolls up one row

Mike Robak

Done

Private Sub VScroll1_Change()

 Calls Scroll_Up or Scroll_Down for each time bar is moved

Mike Robak

Done

Private Sub loadSequences()

 Loads all icons into sequences from .ini file

Benjamin P Paratore

Done

Private Function Toker(str As String, delim As String) As String

 Tokenizes loaded sequences

Benjamin P Paratore

Done

Private Sub refreshSequence()

 Clears all icons out of sequences and tells them to reload

Benjamin P Paratore

Done

...

...

...

...