posted on Aug, 2 2016 @ 04:30 AM
a reply to:
notmyrealname
REM pretend to be filled already:
StarsActivated%
DECLARE SUB PrintSomeStars (StarCount!)
REM QuickBASIC example
IF StarsActivated = 1 THEN
INPUT "What is your name: ", UserName$
PRINT "Hello "; UserName$
DO
INPUT "How many stars do you want: ", NumStars
CALL PrintSomeStars(NumStars)
DO
INPUT "Do you want more stars? ", Answer$
LOOP UNTIL Answer$ ""
Answer$ = LEFT$(Answer$, 1)
LOOP WHILE UCASE$(Answer$) = "Y"
PRINT "Goodbye "; UserName$
ELSE
PRINT "Access Denied"
PRINT
DO
LOOP UNTIL INKEY$ ""
ENDIF
END
SUB PrintSomeStars (StarCount)
REM This procedure uses a local variable called Stars$
Stars$ = STRING$(StarCount, "*")
PRINT Stars$
END SUB
HINT: Vulnerability hidden
edit on 2-8-2016 by verschickter because: (no reason given)