what are libraries?
Posted: Sun Aug 21, 2005 3:14 pm
what are libraries?
Discuss QBasic, Freebasic, QB64 and more
http://petesqbsite.com/phpBB3/
Code: Select all
SUB TYPE(TEXT01$, X01, Y01)
FOR i = 1 TO LEN(TEXT01$)
T! = TIMER
PTRL$ += MID$(TEXT01$, i, 1)
LOCATE Y01, X01: PRINT PTRL$;
DO: LOOP UNTIL (TIMER - T!) >= .2
NEXT
END SUB
Code: Select all
DECLARE SUB TYPE(TEXT01$, X01, Y01)
TYPE "Hello, world", 1, 1
SLEEP
SUB TYPE(TEXT01$, X01, Y01)
FOR i = 1 TO LEN(TEXT01$)
T! = TIMER
PTRL$ += MID$(TEXT01$, i, 1)
LOCATE Y01, X01: PRINT PTRL$;
DO: LOOP UNTIL (TIMER - T!) >= .2
NEXT
END SUB
Code: Select all
'$include: 'type.bi'
TYPE "Hello, world", 1, 1
SLEEP
Take my above example,. insted of doing this every time I want a typing effect:Dictionary.com wrote:Routine
Computer Science. A set of programming instructions designed to perform a specific limited task.
Code: Select all
TEXT01$ = "Hello, world": X01 = 1: Y01 = 1
FOR i = 1 TO LEN(TEXT01$)
T! = TIMER
PTRL$ += MID$(TEXT01$, i, 1)
LOCATE Y01, X01: PRINT PTRL$;
DO: LOOP UNTIL (TIMER - T!) >= .2
NEXT
TEXT01$ = "How are you?": X01 = 1: Y01 = 2
FOR i = 1 TO LEN(TEXT01$)
T! = TIMER
PTRL$ += MID$(TEXT01$, i, 1)
LOCATE Y01, X01: PRINT PTRL$;
DO: LOOP UNTIL (TIMER - T!) >= .2
NEXT
Code: Select all
TYPE "Hello, world", 1, 1
TYPE "How are you?", 1, 2
SUB TYPE(TEXT01$, X01, Y01)
FOR i = 1 TO LEN(TEXT01$)
T! = TIMER
PTRL$ += MID$(TEXT01$, i, 1)
LOCATE Y01, X01: PRINT PTRL$;
DO: LOOP UNTIL (TIMER - T!) >= .2
NEXT
END SUB
Large buildings with many objects inside called "books"...they contain these things called "pages", on which are written "words".... or guest or ???? wrote:what are libraries?
Look in the tutorials on Pete's site, specifically on commands like BSAVE, BLOAD, GET, PUT, and stuff like that.... or guest or ???? wrote:o i think i get it more now
o yeah is there an easier way to do graphics than using that data table thingy because it takes forever to draw 1 small picture
Yes, I agree with Dave.. way to go Nek.. *shakes head*... or guest or ???? wrote:and that was really helpful Nek, if i was 10 years younger