Running Powerpoint

BlitzPlus Forums/BlitzPlus Programming/Running Powerpoint

Ok

;Switch example

Global SwitchLine$ = CommandLine()
Global Switch1On = False
Global Switch2On = False
Global Switch3On = False

CheckForSwitches()

If Switch1On Then
    Print "Switch number 1 is on!"
Else
    Print "Switch number 1 is off!"
EndIf
If Switch2On Then
    Print "Switch number 2 is on!"
Else
    Print "Switch number 2 is off!"
EndIf
If Switch3On Then
    Print "Switch number 3 is on!"
Else
    Print "Switch number 3 is off!"
EndIf
WaitKey
End

Function CheckForSwitches()
	Res = Instr(SwitchLine$,"/s1",0)
	If Res = True Then
		Switch1On = True
	EndIf
	Res = Instr(SwitchLine$,"/s2",0)
	If Res = True Then
		Switch2On = True
	EndIf
	Res = Instr(SwitchLine$,"/s3",0)
	If Res = True Then
		Switch3On = True
	EndIf
End Function


Now put /s1, /s2, and/or /s3 in the command line and your good-to-go!

This code is kinda glitchy (like the Instr() function will find the switch even if it's in another word) and not very specific, but you get the idea.