i went to www.dbhaven.com
CLS
RANDOMIZE TIMER()
PRINT "Rules:"
PRINT "Place a bet. Roll two dice. If you get 6 or less, you win."
PRINT "If you get 7 or more, you lose. But if you get doubles,"
PRINT "you win double!"
PRINT
PRINT "Press a key to continue"
WHILE INKEY$() = ""
ENDWHILE
CLS
money = 100
DO
REPEAT
PRINT "You have ";money;" dollars"
INPUT "How much do you want to bet? ",bet
UNTIL bet > 0 AND bet <= money
die1 = RND(5)+1
die2 = RND(5)+1
CLS
PRINT "You rolled:"
PRINT " ",die1," ",die2
PRINT
total = die1 + die2
IF die1 = die2
PRINT "DOUBLES!"
money = money + (2 * bet)
ELSE
IF total < 7
PRINT "low roll! Good job!"
money = money + bet
ELSE
PRINT "high roll! oh no!"
money = money - bet
ENDIF
ENDIF
PRINT
IF money = 0
PRINT "Sorry! You lost!"
END
ENDIF
LOOP
and this is all a realy larned from the BOOK!
How can i start with pong?
-Troan
