Weekly Qbasic and Qb64 Lesson Topics
March 28, 2024, 12:19:52 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]
  Print  
Author Topic: Chapt 2 Q-Basics  (Read 291 times)
GarrisonRicketson
Admin
Administrator
Hero Member
*****
Posts: 583



WWW
« 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:
Code:
PRINT "Code taken from Ted Weisenburgers, q-basics Chapt 2,part 3"
PRINT "Count = "; amount%; "bags"
CLS
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

Share on Facebook Share on Twitter


Pages: [1]
  Print  
 
Jump to:  

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


Powered by SMF | SMF © 2016, Simple Machines
Privacy Policy