Qbasicnews.com

QBasic => QB Discussion & Programming Help => Topic started by: drjulio2003 on December 17, 2003, 05:19:47 PM



Title: Creating Main Menu - Problem
Post by: drjulio2003 on December 17, 2003, 05:19:47 PM
I can't quite finish this program that only creates a main menu.


Code:


DECLARE SUB CenterText (t$, y)
DECLARE SUB Keyboard (cube(), dark(), x, y, et)
DIM cube(1 TO 377)
DIM dark(1 TO 377)

CLS : SCREEN 13
   CenterText "Word Guessing", 0
   CenterText " ", 7
   CenterText "Start Program", 1
   CenterText "Get Help", 1
   CenterText "Quit", 1
   LINE (90, 79)-(99, 87), 0, BF
   GET (90, 79)-(99, 87), dark
   LINE (90, 79)-(99, 87), , B
   GET (90, 79)-(99, 87), cube
   x = 90: y = 79: et = 1
   Keyboard cube(), dark(), x, y, et
END

SUB CenterText (t$, y)
   FOR i = 1 TO y
      PRINT
   NEXT i
   x = (20 - INT(LEN(t$) / 2))
   PRINT TAB(x); t$
END SUB

SUB Keyboard (cube(), dark(), x, y, et)

   DO
   k$ = INKEY$
   IF k$ = CHR$(0) + CHR$(72) THEN
      xold = x: yold = y
      x = x - 15: y = y - 16
      et = et - 1
      PUT (xold, yold), cube, PSET
      IF x <= 85 THEN
         x = xold: y = yold
      END IF
      IF et <= 0 THEN
         et = 1
      END IF
   END IF
   IF k$ = CHR$(0) + CHR$(80) THEN
      et = et + 1
      xold = x: yold = y
      x = x + 15: y = y + 16
      PUT (x, y), cube, PSET
      PUT (xold, yold), dark, PSET
      IF x >= 120 THEN
         x = xold: y = yold
      END IF
      IF et >= 3 THEN
         et = 2
      END IF
   END IF
   LOOP

END SUB


Well, I know what the problem is, which is that the square block doesn't want to clear out the block when you press the up key, but how can I do this?  Thank you  for your help!  [/code]
Code:
Code:


Title: Creating Main Menu - Problem
Post by: HPLilSnowHP on December 17, 2003, 05:52:39 PM
Im not sure what it would be..But..What is your program designed to do


Title: I'm trying to create a Navigation Menu for my programs
Post by: drjulio2003 on December 17, 2003, 06:17:15 PM
I'm trying to create a Navigation Menu for my programs.


|_| Start Program
        Get Help
           Quit

down key press

      Start Program
   |_|  Get Help
            Quit
etc...
Code:


Title: Creating Main Menu - Problem
Post by: HPLilSnowHP on December 17, 2003, 06:51:29 PM
Oh..Thats kool..Id like to see what it looks like when u get finsihed if u dont mind....


Title: Here's what I'd do:
Post by: Meg on December 17, 2003, 07:46:45 PM
Create a variable called "CurrentSelection%" and have it set intially to 1.  Then make your keyboard routine do this (note.. this is pseudo-code):

Code:
DO
  DO
    k$ = INKEY$
  LOOP UNTIL k$ = (up arrow, down arrow, or enter key)

  Select Case k$
    case (up arrow)
      if CurrentSelection% > 1 then
        CurrentSelection% = CurrentSelection% - 1
        (Erase Box @ coordinates based off of CurrentSelection%)
        (Draw New Box @ coordinates based off of CurrentSelection%)
      end if

    case (down arrow)
      if CurrentSelection% < 3 then
        CurrentSelection% = CurrentSelection% + 1
        (Erase Box @ coordinates based off of CurrentSelection%)
        (Draw New Box @ coordinates based off of CurrentSelection%)
      end if

    case (enter key)
      EXIT SUB
  end select
LOOP


*peace*

Meg.


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on December 18, 2003, 01:02:46 PM
Ah better yet. Here i could get it working. See the difference. You had forgotten to add the put(xold, yold), dark, pset command to the if block where you moved that square thingy up.

Code:
DECLARE SUB CenterText (t$, y)
DECLARE SUB Keyboard (cube(), dark(), x, y, et)
DIM cube(1 TO 377)
DIM dark(1 TO 377)


