Text Only | Text with Attachments

QB64.org Forum

Active Forums => Programs => Topic started by: FellippeHeitor on February 13, 2019, 04:41:44 pm

Title: Now for something truly useful: babyShark.bas
Post by: FellippeHeitor on February 13, 2019, 04:41:44 pm
Perks of having a baby:

Code: QB64: [Select]
  1. DIM family$(1 TO 5)
  2. family$(1) = "Baby"
  3. family$(2) = "Mommy"
  4. family$(3) = "Daddy"
  5. family$(4) = "Grandma"
  6. family$(5) = "Grandpa"
  7.  
  8. FOR i = 1 TO 5
  9.     FOR j = 1 TO 3
  10.         PRINT family$(i); " shark, ";
  11.         FOR k = 1 TO 6
  12.             PRINT "doo ";
  13.         NEXT
  14.         PRINT
  15.     NEXT
  16.     PRINT family$(i); " shark!"
  17.     PRINT

If you have no idea what that is:
Title: Re: Now for something truly useful: babyShark.bas
Post by: Pete on February 13, 2019, 05:06:19 pm
For loops? Didn't you want DO-DO Loops?

Hey, did you have another bambino? If so, congrats! If it's just the "old" baby, don't worry, they grow out of the diaper stage eventually. The grey hairs never turn back, though.

Pete
Title: Re: Now for something truly useful: babyShark.bas
Post by: FellippeHeitor on February 13, 2019, 05:08:17 pm
Still my firstborn.

I wish I had a head full of gray hair, but I'm on to the bald route.
Text Only | Text with Attachments