Search found 2368 matches

by burger2227
Sat Nov 17, 2007 1:00 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: INP and OUT Port
Replies: 37
Views: 36514

I don't understand your new idea about the pad and not reversing the port at all. How can you get much out of the keypad if it just shorts rows and columns. Obviously you would have to feed the 3 columns 5 volts and read just 4 rows. This would make it only a matter of mixing 4 keypresses or actuall...
by burger2227
Fri Nov 16, 2007 11:27 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: INP and OUT Port
Replies: 37
Views: 36514

The port will have to be in reverse mode waiting for input

That is why I said that the program has to be constantly running and the port will have to be constantly reversed by the program as it may timeout. That should not hurt anything. When you send 5 volts to a reversed port pin it tells INP(888) that it is ON. Use the chart I made above for the exponent...
by burger2227
Fri Nov 16, 2007 2:47 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: INP and OUT Port
Replies: 37
Views: 36514

Reversing the port

To reverse a 1284 compatable port send the contol port C5 a value in your program as below: OUT 890, INP(890) OR 32 'sets C5 on if it is off Now you can turn the port's pins on using an A/D converter or other type devices using 5 volts. Check that C5 is always set in your PC program. C5 has a timeou...
by burger2227
Fri Nov 16, 2007 1:47 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: INP and OUT Port
Replies: 37
Views: 36514

WHAT?

A keyboard to the port pins? That's why you have a keyboard on a PC to begin with. To send data to the port, it must be reversable. The voltage used is only 5 volts! An unused port will return 255 until you send it something else WHILE it is reversed. All you do is turn appropriate pins on while in ...
by burger2227
Wed Nov 14, 2007 3:04 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Problem with program...
Replies: 23
Views: 14514

LOL Who needs BRUN45? That should have been my first thought, but most programs do not require it. If you use CHAIN then you can use it so that you pass COMMON SHARED values to the other module. Stand alone modules CHAINED will need a file to pass the values. In any case, you still needed some type ...
by burger2227
Tue Nov 13, 2007 11:33 am
Forum: QBASIC and QB64 Questions & Answers
Topic: How to mix Shell commands with variables?
Replies: 9
Views: 6490

Those are Quotes

In certain DOS commands, you need Quotation marks in the command. CHR$(34) is simply a ". However, QB would think that was a string marker if you just used that. The character is preserved in the string command for use by DOS only. Look up the ASCII character codes somewhere. They are an important p...
by burger2227
Tue Nov 13, 2007 11:17 am
Forum: QBASIC and QB64 Questions & Answers
Topic: Problem with program...
Replies: 23
Views: 14514

You are using QB in an unfamiliar path

There are two ways this can happen. 1) The QB.EXE file cannot find a file outside of it's folder. Thus it asks for the path to it's folder files. You need to put the paths to all of QuickBasics EXE, Help, Include, and Library files into the Options menu of the IDE if they are not in the same folder ...
by burger2227
Fri Nov 09, 2007 6:00 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: How to make 2 things happen at once in Qbasic
Replies: 5
Views: 5092

Loops are pretty fast, so you can make it appear to be doing two things at once. The only problem is if a procedure in the loop creates a delay of some kind. To print both the player and badguy you can print them both in a loop, but you will also have to find the new column and row too. This could b...
by burger2227
Thu Nov 08, 2007 8:42 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: VB 6 Problem on WindowsNT
Replies: 4
Views: 5345

Those darn libraries

Ya better get used to them Mac, I hear that VB6 and VISTA don't like each other much.

So hi ho hi ho it's off to .NET we go.

Sounds like one of those errors M$ never fixed...........

Ted
by burger2227
Wed Nov 07, 2007 12:20 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Insert image (what ever file type) into QBasic/Quick Basic
Replies: 6
Views: 7191

The process is a little hard to grasp at first. The Header.Pal string actually holds ASCII characters of the color values. If an asterisk (CHR$(42)) is in the string the color value = ASC("*") or 42. So you start reading the string with Blue = ASC(MID$(Header.pal, p, 1)) where p is a FOR loop variab...
by burger2227
Tue Nov 06, 2007 2:18 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Insert image (what ever file type) into QBasic/Quick Basic
Replies: 6
Views: 7191

I don't think that BMP.BAS has any padder for the bitmap width and will skew some images. The following is the Bitmap Header Information from WOTSIT.org : TYPE BmpHeaderType Id AS STRING * 2 'Should be "BM" Size AS LONG 'Size of the data rr1 AS INTEGER rr2 AS INTEGER Offset AS LONG 'Position of star...
by burger2227
Sat Nov 03, 2007 5:58 pm
Forum: Freebasic Questions & Answers
Topic: Can I make an image in Paint, then have a FB program load it
Replies: 53
Views: 83960

Well, that program looked like it should have worked, and after a lot of tries, I posted it at Network 54 Qbasic Forum and a guy got it working using PEEK instead of string manipulation of the color palette string. And it still cannot do large bitmaps in SCREEN 13! And now my old bitmap loaders will...
by burger2227
Sat Nov 03, 2007 5:42 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: return from dos screen to window screen
Replies: 12
Views: 9909

?????????????

What do you mean by somewhat? Can you see the IDE header? How small does it get?
by burger2227
Fri Nov 02, 2007 12:19 am
Forum: Freebasic Questions & Answers
Topic: Can I make an image in Paint, then have a FB program load it
Replies: 53
Views: 83960

Not everybody uses graphics in QB and needs Bitmaps either. I got a bitmap loader from here and the code did not even run! It took me a while to get it working, but it is still posted here wrong. It uses Interrupts to load SCREEN 13 bitmaps, but it still cannot load a full screen. If anybody wants t...
by burger2227
Thu Nov 01, 2007 11:58 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: return from dos screen to window screen
Replies: 12
Views: 9909

Any time you change SCREEN modes, the screen is cleared like CLS!

You can't have your cake and minimize too!

Try making your graph using ASCII characters in SCREEN 0 (default).
by burger2227
Wed Oct 31, 2007 6:31 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Passing arrays to subs
Replies: 4
Views: 5085

SNARK!!!!!!!!!!
by burger2227
Wed Oct 31, 2007 6:24 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Sprite flicker problem
Replies: 8
Views: 7964

SNARK LOL

Might as well call him a SNARK!

He is absolutely rude about giving thanks!
by burger2227
Wed Oct 31, 2007 5:57 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: return from dos screen to window screen
Replies: 12
Views: 9909

You can go to a window mode if you change to SCREEN 0: SCREEN 12 CIRCLE (200, 200), 50, 12 SLEEP 'will not allow you to hit Enter without changing mode SCREEN 0 PRINT "Hit Alt- Enter to window" DO: LOOP UNTIL INKEY$ = CHR$(27) 'escape exit But not in the middle of a graphics screen. Ted
by burger2227
Sat Oct 27, 2007 4:46 pm
Forum: Freebasic Questions & Answers
Topic: Can I make an image in Paint, then have a FB program load it
Replies: 53
Views: 83960

PAINT is a piece of garbage!

You will need a decent picture editing program like Paint Shop or Photoshop. You might be able to use a decent scanner photo editor. Look around for one. The reason you need a decent editor is that QB can only use bitmaps of 4 or 8 Bits Per Pixel for images to be displayed in color. SCREEN 13 is bes...
by burger2227
Thu May 10, 2007 12:55 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: how to view output while program is running
Replies: 5
Views: 7466

Just print it to the screen also

Wherever you produce output, also print it to the screen.
Example
PRINT #1, "Total: "; TotalSales
would be changed to
PRINT #1, "Total: "; TotalSales
PRINT "Total: "; TotalSales