CLS : SCREEN 13
   CenterText "Word Guessing", 0
   CenterText " ", 7
   CenterText "Start Program", 1
   CenterText "Get Help", 1
   CenterText "Quit", 1
   LINE (90, 79)-(99, 87), 0, BF
   GET (90, 79)-(99, 87), dark
   LINE (90, 79)-(99, 87), , B
   GET (90, 79)-(99, 87), cube
   x = 90: y = 79: et = 1
   Keyboard cube(), dark(), x, y, et
END

SUB CenterText (t$, y)
   FOR i = 1 TO y
      PRINT
   NEXT i
   x = (20 - INT(LEN(t$) / 2))
   PRINT TAB(x); t$
END SUB

SUB Keyboard (cube(), dark(), x, y, et)
STATIC xold AS INTEGER
STATIC yold AS INTEGER
xold = x
yold = y

   DO
   K$ = INKEY$
   IF K$ = CHR$(0) + CHR$(72) THEN
      'IF x <= 85 THEN
      '   x = xold: y = yold
      'END IF
      IF et > 1 THEN
         x = x - 15: y = y - 16
         et = et - 1
         PUT (x, y), cube, PSET
         PUT (xold, yold), dark, PSET
         xold = x: yold = y
      END IF
   END IF
   IF K$ = CHR$(0) + CHR$(80) THEN
      'IF x >= 120 THEN
      '   x = xold: y = yold
      'END IF
      IF et < 3 THEN
         et = et + 1
         x = x + 15: y = y + 16
         PUT (x, y), cube, PSET
         PUT (xold, yold), dark, PSET
         xold = x: yold = y
      END IF
   END IF
   LOOP UNTIL K$ = CHR$(27)

END SUB


Title: Almost complete program!
Post by: drjulio2003 on December 18, 2003, 02:53:57 PM
Code:
DECLARE SUB PrintMenu ()
DECLARE SUB Quit ()
DECLARE SUB StartProgram ()
DECLARE SUB GetHelp ()
DECLARE SUB CenterText (t$, y)
DECLARE SUB keyboard (cube(), dark(), x, y, et)
DIM cube(1 TO 377)
DIM dark(1 TO 377)


CLS : SCREEN 13
DO
   CALL PrintMenu
   LINE (90, 79)-(99, 87), 0, BF
   GET (90, 79)-(99, 87), dark
   LINE (90, 79)-(99, 87), , B
   GET (90, 79)-(99, 87), cube
   x = 90: y = 79: et = 1
   keyboard cube(), dark(), x, y, et
LOOP
END

SUB CenterText (t$, y)
   FOR i = 1 TO y
      PRINT
   NEXT i
   x = (20 - INT(LEN(t$) / 2))
   PRINT TAB(x); t$
END SUB

SUB GetHelp
CLS : SCREEN 13
   CenterText "Word Guessing", 2
   CenterText "The game is very simple:", 1
   CenterText "guess the word. The game will give", 1
   CenterText "you a clud, by having a significately ", 1
   CenterText "number of lines represented by how many ", 1
   CenterText "letters their are in the word. You'll", 1
   CenterText "have 9 tries, after that is game over. ", 1
   CenterText "Use the keyboard to guess the word.", 1
   CenterText "Press any key to continue", 5
   DO
   LOOP UNTIL INKEY$ <> ""
   CALL PrintMenu
END SUB

SUB keyboard (cube(), dark(), x, y, et)
   DO
   k$ = INKEY$
   IF k$ = CHR$(0) + CHR$(72) THEN
      xold = x: yold = y
      PUT (j, k), dark, PSET
      x = x - 15: y = y - 16
      j = j - 15: k = k - 16
      et = et - 1
      PUT (xold, yold), cube, PSET
      IF x <= 85 THEN
         x = xold: y = yold
      END IF
      IF et <= 0 THEN
         et = 1
      END IF
   END IF
   IF k$ = CHR$(13) THEN
      GOTO 1
   END IF
   IF k$ = CHR$(0) + CHR$(80) THEN
      et = et + 1
      xold = x: yold = y
      x = x + 15: y = y + 16
      PUT (x, y), cube, PSET
      PUT (xold, yold), dark, PSET
      j = 120: k = 111
      IF x >= 120 THEN
         x = xold: y = yold
      END IF
      IF et > 3 THEN
         et = 3
      END IF
   END IF
   LOOP
