REM **** negr/OS ******
REM Kernel    3.1.3.3.7
REM **** dialect ******

DIM login$
DIM pw$
DIM prompt$
DIM dir$
DIM rm$
DIM host$
DIM yourmoma$
REM no_need_to_DIM_anything$


CLS
        COLOR 10
        SCREEN 12
PRINT " "
PRINT " "
PRINT "    NNN    NNNN                                 ////
OOOOOOOOOOO SSSSSSSSSSS"
PRINT "    NNNN   NNNN                                ////
OOOOOOOOOOO SSSSSSSSSSS"
PRINT "    NNNNN  NNNN                               ////   OOOO
OOOO SSSS"
PRINT "    NNNNNN NNNN eeeeeeee gggggggg rrr rrrr   ////    OOOO
OOOO SSSSSSSSSSS"
PRINT "    NNNNNNNNNNN eee  eee ggg  ggg rrrrrrrr  ////     OOOO
OOOO SSSSSSSSSSS"
PRINT "    NNNN NNNNNN eeeeeeee ggg  ggg rrrr     ////      OOOO
OOOO        SSSS"
PRINT "    NNNN  NNNNN eee      ggg  ggg rrr     ////
OOOOOOOOOOO SSSSSSSSSSS"
PRINT "    NNNN    NNN eeeeeeee gggggggg rrr    ////
OOOOOOOOOOO SSSSSSSSSSS"
PRINT "                              ggg"
PRINT "                         gggggggg"
PRINT " "
PRINT "                         The Black Operating System !"

                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT
                                              PRINT

      PRINT "(Stupidphat.com) negr/OS (ttyp1) fastlink01"

                                        SCREEN 12
      LINE (25, 25)-(52, 67), B
      LINE (214, 234)-(23, 45), B, B

        COLOR 3
        PRINT
        SCREEN 12
        PRINT

1       INPUT "login: ", login$
        INPUT "password: ", pw$


IF pw$ = "pass" THEN
        PRINT
        COLOR 8

        PRINT "Negr/OS  Kernel Build : 3.1.3.3.7. "
        PRINT
        COLOR 3
        PRINT "Logged in as user: ";
        PRINT login$
        PRINT "Your shell is /negros/shells/freshmozzarela&sausage"
        PRINT
        PRINT "# MOTD"
        PRINT "Welcome to Negr/OS ! Type help for commands @#$"; ""
        PRINT
        PRINT



        GOTO 2
                ELSE
                        PRINT
COLOR 7
        PRINT "Invalid username or password"
        PRINT
        COLOR 3
        GOTO 1
        END IF
2       PRINT "[";
        COLOR 4
        PRINT login$;
        COLOR 3
        PRINT "@";
        INPUT "negr/OS ]> ", sysprompt$

IF sysprompt$ = "adduser" THEN
        INPUT "Enter the new user name :", user$
                INPUT "Enter a password :", pass1$
                        INPUT "Re-Enter the password : ", pass2$
END IF

IF pass1$ = pass2$ THEN
        OPEN "usrs.txt" FOR OUTPUT AS #1
        PRINT #1, "Username : " + user$
                PRINT #1, "Password : " + pass1$
CLOSE #1
ELSE
        PRINT "Passwords did not match"
        GOTO 2
END IF


IF sysprompt$ = "dir /w" THEN
        SHELL "dir /w"
        GOTO 2
END IF

IF sysprompt$ = "dir /p" THEN
        SHELL "dir /p"
        GOTO 2
END IF


IF sysprompt$ = "rm" THEN
        PRINT
        COLOR 9
        INPUT "[RM File] ", rm$
        SHELL "del " + rm$
        COLOR 3
GOTO 2
END IF

IF sysprompt$ = "" THEN
GOTO 2
END IF

IF sysprompt$ = "cls" THEN
        SHELL "cls"
        GOTO 2
END IF


IF sysprompt$ = "clear" THEN
        SHELL "cls"
        GOTO 2
END IF


IF sysprompt$ = "ver" THEN
        PRINT

COLOR 10
PRINT "Negr/OS Version 3.1.3.3.7 and dont ever forget it!"
PRINT
COLOR 3
GOTO 2
END IF


IF sysprompt$ = "fdisk" THEN
SHELL "c:\windows\system\fdisk.com"
GOTO 2
END IF


IF sysprompt$ = "ping" THEN
PRINT
COLOR 9
INPUT "[Ping target] ", host$
SHELL "ping " + host$
COLOR 3
GOTO 2
END IF

IF sysprompt$ = "help" THEN
PRINT
COLOR 12
PRINT "cd       help    rm      ver     who     dir     "
PRINT "hello.c  cd ..   a:      pwd     rm -rf  logout  "
PRINT "exit     time    txt     c:      hi      Unix    "
PRINT "cls      clear   fdisk   ping    adduser dir /w/p"
PRINT
COLOR 3
GOTO 2
END IF


IF sysprompt$ = "cd" THEN
PRINT
COLOR 9
INPUT "[ Dir ] ", dir$
SHELL "cd " + dir$
COLOR 3
GOTO 2
END IF


IF sysprompt$ = "pwd" THEN
SHELL "cd"
GOTO 2
END IF


IF sysprompt$ = "dir" THEN
        SHELL "dir"
        GOTO 2
END IF

IF sysprompt$ = "cd .." THEN
        SHELL "cd .."
        GOTO 2
END IF

IF sysprompt$ = "a:" THEN
        SHELL "a:"
        GOTO 2
END IF

IF sysprompt$ = "hello.c" THEN
PRINT
COLOR 8
PRINT
PRINT "HELLO WORLD #@$@#$! "
PRINT
COLOR 3
GOTO 2
END IF

IF sysprompt$ = "rm -rf" THEN
PRINT

COLOR 8
PRINT
PRINT " j00 fucking mor0n !"
PRINT
COLOR
GOTO 2
END IF



IF sysprompt$ = "logout" THEN
        CLS
        GOTO 1
END IF

IF sysprompt$ = "exit" THEN
        END
END IF

IF sysprompt$ = "who" THEN
        PRINT
        COLOR 4
        PRINT login$
        PRINT
        COLOR 3
        GOTO 2
END IF

IF sysprompt$ = "time" THEN
        SHELL "time"
        PRINT
        GOTO 2
END IF

IF sysprompt$ = "c:" THEN
        SHELL "c:"
        PRINT
        GOTO 2
END IF

IF sysprompt$ = "ls" THEN
        PRINT
        COLOR 15
        PRINT "best step !$# : try dir instead : neener neener.";
        PRINT
        COLOR 3
        PRINT "."
        GOTO 2
END IF

IF sysprompt$ = "txt" THEN
PRINT
COLOR 8
INPUT "[ TXT ] ", txt$
SHELL "" + txt$
COLOR 3
GOTO 2
END IF


IF sysprompt$ = "hi" THEN
        PRINT "hi"
        ELSE
        PRINT
        COLOR 15
        PRINT ":nigga best recognize : [";
        COLOR 5
        PRINT sysprompt$;
        COLOR 15
        PRINT "] : not a command";
        COLOR 3
        PRINT "."
        PRINT
        GOTO 2
        END IF

IF sysprompt$ = "cd" + dir$ THEN
PRINT
COLOR 8
INPUT "[ Dir ] ", dir$
SHELL "cd " + dir$
COLOR 3
GOTO 2
END IF