Draw table:
QBinux setup was supposed to build in textmode... But I needed line 24 of my screen (through locate 24,1) already from when I started programming with QBasic I knew this isn't possible.
So took screen 9 and used some GPrint (actually the one by Toshi, I think) Didn't look good in the end.
Moved to screen 12: looks good, drawing math is completly stressfull... so I guess to keep the non-vga users (like there are any) happy, I need to do the thingy in text mode. How can I use line 24 without having my line 1 dissappear and have blank (black) line between 23 and 24?
grtz
Seb
Graphic stuff
If you put a semicolon at the end of each PRINT and your lines don't overflow the allowed 80 chars, you should not have unwanted scrolls.
This code does not scroll for me.( I'm in Windows 2000)
It uses an 1 line bufer where everything is copied with LSET and MID$ (to avoid to change its size) before printing it
This code does not scroll for me.( I'm in Windows 2000)
It uses an 1 line bufer where everything is copied with LSET and MID$ (to avoid to change its size) before printing it
Code: Select all
B$=SPACE$(80)
t!=TIMER
DO
COLOR RND+14
A%=INT(RND*25)+1
'fill the buffer
LSET B$=">THIS IS LINE "+STR$(A%)
MID$(B$,77)="<<<"
'print it
LOCATE A%,1
PRINT b$;
'slow it down!
DO:LOOP UNTIL TIMER>t!:T!=TIMER
LOOP UNTIL LEN(INKEY$)
I program in pure DOS. I had this problem with QBasic and I have it also with QuickBasic.
When I give as a command
It says in screen 0, that it can't find the line (I get that) but when
in screen 9 or 12 it does what I said in my first post.
grtz
Seb
When I give as a command
Code: Select all
LOCATE 25, 1: PRINT "Hello"
in screen 9 or 12 it does what I said in my first post.
grtz
Seb
Basically the same. But I'll try your code.
So I should be able to use this with your explaining:
Correct?
grtz
Seb
So I should be able to use this with your explaining:
Code: Select all
Locate 24,1:?" <Tab>/<Alt-tab>"
grtz
Seb
this works for me:
No room between the 3 lines, and the bottom line is in the border of the screen. Just gave a semicolon after each print and never go beyond col 80, this is what my buffer method does.
Code: Select all
width 80,25
Locate 23,1:?" <Tab>/<Alt-tab>";
Locate 24,1:?" <Tab>/<Alt-tab>";
Locate 25,1:?" <Tab>/<Alt-tab>";
- SebMcClouth
- Veteran
- Posts: 240
- Joined: Fri Apr 29, 2005 2:20 am
- Location: Inside the Matrix
Believe it or not, there's a slight holdover from GWBasic still in QBasic. If anyone remembers GW, there was the line of 'hotkeys' at the bottom. "KEY OFF" at the beginning of the program would turn that display off and allow you to PRINT to that line. This also fixes the line 25 scrolling problem in QB.
If you need music composed in MP3, WAV, or MIDI format, please contact me via email.
Xerol's Music - Updated Regularly!
Xerol's Music - Updated Regularly!