1 IF et = 1 THEN CALL StartProgram
IF et = 2 THEN CALL GetHelp
IF et = 3 THEN Quit
END SUB

SUB PrintMenu
CLS : SCREEN 13
   CenterText "Word Guessing", 0
   CenterText " ", 7
   CenterText "Start Program", 1
   CenterText "Get Help", 1
   CenterText "Quit", 1
   EXIT SUB
END SUB

SUB Quit
   CLS : SCREEN 0
   CenterText "Thank You for playing!", 0
   CenterText "Word Guessing", 0
   CenterText "Ver. 0.1", 1
   CenterText "Programmer: Julio Cruz", 0
   CenterText "P.S: Coming soon: Ver. 1.0", 0
   END
END SUB

SUB StartProgram
CLS : SCREEN 13
   FOR i = 1 TO 19
      PRINT " ";
   NEXT i
   tries = 9: PRINT "Tries: "; tries
   t$ = "QBasic": y = LEN(t$)
   CenterText " ", 10
   FOR i = 1 TO y
      PRINT "_ ";
   NEXT i
   k$ = INKEY$
   FOR i = 1 TO LEN(t$)
      IF k$ = CHR$(ASC(MID$(t$, i, 1))) THEN
         PRINT CHR$(ASC(MID$(t$, i, 1)))
         c = c + 1
      END IF
      IF k$ <> CHR$(ASC(MID$(t$, i, 1))) THEN
         tries = tries - 1
         PRINT k$
      END IF
   NEXT i
   DO
   LOOP UNTIL INKEY$ <> ""
END SUB



Title: Almost complete program!
Post by: drjulio2003 on December 18, 2003, 02:54:44 PM
Code:
DECLARE SUB PrintMenu ()
DECLARE SUB Quit ()
DECLARE SUB StartProgram ()
DECLARE SUB GetHelp ()
DECLARE SUB CenterText (t$, y)
DECLARE SUB keyboard (cube(), dark(), x, y, et)
DIM cube(1 TO 377)
DIM dark(1 TO 377)


CLS : SCREEN 13
DO
   CALL PrintMenu
   LINE (90, 79)-(99, 87), 0, BF
   GET (90, 79)-(99, 87), dark
   LINE (90, 79)-(99, 87), , B
   GET (90, 79)-(99, 87), cube
   x = 90: y = 79: et = 1
   keyboard cube(), dark(), x, y, et
LOOP
END

SUB CenterText (t$, y)
   FOR i = 1 TO y
      PRINT
   NEXT i
   x = (20 - INT(LEN(t$) / 2))
   PRINT TAB(x); t$
END SUB

SUB GetHelp
CLS : SCREEN 13
   CenterText "Word Guessing", 2
   CenterText "The game is very simple:", 1
   CenterText "guess the word. The game will give", 1
   CenterText "you a clud, by having a significately ", 1
   CenterText "number of lines represented by how many ", 1
   CenterText "letters their are in the word. You'll", 1
   CenterText "have 9 tries, after that is game over. ", 1
   CenterText "Use the keyboard to guess the word.", 1
   CenterText "Press any key to continue", 5
   DO
   LOOP UNTIL INKEY$ <> ""
   CALL PrintMenu
END SUB

SUB keyboard (cube(), dark(), x, y, et)
   DO
   k$ = INKEY$
   IF k$ = CHR$(0) + CHR$(72) THEN
      xold = x: yold = y
      PUT (j, k), dark, PSET
      x = x - 15: y = y - 16
      j = j - 15: k = k - 16
      et = et - 1
      PUT (xold, yold), cube, PSET
      IF x <= 85 THEN
         x = xold: y = yold
      END IF
      IF et <= 0 THEN
         et = 1
      END IF
   END IF
   IF k$ = CHR$(13) THEN
      GOTO 1
   END IF
   IF k$ = CHR$(0) + CHR$(80) THEN
      et = et + 1
      xold = x: yold = y
      x = x + 15: y = y + 16
      PUT (x, y), cube, PSET
      PUT (xold, yold), dark, PSET
      j = 120: k = 111
      IF x >= 120 THEN
         x = xold: y = yold
      END IF
      IF et > 3 THEN
         et = 3
      END IF
   END IF
   LOOP
1 IF et = 1 THEN CALL StartProgram
IF et = 2 THEN CALL GetHelp
IF et = 3 THEN Quit
END SUB

