fb:porticula NoPaste
command in sub with if
Uploader: | darksider3 |
Datum/Zeit: | 09.10.2011 16:35:11 |
'Verwendungsbeispiel, herauskopiert aus der Konsole:
'----
'user@pc:~/freebasic$ ./commandsubtest -x hallo -y welt
'Das ist das Hauptprogramm.
'Das ist die Sub.
'Wert von Command: -x hallo -y welt
'----
'@author: ssteiner
'von mir kommt nur if :D
DECLARE SUB VerarbeiteParameter ()
PRINT "Das ist das Hauptprogramm."
VerarbeiteParameter()
SLEEP
END
SUB VerarbeiteParameter ()
PRINT "Das ist die Sub."
PRINT "Wert von Command: "; COMMAND
IF command(1) = "-help" Then
Print " -help Helps you"
endif
END SUB