QuickBasic Cafe Forum

These r my system specs :

SIS K7S6A mainboard
AMD 1800 Mhz processor
1 gig of memory ; 1 512 MB stick ; 2 256 MB stick
Radeon 9600 SE grafics card
37 gig hard drive
3 12.5 V fans
400 Watt power supply

Nothing is overclocked.

At first when I installed the 512 MB stick the comp would run for only 5 ...

i tried this :
CLS
FOR i = 1 TO 64
LET TIME = TIMER
DO
LET a$ = INKEY$
LOOP UNTIL TIMER = TIME + 5
LET b = LEN(a$)
IF b = 1 THEN
PRINT "the key u pressed is 1 characters long"
ELSEIF b = 2 THEN
PRINT "the key u pressed is 2 characters long"
END IF
PRINT i
INPUT "proceed?", dummy$
NEXT i
PRINT ...

can somebody plz tell me how F1-12 , Ctrl , Alt and shift are identified by inkey$? (i won't be rude like that anymore)

ok jonathon the simplest sort is the buble sort. it sorts by comparing neighboring variables and swaping them if they're out of order. it's not very efficient when using lists above 30 items. u program it like this

for a=1 to 4
for b=1 to 5
if var(b) < var(b+1) then
swap var(b) , var(b+1)
end if ...

well it would be nice to see the program that i helped to create (unless u r charging money for it)...

if u mean can u store information in a txt file (either making a new one or adding to and already existing 1 then u can. u do something like this :

open filespec.txt for append as 1
let a$="yacinator"
write# 1, a$
close# 1

now to import text u go like this :

open filespec.txt for input as 1
input ...

thx and i'm srry u were right &nbsp;

no chr4(27) is not esc it's left arrow!!!!! . can somebody tell me how to make inkey$ id arrow keys and stuff the thing that was in the book i tried but it doesn't work

just one little thing. i looked up the inkey$ statement in a book from which i'm learnig qbasic and it said that keys like esc or arrow keys are identified by 2 chr$ statements : chr$(0) and chr$(32) (space). but in the ascii table there's no chr$ esc. can somebody tell me how inkeky$ id's esc plz

thanks it worked &nbsp;

Can somebody please tell me how to use the inkey$ thing? I tried something like this :


CLS
LET a$=INKEY$
IF a$="a" THEN
PRINT "left"
ELSEIF a$="d" THEN
PRINT "right"
ENDIF
END


and I get a blank screen with "press any key to continue". I press a key and it goes back to the editor mode. ??? Can ...

i was wondering how can qb detect key strokes without the input statement. i mean in a game you can't have a input statement "which way do u wanna move?"
can somebody plz help

what do u mean "make your qb programs 16mb"?

well u can't remove the >"<'s from the file but you can display the file withuout them. u do something like this

let var2$=mid$(var1$,3,varLEN) 'var1=file varLEN=last character of the file

&nbsp;

if u mean to convert .txt format text to unicode (by that i &nbsp;assume u mean uncoded text, on my computer unicode extonsion is TXT it might be diffrent on yours) then it's really simple.
u open the file for output and then u open a new file for
input and save it in there. u do it like this ...