SUB PrintMenu
CLS : SCREEN 13
   CenterText "Word Guessing", 0
   CenterText " ", 7
   CenterText "Start Program", 1
   CenterText "Get Help", 1
   CenterText "Quit", 1
   EXIT SUB
END SUB

SUB Quit
   CLS : SCREEN 0
   CenterText "Thank You for playing!", 0
   CenterText "Word Guessing", 0
   CenterText "Ver. 0.1", 1
   CenterText "Programmer: Julio Cruz", 0
   CenterText "P.S: Coming soon: Ver. 1.0", 0
   END
END SUB

SUB StartProgram
CLS : SCREEN 13
   FOR i = 1 TO 19
      PRINT " ";
   NEXT i
   tries = 9: PRINT "Tries: "; tries
   t$ = "QBasic": y = LEN(t$)
   CenterText " ", 10
   FOR i = 1 TO y
      PRINT "_ ";
   NEXT i
   k$ = INKEY$
   FOR i = 1 TO LEN(t$)
      IF k$ = CHR$(ASC(MID$(t$, i, 1))) THEN
         PRINT CHR$(ASC(MID$(t$, i, 1)))
         c = c + 1
      END IF
      IF k$ <> CHR$(ASC(MID$(t$, i, 1))) THEN
         tries = tries - 1
         PRINT k$
      END IF
   NEXT i
   DO
   LOOP UNTIL INKEY$ <> ""
END SUB



Title: It's looking much better now!
Post by: drjulio2003 on December 18, 2003, 05:46:49 PM
Code:
[img]
http://www.gamespy.com/e32002/pc/carmack/carmack-s.jpg
DECLARE SUB PrintMenu ()
DECLARE SUB Quit ()
DECLARE SUB StartProgram ()
DECLARE SUB GetHelp ()
DECLARE SUB CenterText (t$, y)
DECLARE SUB keyboard (cube(), dark(), x, y, et)
DIM cube(1 TO 377)
DIM dark(1 TO 377)


CLS : SCREEN 13
DO
CALL PrintMenu
LINE (90, 79)-(99, 87), 0, BF
GET (90, 79)-(99, 87), dark
LINE (90, 79)-(99, 87), , B
GET (90, 79)-(99, 87), cube
x = 90: y = 79: et = 1
keyboard cube(), dark(), x, y, et
LOOP
END

SUB CenterText (t$, y)
FOR i = 1 TO y
PRINT
NEXT i
x = (20 - INT(LEN(t$) / 2))
PRINT TAB(x); t$
END SUB

SUB GetHelp
CLS : SCREEN 13
CenterText "Word Guessing", 2
CenterText "The game is very simple:", 1
CenterText "guess the word. The game will give", 1
CenterText "you a clud, by having a significately ", 1
CenterText "number of lines represented by how many ", 1
CenterText "letters their are in the word. You'll", 1
CenterText "have 9 tries, after that is game over. ", 1
CenterText "Use the keyboard to guess the word.", 1
CenterText "Press any key to continue", 5
DO
LOOP UNTIL INKEY$ <> ""
CALL PrintMenu
END SUB

SUB keyboard (cube(), dark(), x, y, et)
xold = x
yold = y
DO
k$ = INKEY$
IF k$ = CHR$(0) + CHR$(72) THEN
  IF x <= 85 THEN
              x = xold: y = yold
  END IF
  IF et > 1 THEN
     x = x - 15: y = y - 16
     et = et - 1
     PUT (x, y), cube, PSET
     PUT (xold, yold), dark, PSET
     xold = x: yold = y
  END IF
END IF
IF k$ = CHR$(0) + CHR$(80) THEN
  IF x >= 120 THEN
     x = xold: y = yold
  END IF
  IF et < 3 THEN
     et = et + 1
     x = x + 15: y = y + 16
     PUT (x, y), cube, PSET
     PUT (xold, yold), dark, PSET
     xold = x: yold = y
  END IF
END IF
LOOP UNTIL k$ = CHR$(13)

1 IF et = 1 THEN CALL StartProgram
IF et = 2 THEN CALL GetHelp
IF et = 3 THEN Quit
END SUB

SUB PrintMenu
CLS : SCREEN 13
CenterText "Word Guessing", 0
CenterText " ", 7
CenterText "Start Program", 1
CenterText "Get Help", 1
CenterText "Quit", 1
EXIT SUB
END SUB

