Welcome guest. Before posting on our computer help forum, you must register. Click here it's easy and free.

Author Topic: Who Want's to be a... Billionaire...?  (Read 7505 times)

0 Members and 1 Guest are viewing this topic.

Artimis.Rules

    Topic Starter


    Greenhorn

    Who Want's to be a... Billionaire...?
    « on: December 10, 2008, 07:39:12 PM »
    Yes I meant to put Billionaire. I got *extremely* bored recently... Popped open VB08... And saw what came out.

    Yes, this is inspired by the TV show "Who Wants to be a Millionaire"© and credit for the idea goes to them. I don't plan to sell this, and, I repeat, I just got bored. SO TAKE THAT LAWYERS!!

    Heh. Couldn't resist. ^.^

    So to the real reason your reading this:

    I made a game where you can play through up-to 15 questions to see if you win the big 1 - 000 - 000 - 000

    and once your done, you can load a different .txt file, and have the fun all over!

    But, what if you've played all the one's your friends have sent you?

    And you want to return the favor?

    Simple. Just open a new text document. Set up the text file like this.
    Code: [Select]
    #1: Introduction Question
    #2: Your first question
    #3: First question's A answer
    #4: First question's B answer
    #5: First question's C answer
    #6: First question's D answer
    #7: THE LETTER OF THE CORRECT ANSWER
    #8: The first question's Subject TYPE
    #9: Repeat 2-8 with different questions/answers.
    and don't put the #3: or whatever.

    Say you get to question 4.. then you can't think of anything more.. just put "end" in the next question's "question" section.

    Also -- "end" and the letter of the correct answer are both case sensitive.

    Well -- You ready to have fun? here ch'a go.
    http://www.mediafire.com/download.php?ghio2yurkxl

    Please mention any bugs, glitches, and suggestions.

    Special thanks to Kaelan.

    Thanks for your time,
    Artimis.

    EDIT: Extract the "billionz" folder to your C drive.

    EDIT:

    Game in the designer
    http://www.flickr.com/photos/17676123@N02/3099620724/in/photostream/

    The game as you are loading a .txt file
    http://www.flickr.com/photos/17676123@N02/3099617954/in/photostream/

    Mid-Question (the answer's D! =P)
    http://www.flickr.com/photos/17676123@N02/3098785881/in/photostream/
    « Last Edit: December 10, 2008, 08:34:45 PM by Artimis.Rules »

    Carbon Dudeoxide

    • Global Moderator

    • Mastermind
    • Thanked: 169
      • Yes
      • Yes
      • Yes
    • Certifications: List
    • Experience: Guru
    • OS: Mac OS
    Re: Who Want's to be a... Billionaire...?
    « Reply #1 on: December 10, 2008, 07:47:01 PM »
    For some reason.....I don't feel like trying it.....

    Artimis.Rules

      Topic Starter


      Greenhorn

      Re: Who Want's to be a... Billionaire...?
      « Reply #2 on: December 10, 2008, 08:05:08 PM »
      :( You sadden me Carbon Dudeoxide

      Armor

      • Guest
      Re: Who Want's to be a... Billionaire...?
      « Reply #3 on: December 10, 2008, 08:07:37 PM »
      Quite a fun little game and a nice way to kill some time. Ease of customization is nice too.

      CBMatt

      • Mod & Malware Specialist


      • Prodigy

      • Sad and lonely...and loving every minute of it.
      • Thanked: 167
        • Yes
      • Experience: Experienced
      • OS: Windows 7
      Re: Who Want's to be a... Billionaire...?
      « Reply #4 on: December 10, 2008, 08:12:23 PM »
      I personally don't trust it.  Why does it need to connect to the internet to download files?  Doesn't sound like that complex of a program to me.  And who exactly is it connecting to?
      Quote
      An undefined problem has an infinite number of solutions.
      —Robert A. Humphrey

      CBMatt

      • Mod & Malware Specialist


      • Prodigy

      • Sad and lonely...and loving every minute of it.
      • Thanked: 167
        • Yes
      • Experience: Experienced
      • OS: Windows 7
      Re: Who Want's to be a... Billionaire...?
      « Reply #5 on: December 10, 2008, 08:21:07 PM »
      Hmm, I tried running it in a sandboxed environment, but it stopped responding.  You feel like giving it a shot, Carbon?  (Despite your previous response...  Heh.)
      Quote
      An undefined problem has an infinite number of solutions.
      —Robert A. Humphrey

      Artimis.Rules

        Topic Starter


        Greenhorn

        Re: Who Want's to be a... Billionaire...?
        « Reply #6 on: December 10, 2008, 08:22:34 PM »
        Connect to the internet? WTH...

        Would some screenies convince you?

        Carbon Dudeoxide

        • Global Moderator

        • Mastermind
        • Thanked: 169
          • Yes
          • Yes
          • Yes
        • Certifications: List
        • Experience: Guru
        • OS: Mac OS
        Re: Who Want's to be a... Billionaire...?
        « Reply #7 on: December 10, 2008, 08:23:52 PM »
        :( You sadden me Carbon Dudeoxide
        Well firstly, you're new here and you've uploaded an unknown file.........

        CBMatt

        • Mod & Malware Specialist


        • Prodigy

        • Sad and lonely...and loving every minute of it.
        • Thanked: 167
          • Yes
        • Experience: Experienced
        • OS: Windows 7
        Re: Who Want's to be a... Billionaire...?
        « Reply #8 on: December 10, 2008, 08:27:20 PM »
        Connect to the internet? WTH...

        Would some screenies convince you?

        I'm testing something out first...let me get back to you on that in a few minutes.
        Quote
        An undefined problem has an infinite number of solutions.
        —Robert A. Humphrey

        Artimis.Rules

          Topic Starter


          Greenhorn

          Re: Who Want's to be a... Billionaire...?
          « Reply #9 on: December 10, 2008, 08:30:33 PM »
          Ok -- Images uploading to flikr -- bout half done as i'm typing this. Will mod this post and the prime one with the URL's.

          EDIT:

          Game in the designer
          http://www.flickr.com/photos/17676123@N02/3099620724/in/photostream/

          The game as you are loading a .txt file
          http://www.flickr.com/photos/17676123@N02/3099617954/in/photostream/

          Mid-Question (the answer's D! =P)
          http://www.flickr.com/photos/17676123@N02/3098785881/in/photostream/

          Ivy

          • CH Queen


          • Specialist

            Thanked: 50
            Re: Who Want's to be a... Billionaire...?
            « Reply #10 on: December 10, 2008, 08:43:13 PM »
            Artimis.Rules and the person who recommends that game ''Armor '' both their names start with A.....So I won't try it!

            p.s. A for Annon
            Use what talent you possess.
            The woods would be very silent
            If no birds sang except those that sang best-
            Henry Van Dyke

            Artimis.Rules

              Topic Starter


              Greenhorn

              Re: Who Want's to be a... Billionaire...?
              « Reply #11 on: December 10, 2008, 08:47:30 PM »
              Our names start with A. Wow. Congradulations you learned your alphabet... atleast 1/27th of it.

              He's a friend. His name is KAELAN. Gave a special thanks to him up in the main post.

              Carbon Dudeoxide

              • Global Moderator

              • Mastermind
              • Thanked: 169
                • Yes
                • Yes
                • Yes
              • Certifications: List
              • Experience: Guru
              • OS: Mac OS
              Re: Who Want's to be a... Billionaire...?
              « Reply #12 on: December 10, 2008, 08:48:03 PM »
              Our names start with A. Wow. Congradulations you learned your alphabet... atleast 1/27th of it.
              26.........

              Artimis.Rules

                Topic Starter


                Greenhorn

                Re: Who Want's to be a... Billionaire...?
                « Reply #13 on: December 10, 2008, 08:48:56 PM »
                Mis-hit. Jeez.

                Ivy

                • CH Queen


                • Specialist

                  Thanked: 50
                  Re: Who Want's to be a... Billionaire...?
                  « Reply #14 on: December 10, 2008, 08:49:48 PM »
                  Umm do I need to say more LOL

                  Thanks respected Moderator.
                  Use what talent you possess.
                  The woods would be very silent
                  If no birds sang except those that sang best-
                  Henry Van Dyke

                  Carbon Dudeoxide

                  • Global Moderator

                  • Mastermind
                  • Thanked: 169
                    • Yes
                    • Yes
                    • Yes
                  • Certifications: List
                  • Experience: Guru
                  • OS: Mac OS
                  Re: Who Want's to be a... Billionaire...?
                  « Reply #15 on: December 10, 2008, 08:53:43 PM »
                  Hmm, I tried running it in a sandboxed environment, but it stopped responding.  You feel like giving it a shot, Carbon?  (Despite your previous response...  Heh.)
                  I'll try it on my old unused laptop later if I remember.  :D

                  CBMatt

                  • Mod & Malware Specialist


                  • Prodigy

                  • Sad and lonely...and loving every minute of it.
                  • Thanked: 167
                    • Yes
                  • Experience: Experienced
                  • OS: Windows 7
                  Re: Who Want's to be a... Billionaire...?
                  « Reply #16 on: December 10, 2008, 08:56:56 PM »
                  Looks like all it downloads is the .NET Framework 3.5 SP1 (if you don't already have it installed).  I can't get the game to work properly for me, but so far, it doesn't appear to have any malicious signatures or activities.  It should be okay for anyone to try it out if they wish to do so.  Of course, everyone should always exercise caution when downloading unfamiliar files.  Everything has come back clean, but you can never be 100% certain, so download at your own discretion.
                  Quote
                  An undefined problem has an infinite number of solutions.
                  —Robert A. Humphrey

                  Artimis.Rules

                    Topic Starter


                    Greenhorn

                    Re: Who Want's to be a... Billionaire...?
                    « Reply #17 on: December 10, 2008, 08:58:43 PM »
                    ...if I remember.  :D

                    Do remember. Anyone with VB08 with SP1 and really cares, here is the source. (Code is a bit bloated, i know. I'm working on it [2077 lines])

                    http://www.mediafire.com/download.php?cnywizmgklt

                    Artimis.Rules

                      Topic Starter


                      Greenhorn

                      Re: Who Want's to be a... Billionaire...?
                      « Reply #18 on: December 10, 2008, 08:59:38 PM »
                      Yaay! I have trust with evidence! =P

                      Sorry, had to.

                      Sorry for the double-post BTW.

                      BC_Programmer


                        Mastermind
                      • Typing is no substitute for thinking.
                      • Thanked: 1140
                        • Yes
                        • Yes
                        • BC-Programming.com
                      • Certifications: List
                      • Computer: Specs
                      • Experience: Beginner
                      • OS: Windows 11
                      Re: Who Want's to be a... Billionaire...?
                      « Reply #19 on: December 10, 2008, 09:54:45 PM »
                      Do remember. Anyone with VB08 with SP1 and really cares, here is the source. (Code is a bit bloated, i know. I'm working on it [2077 lines])


                      Visual Studio Professional '08...

                      I'll take a gander when I'm bored. might have suggestions... if you're open to them.

                      I was trying to dereference Null Pointers before it was cool.

                      BC_Programmer


                        Mastermind
                      • Typing is no substitute for thinking.
                      • Thanked: 1140
                        • Yes
                        • Yes
                        • BC-Programming.com
                      • Certifications: List
                      • Computer: Specs
                      • Experience: Beginner
                      • OS: Windows 11
                      Re: Who Want's to be a... Billionaire...?
                      « Reply #20 on: December 10, 2008, 10:23:49 PM »
                      Alright, took a quick look see at yer code; got some tips for you.


                      First; the four buttons appear to run the same code, but in four different places (Click events)

                      I recommend creating a separate procedure- for example, "CheckAnswer", which will take A,B,C, or D as it's argument.

                      then, each of your four buttons will be one line; "CheckAnswer("A")" for button A, and so forth. I could hazard a guess and say you've never used separate subroutines, which is OK, but they make programming a lot easier, and you can never learn them too early.


                      Also; you've got no error handling code. While this is acceptable for a Alpha or beta, it never hurts; and you can never add, (or learn how to write) them too early.


                      For example, in Button2_Click, where you open the text file whose name resides in textbox2 (love your imaginative names, btw  ;D) the readAlllines() call could easily fail; rather then have your game crash with a generic framework error, you could enclose the procedure code in Try...Catch Block, and then provide a more descriptive error to your users. I'd be more specific, but I'd Rather be accurate then dead wrong, and I'm far more experienced with VB6 then .NET... In fact I almost suggested the use of an "On Error" statement, but that doesn't exist in .NET, and if it does it was deprecated by try...catch.

                      Last critique would be to rename your controls. I happened under the same problem when I learned VB way back with Visual basic 2 on Windows 3.1; I simply used the default names. Nowadays I wonder why it even provides a default name... under how many circumstances does the name "Command1" or "Text1" describe the controls purpose? Not often, I'm sure. Even today, over 15 years later, the default behaviour for control naming is exactly the same as it was in 1991. On the up-side, they actually changed the menu editor after VB6 (although they changed pretty much everything and it only stood to reason that they would also revamp the 15 year old menu editor)

                      lastly- your use of the "lines()" array seems a but non-linear; from what I can gather, it contains the various questions. a more extensible method would be to use a integral variable to store your question number; them multiply that question number by 7(number of lines in each questions definition), and add 1 (the introduction question); this will give you the first line (hopefully) for the question; you can then add the numbers 1 through 6 to extract the various portions of the questions data.



                      I'd add some more positive stuff here, but I think my years of experience makes me a bit blind to what I used to think was neat and cool years ago. In any case, I commend your efforts ;)


                      I was trying to dereference Null Pointers before it was cool.

                      Artimis.Rules

                        Topic Starter


                        Greenhorn

                        Re: Who Want's to be a... Billionaire...?
                        « Reply #21 on: December 11, 2008, 05:00:29 PM »
                        On the part about my code being bloated -- I know. Been working on it. Like this?:

                        Code: [Select]
                        If qnum = "1" Then
                                    readline = lines(6)
                                    If readline = "a" And correctanswer = "a" Or readline = "b" And correctanswer = "b" Or readline = "c" And correctanswer = "c" Or readline = "d" And correctanswer = "d" Then
                                        MsgBox("CORRECT!")
                                        'Question
                                        readline = lines(8)
                                        Question.Text = readline
                                        'AnsA
                                        readline = lines(9)
                                        AnsA.Text = readline
                                        'AnsB
                                        readline = lines(10)
                                        AnsB.Text = readline
                                        'AnsC
                                        readline = lines(11)
                                        AnsC.Text = readline
                                        'AnsD
                                        readline = lines(12)
                                        AnsD.Text = readline
                                        qnum = "2"
                                        Timer1.Enabled = True
                                        correctanswer = lines(13)
                                    Else
                                        MsgBox("INCORRECT!")
                                        qnum = "start"
                                        readline = lines(0)
                                        Question.Text = readline
                                        AnsA.Text = "Yes"
                                        AnsB.Text = "No"
                                        AnsC.Visible = False
                                        AnsD.Visible = False
                                    End If
                                End If



                                If qnum = "start" Then
                                    AnsC.Visible = True
                                    AnsD.Visible = True
                                    'Question
                                    readline = lines(1)
                                    Question.Text = readline
                                    'AnsA
                                    readline = lines(2)
                                    AnsA.Text = readline
                                    'AnsB
                                    readline = lines(3)
                                    AnsB.Text = readline
                                    'AnsC
                                    readline = lines(4)
                                    AnsC.Text = readline
                                    'AnsD
                                    readline = lines(5)
                                    AnsD.Text = readline
                                    qnum = "1"
                                    correctanswer = lines(6)
                                End If
                                If Question.Text = "end" Then
                                    MsgBox("Congradulations! You have completed this version of 'Who Wants to Be a Billionaire?'!")
                                    qnum = "start"
                                    readline = lines(0)
                                    Question.Text = readline
                                    AnsA.Text = "Yes"
                                    AnsB.Text = "No"
                                    AnsC.Visible = False
                                    AnsD.Visible = False
                                End If

                        I know about renaming the commands and such -- Those few controls we're my most recent addition... and aren't exactly up-to-par yet

                        The rest was like a toothpick against a brick wall. Not sure what you said lol.

                        EDIT: Going to start a new VB Project, copy the basic parts of code and the objects into it, then re-work the "Answer selection, checking, and changing question"-part