Weekly Qbasic and Qb64 Lesson Topics
January 17, 2019, 06:10:40 pm
Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
News: Want to see a specific Tutorial? ASK!
  Home Help Search Arcade Links Staff List Login Register  

Chapt 2 Q-Basics

Pages: [1]
Author Topic: Chapt 2 Q-Basics  (Read 220 times)
Hero Member
Posts: 583

« on: September 07, 2011, 09:30:22 pm »

 Probably most of you want to get to qb64, instead of q-basics,...So I will be getting that started again too,...but for now here is this, From Chapter 2, I always enjoy this:
PRINT "Code taken from Ted Weisenburgers, q-basics Chapt 2,part 3"
PRINT "Count = "; amount%; "bags"
For row% = 2 to 27
Locate row%,28
COLOR 13: PRINT "the sky is falling!"
SOUND (2000/ row%),1  '//creates a slight delay
Locate row% - 1,28
PRINT SPACE$(19)'//The PRINT SPACE$(19) erases the previous line when a new line is printed.
NEXT row%
There is a lot more in chapt 2, of q-basics,... http://dl.dropbox.com/u/8440706/Q-Basics.zip Like I said, this works in qb64 too,...so is it qbasic, or qb64 ?
Report Spam   Logged

Pages: [1]
Jump to:  

Powered by EzPortal
Bookmark this site! | Upgrade This Forum
SMF For Free - Create your own Forum

Buy traffic for your forum/website
Powered by SMF | SMF © 2016, Simple Machines
Privacy Policy