The MGC

[speedlemon]

The challenge is make a game that takes up smallest space possible on the screen.  Here is an example in case you don't understand me.  

Download MiniPong.zip

I am probably going to make at least one more and spend more time on it.  Well I'm looking forward to what some of you create.

There is no     line, but please make a post if you plan on joining, so I have a feel on how many prizes I should make.

[Dr_Davenstein]

1 line of text...  :lol:

Code:

'Compile with -s gui ;)
#Include "fbgfx.bi"

Option Explicit
ScreenRes 24,8
Randomize Timer
Dim As Integer Win_Col, c_Col, Last_Key
Dim As String In

Win_Col = Int(Rnd*255)

Do
    c_Col=(c_Col+1) MOD 255
    Locate 1,1
    Print Ltrim$(Str$(c_Col))
   
    If Multikey(Sc_Space) Then
        If Last_Key<>Sc_Space Then
            Last_Key = Sc_Space
            If c_Col = Win_Col Then
                Beep
                Exit do
            End If
        End If
    Else
        Last_Key = -1
    End If
Loop Until  Multikey(Sc_Escape)

[speedlemon]

Nice job.  I couldn't figure out what to do though.  But it looks like it could be pretty fun once I get used to it.

[Dr_Davenstein]

At the beginning, a random number from 0 to 255 is chosen. It then runs in a loop, counting from 0 to 255. If you press the space bar at the moment the counter equals the first random number, you win!  :lol:

[speedlemon]

That's a good and creative idea for a small game. I will play it again now I think I have the hang of the rules.

Anyone else plan on entering?

[anarky]

I actually made something similar to this a few years ago but lost it in the last major system failure I had... It was called "Wheel" and was like roulette. You chose a number and bet an amount of money. The wheel spun, and if it landed on a number you chose (between 1 and 10) you doubled your wager. Or else you lost it.

I was thinking some time back "should I make it again?" Then decided against it...

>anarky