SUB Quit
CLS : SCREEN 0
CenterText "Thank You for playing!", 0
CenterText "Word Guessing", 0
CenterText "Ver. 0.1", 1
CenterText "Programmer: DrJulio2003", 0
CenterText "Credit To: TheBigBasicQ", 0
CenterText "P.S: Coming soon: Ver. 1.0", 0
END
END SUB

SUB StartProgram
CLS : SCREEN 13
FOR i = 1 TO 19
   PRINT " ";
NEXT i

tries = 9: PRINT "Tries: "; tries

t$ = "QBasic": y = LEN(t$)

CenterText " ", 10

FOR i = 1 TO y
   PRINT "_ ";
NEXT i

DO
k$ = INKEY$
IF k$ = CHR$(0) + CHR$(80) THEN
   t = ASC(MID$(t$, i, 1))
      PRINT t, CHR$(t)
   END IF
LOOP UNTIL k$ = CHR$(13)
END SUB
[/img]


Title: I can't finish project!
Post by: drjulio2003 on January 04, 2004, 09:10:15 PM
Man, can you believe that I can't finish this simple program, but we did complete our objective which that is create a simple main menu that the user can use with there keyboard:

Code:
DECLARE SUB PrintMenu ()
DECLARE SUB Quit ()
DECLARE SUB StartProgram (tries, y, letters$())
DECLARE SUB GetHelp ()
DECLARE SUB CenterText (t$, y)
DECLARE SUB keyboard (cube(), dark(), x, y, et, letters$())
DIM cube(1 TO 377)
DIM dark(1 TO 377)
DIM letters$(1 TO 50)

CLS : SCREEN 13
DO
CALL PrintMenu
LINE (90, 79)-(99, 87), 0, BF
GET (90, 79)-(99, 87), dark
LINE (90, 79)-(99, 87), , B
GET (90, 79)-(99, 87), cube
x = 90: y = 79: et = 1
keyboard cube(), dark(), x, y, et, letters$()
LOOP
END

SUB CenterText (t$, y)
FOR I = 1 TO y
PRINT
NEXT I
x = (20 - INT(LEN(t$) / 2))
PRINT TAB(x); t$
END SUB

SUB GetHelp
CLS : SCREEN 13
CenterText "Word Guessing", 2
CenterText "The game is very simple:", 1
CenterText "guess the word. The game will give", 1
CenterText "you a clud, by having a significately ", 1
CenterText "number of lines represented by how many ", 1
CenterText "letters their are in the word. You'll", 1
CenterText "have 9 tries, after that is game over. ", 1
CenterText "Use the keyboard to guess the word.", 1
CenterText "Press any key to continue", 5
DO
LOOP UNTIL INKEY$ <> ""
CALL PrintMenu
END SUB

SUB keyboard (cube(), dark(), x, y, et, letters$())
xold = x
yold = y
tries = 9
DO
k$ = INKEY$
IF k$ = CHR$(0) + CHR$(72) THEN
IF x <= 85 THEN
x = xold: y = yold
END IF
IF et > 1 THEN
x = x - 15: y = y - 16
et = et - 1
PUT (x, y), cube, PSET
PUT (xold, yold), dark, PSET
xold = x: yold = y
END IF
END IF
IF k$ = CHR$(0) + CHR$(80) THEN
IF x >= 120 THEN
x = xold: y = yold
END IF
IF et < 3 THEN
et = et + 1
x = x + 15: y = y + 16
PUT (x, y), cube, PSET
PUT (xold, yold), dark, PSET
xold = x: yold = y
END IF
END IF
LOOP UNTIL k$ = CHR$(13)

1 IF et = 1 THEN CALL StartProgram(tries, y, letters$())
IF et = 2 THEN CALL GetHelp
IF et = 3 THEN Quit
END SUB

SUB PrintMenu
CLS : SCREEN 13
CenterText "Word Guessing", 0
CenterText " ", 7
CenterText "Start Program", 1
CenterText "Get Help", 1
CenterText "Quit", 1
EXIT SUB
END SUB

SUB Quit
CLS : SCREEN 0
CenterText "Thank You for playing!", 0
CenterText "Word Guessing", 0
CenterText "Ver. 0.1", 1
CenterText "Programmer: DrJulio2003", 0
CenterText "Credit To: TheBigBasicQ", 0
CenterText "P.S: Coming soon: Ver. 1.0", 0
END
END SUB

