Network Admin Work Load

Discussion in 'MCSE' started by James, Jul 18, 2005.

  1. James

    catwalker63 Guest

    I wondered why I've been feeling light-headed and blacking out
    periodically. <eg>

    --
    Catwalker
    aka Pu$$y Feet
    BS, MCP, MCSA, MCSE
    MCNGP #43
    www.mcngp.com
    faq.mcngp.com
    "If man could be crossed with the cat, it would improve man, but it would
    deteriorate the cat." Mark Twain
     
    catwalker63, Jul 19, 2005
    #21
    1. Advertisements

  2. James

    kpg Guest

    BTW...congrats. That's a nice feather in your cap.

    kpg
     
    kpg, Jul 19, 2005
    #22
    1. Advertisements

  3. James

    catwalker63 Guest

    kpg <[email protected]> prattled ceaslessly in

    Thank you! It feels good to have completed it.

    --
    Catwalker
    aka Pu$$y Feet
    BS, MCP, MCSA, MCSE
    MCNGP #43
    www.mcngp.com
    faq.mcngp.com
    "If man could be crossed with the cat, it would improve man, but it would
    deteriorate the cat." Mark Twain
     
    catwalker63, Jul 19, 2005
    #23
  4. James

    Neil Guest

    Who needs a spool chocker when grammer (and gramper too) are an issue
    ;)
     
    Neil, Jul 19, 2005
    #24
  5. James

    JaR Guest

    In microsoft.public.cert.exam.mcse, Neil spewed across the ether:
    You just dint get it. It's not "You have 2 choices" it's "you have too
    choices"

    As in: "Neil has too wrecked the Ferrari!"

    HTH, HAD.
     
    JaR, Jul 19, 2005
    #25
  6. James

    Neil Guest

    has not
     
    Neil, Jul 20, 2005
    #26
  7. James

    JaR Guest

    In microsoft.public.cert.exam.mcse, Neil spewed across the ether:
    Has two
     
    JaR, Jul 20, 2005
    #27
  8. James

    Frisbee® Guest

    Naw, I'll fess up. I wrecked the second Ferrari.
     
    Frisbee®, Jul 20, 2005
    #28
  9. James

    CBIC Guest

    Documentation is a good thing.

    I agree. I should clarify my point. I make excellent documentation so that I
    can quickly solve a problem the next time should it arise. I just put my
    documentation where only I can see it. If/when I leave this position, I will
    provide passwords and other data that was given to me when I started.
    Everything else the new person will have to figure out him/herself. Just
    like I had to.
     
    CBIC, Jul 20, 2005
    #29
  10. James

    JaR Guest

    In microsoft.public.cert.exam.mcse, Frisbee® spewed across the ether:
    Well now. That will be coming out of you MCNGP paycheck!

    But we all admire you for stepping up.

    Neil, you're still on the hook for the rusty one.
     
    JaR, Jul 20, 2005
    #30
  11. James

    JaR Guest

    In microsoft.public.cert.exam.mcse, CBIC spewed across the ether:
    Bingo.
     
    JaR, Jul 20, 2005
    #31
  12. James

    CBIC Guest

    Bingo.

    Yahtzee.
     
    CBIC, Jul 20, 2005
    #32
  13. James

    Jtyc Guest

    Yahtzee.

    Dominoes mutha f****r.
     
    Jtyc, Jul 20, 2005
    #33
  14. James

    catwalker63 Guest

    Texas Holdem

    --
    Catwalker
    aka Pu$$y Feet
    BS, MCP, MCSA, MCSE
    MCNGP #43
    www.mcngp.com
    faq.mcngp.com
    "If man could be crossed with the cat, it would improve man, but it would
    deteriorate the cat." Mark Twain
     
    catwalker63, Jul 20, 2005
    #34
  15. James

    Briscobar Guest

    Jenga, bitches.
     
    Briscobar, Jul 20, 2005
    #35
  16. James

    Frisbee® Guest

    Mastermind!

    I wrote a mastermind game for the Vic-20, heh. It used fancy graphics and
    colors and stuff... whiz-bang for that era.

    I also wrote one 19 years ago for the IBM PC but it's really basic. Uses
    numbers instead of colors.

    ' MIND - MasterMind Game
    ' Compile instructions: bc /o mind;
    ' link /nod/e mind qsound,,nul,basic7 pdq;
    DEFINT A-Z
    DECLARE FUNCTION PDQTimer& ()
    DECLARE FUNCTION PDQRand (Limit)
    CALL PDQRandomize(PDQTimer&)
    Effects = (COMMAND$ <> "")
    IF Effects THEN
    CALL InCpt(Cpt&)
    END IF
    CLS
    LOCATE , , 0
    PRINT TAB(50); "ÚÄÄÄÄÄÂÄÄÄÄÄÄÄÂÄÄÄÄÄÂÄÄÄ¿"
    PRINT TAB(50); "³ Try ³ Guess ³ N/P ³ N ³"
    PRINT TAB(50); "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT "ÛÛ ÛÛ ÛÛ ÛÛÛÛ ÛÛÛÛÛÛ ÛÛÛÛÛÛ ÛÛÛÛÛÛ"; TAB(50); "³ 1 ³
    ³ ³ ³"
    PRINT "ÛÛÛ ÛÛÛ ÛÛÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT "ÛÛÛÛÛÛÛ ÛÛ ÛÛ ÛÛÛ ÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50); "³ 2 ³
    ³ ³ ³"
    PRINT "ÛÛÛÛÛÛÛ ÛÛ ÛÛ ÛÛÛ ÛÛ ÛÛÛÛ ÛÛÛÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT "ÛÛ Û ÛÛ ÛÛÛÛÛÛ ÛÛÛ ÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50); "³ 3 ³
    ³ ³ ³"
    PRINT "ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT "ÛÛ ÛÛ ÛÛ ÛÛ ÛÛÛÛ ÛÛ ÛÛÛÛÛÛ ÛÛÛ ÛÛ"; TAB(50); "³ 4 ³
    ³ ³ ³"
    PRINT TAB(50); "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT TAB(50); "³ 5 ³ ³ ³ ³"
    PRINT " ÛÛ ÛÛ ÛÛÛÛ ÛÛ ÛÛ ÛÛÛÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT " ÛÛÛ ÛÛÛ ÛÛ ÛÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50); "³ 6 ³ ³
    ³ ³"
    PRINT " ÛÛÛÛÛÛÛ ÛÛ ÛÛÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT " ÛÛÛÛÛÛÛ ÛÛ ÛÛ ÛÛÛÛ ÛÛ ÛÛ"; TAB(50); "³ 7 ³ ³
    ³ ³"
    PRINT " ÛÛ Û ÛÛ ÛÛ ÛÛ ÛÛÛ ÛÛ ÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT " ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ ÛÛ"; TAB(50); "³ 8 ³ ³
    ³ ³"
    PRINT " ÛÛ ÛÛ ÛÛÛÛ ÛÛ ÛÛ ÛÛÛÛÛ"; TAB(50);
    "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT TAB(50); "³ 9 ³ ³ ³ ³"
    PRINT TAB(50); "ÃÄÄÄÄÄÅÄÄÄÄÄÄÄÅÄÄÄÄÄÅÄÄÄ´"
    PRINT TAB(50); "³ 10 ³ ³ ³ ³"
    PRINT TAB(50); "ÀÄÄÄÄÄÁÄÄÄÄÄÄÄÁÄÄÄÄÄÁÄÄÄÙ"
    FOR X = 1 TO 4
    Hide$ = Hide$ + CHR$(PDQRand(5) + 49)
    NEXT X
    Done = 0
    Try = 0
    WHILE NOT Done
    Try = Try + 1
    IF Try > 10 THEN
    Done = -1
    LOCATE 21, 1
    PRINT "You lose - it was "; Hide$
    GOSUB Lose
    ELSE
    GOSUB GetGuess
    IF Hide$ <> Guess$ THEN
    GOSUB Evaluate
    ELSE
    GOSUB Evaluate
    Done = -1
    LOCATE 21, 1
    PRINT "You got it!"
    GOSUB Win
    END IF
    END IF
    WEND
    LOCATE , , 1
    END
    GetGuess:
    LOCATE 2 * Try + 2, 58
    Guess$ = ""
    Csr$ = "|/-\"
    Csr = LEN(Csr$)
    WHILE LEN(Guess$) <> 4
    Col = POS(0)
    DO
    X$ = INKEY$
    LOCATE , Col
    Csr = Csr + 1
    IF Csr > LEN(Csr$) THEN
    Csr = 1
    END IF
    PRINT MID$(Csr$, Csr, 1);
    Tim& = PDQTimer&
    DO
    LOOP WHILE Tim& = PDQTimer&
    LOOP WHILE X$ = ""
    LOCATE , Col
    IF X$ = CHR$(27) THEN
    CLS
    END
    ELSEIF X$ = CHR$(8) AND Guess$ <> "" THEN
    GOSUB BackSpace
    PRINT " ";
    LOCATE , Col - 1
    Guess$ = LEFT$(Guess$, LEN(Guess$) - 1)
    ELSEIF X$ > "0" AND X$ < "7" THEN
    GOSUB Letter
    Guess$ = Guess$ + X$
    PRINT X$;
    END IF
    WEND
    RETURN
    Evaluate:
    Copy$ = Hide$
    White = 0: Black = 0
    FOR X = 1 TO 4
    IF MID$(Copy$, X, 1) = MID$(Guess$, X, 1) THEN
    White = White + 1
    MID$(Copy$, X, 1) = CHR$(255)
    MID$(guess$, X, 1) = CHR$(254)
    END IF
    NEXT X
    FOR X = 1 TO 4
    FOR Y = 1 TO 4
    IF MID$(Copy$, X, 1) = MID$(guess$, Y, 1) THEN
    Black = Black + 1
    MID$(Copy$, X, 1) = CHR$(255)
    MID$(guess$, Y, 1) = CHR$(254)
    END IF
    NEXT Y
    NEXT X
    GOSUB Show
    LOCATE 2 * Try + 2, 67
    PRINT LTRIM$(STR$(White))
    LOCATE 2 * Try + 2, 72
    PRINT LTRIM$(STR$(Black))
    RETURN
    Letter:
    IF Effects THEN
    D& = Cpt&
    CALL QSound(200, D&)
    END IF
    RETURN
    Backspace:
    IF Effects THEN
    D& = Cpt&
    CALL QSound(500, D&)
    END IF
    RETURN
    Show:
    IF Effects THEN
    FOR Note = 1000 TO 1400 STEP 50
    D& = Cpt& \ 5
    CALL QSound(Note, D&)
    CALL QSound(Note - 300, D&)
    NEXT Note
    END IF
    RETURN
    Win:
    IF Effects THEN
    FOR Note = 100 TO 600 STEP 55
    D& = Cpt& \ 3
    CALL QSound(Note, D&)
    NEXT Note
    END IF
    RETURN
    Lose:
    IF Effects THEN
    FOR Note = 600 TO 100 STEP -55
    D& = Cpt& \ 3
    CALL QSound(Note, D&)
    NEXT Note
    END IF
    RETURN

    Now all you need is a PDS 7.0 compiler and Crescent's QuickPak and PDQ
    libraries to compile it...
     
    Frisbee®, Jul 20, 2005
    #36
  17. James

    kpg Guest

    Battleship!

    I wrote a battleship program on an Osborne II. (!)

    It used and advanced search algorithm to find your ships
    based on the size of reamining ships and the space you had
    to hide them it - using a kind of binary search to split a
    'hole' in the middle to get the best chance for a hit.

    It was hard to beat.

    Source code not readily abailable!

    kpg
     
    kpg, Jul 20, 2005
    #37
  18. James

    Jtyc Guest

    Texas Holdem

    Empire or Party Poker?
     
    Jtyc, Jul 20, 2005
    #38
  19. James

    Neil Guest

    I sent my Ferrari to Kat
     
    Neil, Jul 21, 2005
    #39
  20. James

    Neil Guest

    crap you're old :)
     
    Neil, Jul 21, 2005
    #40
    1. Advertisements

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.