Pete's QBASIC Site

Hiei-, When you do a compile and link process, besides generating an .EXE for your program, it also generates a list file with a .LST file extension for your program name. Lookup hex location 5F15 on this .LST file to see the code near where the internal error is occuring. Then rewrite this code ano...

Watch out because QuickBASIC 4.5 is not the same as QBasic 4.5. QuickBASIC comes with a compiler. QBasic has no compiler and only runs interpreted. QuickBASIC was always sold as a separate product. QBasic used to come free with some early versions Windows. When people say "QB", you never k...

I understand, Pete. Maybe you should respond to these by telling them to post them at petesqbsite. I think it's as much effort as you having to do a proxy posting for them, and then perhaps getting more involved. It just bothers me when these guys splatter their requests onto several forums, obtain ...

BTW, a guy with a username of Kermit (as a guest) posted the same exact problem on Qbasic.com on 6/1/06, and was given several solutions by Mac on 6/4/06. I read Mac's solutions and suggestions, and they're good.

In my opinion, Pete, this guy is wasting our time.

*****

Nathan1993 wrote:It should be 01/10/11 or any date, ever, with just zeros and ones.

That's clever, I like it.

*****

How about this for Programmer's Day: December 31st of a leap year that begins on a Saturday, like 1972 or 2000 or 2028. These are years that only a programmer would appreciate because the week logic in his programs probably blew up. Hint: Since weeks begin on a Sunday (in the USA), December 31st of ...

nancepa wrote:Thanks moneo, for your input I got it to work just as needed.

Nancepa

Your very welcome. Glad to hear that you got it to work.

Regards,
Edward F. Moneo
*****

..... I want to write a program in qbasic that will copy the contents of one file thats on my floppy drive and insert it into another file thats on my hard drive. I do not want to overwrite the contents of the file on the hard drive. What do you mean by INSERT IT INTO ANOTHER FILE? If you mean stic...

i need help ..... FOR x = 1 TO 10 READ id(x), date(x), name$(x), value(x), cost(x) NEXT x ...... sortdate: gap = 15 \ 2 DO WHILE gap > 0 limit = 15 switch$ = "on" DO WHILE switch$ = "on" switch$ = "off" FOR date = 1 TO limit - gap >>>>>>>>>>>>>>>>>>>>>>>>>>>>IF b(date)...

Flirt85, A good way to be able to see the information and the delimeters in a DATA statement more clearly is to line up and spread out the fields. Example: DATA "Computer" , "102GHz" , 835.89 DATA "Monitor" , "17 inch" , 189.98 DATA "Printer" , "...

Moneo, I was talking about it being more readable on the forums, not it QB. It's easier on the eyes, you know? Not using code tags is one of my pet peeves. In order for code to be more readable on the forums, it has to already be indented. If it's not indented, then enclosing the code in a colored ...

...... I'm still getting a READ error after I fixed the period into a comma in my data. I found another period and fixed it as well. I don't get it? If you have more than one constant (string or numeric) on a DATA statement, then you must delimit (separate) each of these with a COMMA. I just notice...

MystikShadows wrote:Wow, I positively love that moneo. Can I use it? hehe...

Only if you leave me a silver bullet next time you help me out.

Flirt85, The problem with CASE 2 is that you used a variable named BRING instead of BEGIN. bring = INSTR(ladder, "Step") In CASE 3, at the end of you FOOT 8 logic you're missing the READ statement, as so: END IF READ ladder, length '***** Missing for FOOT 8. WEND The code for FOOT 6, 8 and...

Flirt85, you will notice below your subject line when you post a message a "code" button. If you push it, copy your code, and push it again, it will format your code to be much more readable. I have taken the liberty of doing this for you. Flirt85, Nathan1993 was trying to help out. Unfor...

Out of the past come the thundering hoofs of the great horse Silver --- MysticShadows rides again....

Flirt85,

It's hard to imagine the modified code of your latest version. Please post the whole thing again.
*****

Hi Flirt85, I thought you had disappeared. Regarding the READ error, take a look at this DATA statement which has a period instead of a comma between the first 2 fields, which is probably the cause. DATA "Monitor"."17 inch",189.98 As far as the PRINT USING is concerned, I never u...

Thank you Moneo. This program is becoming quite a pain. It runs as is, but only displays the first set of data....six times. I can see the PRINT MASK as an improvement, but my WHILE statement really needs help. Do you have any more suggestions? It's not clear what level of subtotals and total you w...

Flirt85, The following code to determine if an extension ladder, won't work. FOR x = 1 TO LEN(ladder) 'find and assign IF MID$(ladder, x, 1) = " " THEN sp = x NEXT x IF ladder = MID$(ladder, sp + 1, 1) = E THEN '*** THIS IS NO GOOD *** PRINT length; "ft "; LEFT$(ladder, sp - 1) E...