[phpBB Debug] PHP Warning: in file [ROOT]/phpbb/db/driver/mysqli.php on line 264: mysqli_fetch_assoc(): Couldn't fetch mysqli_result
[phpBB Debug] PHP Warning: in file [ROOT]/phpbb/db/driver/mysqli.php on line 326: mysqli_free_result(): Couldn't fetch mysqli_result
[phpBB Debug] PHP Warning: in file [ROOT]/phpbb/db/driver/mysqli.php on line 264: mysqli_fetch_assoc(): Couldn't fetch mysqli_result
[phpBB Debug] PHP Warning: in file [ROOT]/phpbb/db/driver/mysqli.php on line 326: mysqli_free_result(): Couldn't fetch mysqli_result
Pete's QBASIC Site Discuss QBasic, Freebasic, QB64 and more 2008-03-15T23:08:46-05:00 http://petesqbsite.com/phpBB3/app.php/feed/topic/2622 2008-03-15T23:08:46-05:00 2008-03-15T23:08:46-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16827#p16827 <![CDATA[?????]]> Creative BASIC lately, very similar to QB/FB in console mode.

Statistics: Posted by k7 — Sat Mar 15, 2008 11:08 pm


]]>
2008-03-15T21:16:48-05:00 2008-03-15T21:16:48-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16825#p16825 <![CDATA[?????]]> Statistics: Posted by Yarrow — Sat Mar 15, 2008 9:16 pm


]]>
2008-03-15T00:21:11-05:00 2008-03-15T00:21:11-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16822#p16822 <![CDATA[Re: Hmmmmmmm]]>
Mac you both used END instead of SYSTEM too. Bad boys LOL

Ted
Good catch, but I had a reason: focus on how to capture key, not how to terminate a program.

Code:

CLSPRINT "Press ESC to exit program, 'T' to print time"DO  PRINT : PRINT "Press key: ";  DO: k$ = INKEY$: LOOP WHILE k$ = ""  IF k$ = CHR$(27) THEN EXIT DO ELSE PRINT k$  IF UCASE$(k$) = "T" THEN PRINT TIME$LOOPPRINT : PRINTLINE INPUT "Press ENTER"; e$SYSTEM
Shows that programs that are to be compiled need to end with some kind of final prompt so the program doesn't leave before you see final results.

Also shows that ESC is a good way out rather than bogus Q.

Mac

Statistics: Posted by Mac — Sat Mar 15, 2008 12:21 am


]]>
2008-03-14T23:57:12-05:00 2008-03-14T23:57:12-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16821#p16821 <![CDATA[Hmmmmmmm]]>
Ted

Statistics: Posted by burger2227 — Fri Mar 14, 2008 11:57 pm


]]>
2008-03-14T06:08:19-05:00 2008-03-14T06:08:19-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16820#p16820 <![CDATA[?????]]>
My way:
Yeah, in this case that is better. I would normally do that, too.

Here I was trying to show how to catch a key so it could be used for whatever, not just exit.

Mac

Statistics: Posted by Mac — Fri Mar 14, 2008 6:08 am


]]>
2008-03-14T03:18:02-05:00 2008-03-14T03:18:02-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16819#p16819 <![CDATA[?????]]>

Code:

CLS DO   PRINT "Press key: ";   DO: k$ = INKEY$: LOOP WHILE k$ = ""   PRINT k$ LOOP UNTIL UCASE$(k$) = "Q"END

Statistics: Posted by k7 — Fri Mar 14, 2008 3:18 am


]]>
2008-03-13T21:49:53-05:00 2008-03-13T21:49:53-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16818#p16818 <![CDATA[?????]]>
Here is an example that prompts until you
press "Q"

Code:

CLSDO  PRINT "Press key: ";  DO: k$ = INKEY$: LOOP WHILE k$ = ""  PRINT k$  IF UCASE$(k$) = "Q" THEN ENDLOOP

Statistics: Posted by Mac — Thu Mar 13, 2008 9:49 pm


]]>
2008-03-13T20:06:13-05:00 2008-03-13T20:06:13-05:00 http://petesqbsite.com/phpBB3/viewtopic.php?p=16817#p16817 <![CDATA[?????]]>

Statistics: Posted by Yarrow — Thu Mar 13, 2008 8:06 pm


]]>