Check the new version here

Popular channels

QBasic 64 | Sistema de logeo



INPUT "Usuario"; Usuario
admin = 54938
IF Usuario = admin THEN
    PRINT "Logeaste usuario correctamente, ingresa la password"
    GOTO password
ELSE
    PRINT "Usuario erroneo, vuelva a ingresarlo"
    GOTO prelogin
END IF
password:
INPUT "Password"; Password
pass = 502295
IF Password = pass THEN
    PRINT "Ingresaste correctamente"
    GOTO logueado
ELSE
    PRINT "Password erronea, vuelva a ingresarla"
    GOTO password
END IF
logueado:
PRINT "Bienvenido"
'------------TBonfigli---------
0
0
0
0No comments yet