Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

Please Help! My Program skips input command

MGSFANMGSFAN Posts: 3Member
Here is the program It skips the login and password
I tried making login and password a sub

------
CLS
PRINT "Loading MGX"


SLEEP 8

PRINT "Memory: 1048576k/1049216k available (1162k kernel code, 6812k"
PRINT "482k data 240k init, Ok highmem)"


PRINT "Dentry-cache hash table entries: 32768 (order: 6, 262144 bytes)"

PRINT "Buffer-cache hash table entries: 8192 (order: 3, 32768 bytes)"
PRINT "Page-cache hash table entries: 65536 (order: 6, 262144 bytes)"
PRINT "Inode-cache hash table entries: 16384 (order: 5, 131072 bytes)"

PRINT "Enabling fast FPU save and restore"
SLEEP 3
PRINT "Enabling unmasked SIMD FPU exception support"
SLEEP 3
PRINT "Checking 'hlt' instruction"
SLEEP 1

PRINT "MGX NET9.0 for MGX 6.0"

PRINT "BIOS Vendor: KCEJ"

PRINT "BIOS Version: 5.73"

PRINT "Starting kswapd v3.0"
SLEEP 3
PRINT "pty: 256 Unix98 ptys configured"

PRINT "Uniform Multi-Platform E-IDE driver Revision: 9.11"

PRINT "DMA at 0xf000-0xf007, BIOS settings: da0:DMA, da1:pio"

PRINT "19623/16/255 from BIOS ignored"
SLEEP 9
PRINT "da0: TOKUGAWA HD4192 E, ATA DISK drive"

PRINT "da1: TOKUGAWA CF2048J, REMOVABLE drive"

PRINT "ide0 at 0x1f0-0x1f7, 0x3f6 on irq 14"

PRINT "158856/16/63 UDMA(33)"

PRINT "Partition check:"
SLEEP 10
PRINT "eth0: ARMSTECH Corporation 826557, 00:03:47:70:29:86, IRQ 9."
SLEEP 1
PRINT "NET9: MGX TCP/IP 4.0 for NET9.0"
SLEEP 1
PRINT "IP Proyocols: ICMP, UDP, TCP, IGMP"

PRINT "IP: routing cache hash table of 512 buckets, 4Kbytes"
SLEEP 5
PRINT "ICP: hash tables configured (established 8192 bind 8192)"

PRINT "x domain sockets 1.0/SMP for MGX NET9.0"

PRINT "VFS: Mounted root (ext4 filesystem) readonly."

PRINT "Freeing unused kernel memory: 176k freed"
SLEEP 8
PRINT "Adding Swap: 211640k swap space (priority -1)"
SLEEP 4
PRINT "INIT: Version 5.64"
SLEEP 3
CLS
PRINT "Welcome to MONORITH SERVICE SYSTEM"

PRINT "PROVIDED BY STRATELOGIC INC.,LTD."

PRINT "######################CAUTION#########################"

PRINT "FOR MILITARY USE ONLY."

PRINT "UNAUTHORIZED PERSONNEL MAKING ACCESS OR ATTEMPTING ACCESS WILL BE"

PRINT "PENALIZED SEVERELY UNDER MARTIAL LAW."
SLEEP 50
PRINT "Mounting proc filesystem"
SLEEP 4
PRINT "Configuring kernel parameters"
SLEEP 2
PRINT "Loading default keymap"
SLEEP 1
PRINT "Activating swap partitions"
SLEEP 2
PRINT "Setting hostname SYS001"
SLEEP 4
PRINT "Checking root filesystem"
SLEEP 2
PRINT "H9/dev/da01: clean 2676/788800 files, 492275/3155200 blocks"

PRINT "Remounting root filesystem in read-write mode"
SLEEP 8
PRINT "Finding module dependencies"
SLEEP 4
PRINT "/dev/da05: clean 21/82328 files, 10415/329301 blocks"

PRINT "/dev/da06: clean 75098/9729792 files, 316284/38919168 blocks"

PRINT "/dev/da07: clean 20881/9729792 files, 834953/38919168 blocks"

PRINT "Mounting local filesystems"
SLEEP 4
PRINT "Enabling swap space"
SLEEP 4
PRINT "INIT: Entering runlevel: 4"
SLEEP 3
PRINT "Entering non-interactive startup"
SLEEP 5
PRINT "Setting network parameters"
SLEEP 8
PRINT "Bringing up interface lo"
SLEEP 4
PRINT "Bringing up interface eth0"
SLEEP 4
PRINT "MONORITH MGX 2.1.5"
PRINT "Kernel 6.2.38"
DIM LOGON AS STRING
DIM PASSWORD AS STRING
SLEEP 2
INPUT "Login:", LOGON
INPUT "Password:", PASSWORD
PRINT "Login Correct"
PRINT "Password Correct"
PRINT "Last login:"; "on tty1"
------------------

Comments

  • Azurith_XEONAzurith_XEON Posts: 15Member
    cls
    REM These are the real password and login
    Passwordx$=(Puttherealpasswordhere)
    Loginnamex$=(Puttherealloginnamehere)

    REM This asks for the real logon name, if correct it asks for a
    REM password.
    Login:
    INPUT "Login:";LOGON$,
    If logon$=loginnamex$
    then goto password1

    REM If the password matches, it will proceed to the main script, if
    REM not, it goes to login: (You could also set it to quite after three
    REM failed attempts at password.)
    Password1:
    INPUT "Password:";Password$,
    If password$=passwordx$
    goto end
    else
    goto login
    endif

    end:
    PRINT "Login Correct"
    PRINT "Password Correct"
    Print "Welcome"

    Maby that'll work, hope it does.
    BTW, i'd use a real memory retrieve command {to make it more real to the user} Different people have different comps. lol

    ~~Azurith_Xeon
Sign In or Register to comment.