SUB StartProgram (tries, y, letter$())
RANDOMIZE TIMER
DIM wlenth(1 TO 50)
DIM word$(1 TO 10)

CLS : SCREEN 13
word$(1) = "board"
word$(2) = "globe"
word$(3) = "touch"
word$(4) = "building"
word$(5) = "eleminate"
word$(6) = "elevator"
word$(7) = "investigator"
word$(8) = "alagator"
word$(9) = "eagle"
word$(10) = "bird"

FOR I = 1 TO 30
PRINT " ";
NEXT I
PRINT "Tries:"; tries
high = 10
low = 1
t = INT(RND * (high - low + 1) + low)
PRINT t
n = LEN(word$(t))
FOR I = 1 TO n
PRINT "_ ";
NEXT I
CenterText " ", 11
END SUB



Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 05, 2004, 03:52:16 PM
Why do you keep posting the code?


Title: Creating Main Menu - Problem
Post by: KiZ on January 05, 2004, 04:00:30 PM
Yea, would you mind maybe hosting the updated files elsewhere, then linking to them next time please. Large Code posts like that take up room on the server.


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 05, 2004, 04:02:53 PM
Server space isnt much of a concern. It is very annoying to read a tiny post with such a huge amount of code attached to it  :???:


Title: Creating Main Menu - Problem
Post by: KiZ on January 05, 2004, 04:16:04 PM
Fair enough, but it would be a lot easier than scrolling down through 10s of pages of code, yes? =D


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 05, 2004, 04:19:11 PM
You're picking up my style =D


Title: Creating Main Menu - Problem
Post by: KiZ on January 05, 2004, 05:36:36 PM
=P


Title: Creating Main Menu - Problem
Post by: wildcard on January 05, 2004, 07:07:39 PM
If you need some space to put up code you can email it to me (webmaster@qbasicnews.com).

Maybe we should have an easy simple code/text upload feature..?


Title: Creating Main Menu - Problem
Post by: SCM on January 05, 2004, 07:56:30 PM
Since there hadn't been any posts between his, all he needed to do is edit his posts, replacing the old code with the new code, and making any necessary comments in an "Edit: " line.


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 06, 2004, 06:27:17 AM
We need to teach him =P


Title: Creating Main Menu - Problem
Post by: Anonymous on January 06, 2004, 09:01:50 AM
Quote from: "wildcard"
If you need some space to put up code you can email it to me (webmaster@qbasicnews.com).

Maybe we should have an easy simple code/text upload feature..?


thats actually a really good idea! if you made something like that we could have a resident collection to browse, and to refer people to if the code they needed was in there.


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 06, 2004, 01:16:14 PM
Yeah and we could put up the most common examples for problems on arrays and other stuff. So if someone asks a question how does an array work we can just refer him to one or many of the examples on arrays =P


Title: Creating Main Menu - Problem
Post by: na_th_an on January 06, 2004, 01:24:16 PM
like the http://faq.qbasicnews.com ?


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 06, 2004, 01:45:55 PM
No, a searchable database. Like a download centre or something =P


Title: Creating Main Menu - Problem
Post by: Neo on January 07, 2004, 07:58:47 AM
Have patience... ;)


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 07, 2004, 08:01:09 AM
What?


Title: Creating Main Menu - Problem
Post by: Neo on January 07, 2004, 08:03:52 AM
It'll come, it'll come :roll:


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 07, 2004, 08:07:41 AM
Spammer!


Title: Creating Main Menu - Problem
Post by: Neo on January 07, 2004, 08:09:52 AM
=P

Well, I don't think that entitlement is correct, because I didn't actually refer to a site or database that contained what you wanted. I just implied that by reading your message, *someone* is going to take the task ;).


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 07, 2004, 08:16:25 AM
Quote from: "Neo"
It'll come, it'll come :roll:


I was refering to this post =)


Title: Creating Main Menu - Problem
Post by: Neo on January 07, 2004, 08:19:05 AM
Hmn. I just state there that it will come, in general terms... But I think I can see your point of view now... ;)


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 07, 2004, 08:21:47 AM
I'm glad =)


Title: Creating Main Menu - Problem
Post by: Neo on January 07, 2004, 08:24:44 AM
Good :) Now... let's not go too far offtopic. Right? Right. ;)


Title: Creating Main Menu - Problem
Post by: TheBigBasicQ on January 07, 2004, 01:26:27 PM
Agreed =P