qbasic problem

[pavlebn]

Ok i just learned some basics of qbasic and was exploring it...

I made this :

CLS
PRINT "Username:"
INPUT username$
IF username$ = "name" THEN PRINT "Password:";
IF username$ <> "name" THEN PRINT "Try again";

INPUT username$

IF username$ = "pass" THEN PRINT "Welcome";

IF username$ <> "pass" THEN PRINT "Try again";

Just a basic thing...

Does anyone know how to make a loop in this?
Thanks in advance!

^{P.S. I am just a beginner in this thing!}

[janoch]

DO
CLS
PRINT "Username:"
INPUT username$
IF username$ = "name" THEN PRINT "Password:";

'...more code here if you want...

LOOP WHILE ucase$(username$) <> "QUIT"