Search found 450 matches

by moneo
Wed Oct 06, 2010 6:46 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: New errors: next without for and file already open
Replies: 9
Views: 20672

Famous last words of a programmer named Fumblefingers:

"My program ran great yesterday, but today it doesn't.
All I changed was only a comment."

Regards..... Moneo
by moneo
Mon May 03, 2010 4:48 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: EOF
Replies: 4
Views: 15644

Re: EOF

When opening a file by typing "open" everything works, but it doesn't work with "print". Can anyone tell me why, it doesn't make any sense to me? :? DO INPUT a$ IF a$ = "open" THEN INPUT "name:", filename$ OPEN filename$ FOR INPUT AS #1 DO WHILE NOT EOF(1) IN...
by moneo
Wed Feb 24, 2010 6:43 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Question about files
Replies: 3
Views: 11616

Pipe the information to a file and read that. CHDIR to a folder path or use the path in a SHELL: SHELL "DIR *.BAS /B > Folder.dat" ' /B returns nothing else but a list of filenames. Ted I know what you mean, but instead of saying "pipe", you should say "redirect." Rega...
by moneo
Sun Jan 31, 2010 2:39 pm
Forum: General Discussion
Topic: "Important message" PMs
Replies: 9
Views: 30295

Re: "Important message" PMs

Skyler wrote:Hey guys,

If you get a PM with the title "Important message from the forum administration!", be warned--it's a fake. The link probably directs you to malware, though I didn't try it (for obvious reasons).

Skyler
Thanks for the warning, Skyler.

Regards.... Moneo
by moneo
Wed Jan 27, 2010 9:25 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: INT SURPRISES
Replies: 7
Views: 16216

Re: INT SURPRISES

Can somebody explain how I can get the value I want: h=44.10 D1# = INT(h * 100): PRINT D1# D2 = 100 * h: PRINT D2 BASIC Answer for D1# is 4409 and not 4410 D2 answer is 4410 How can I have 4410 with INT fonction? (h can be 44.1035 for instance. I need that INT to cut at that point the 2 last digits...
by moneo
Sun Dec 06, 2009 2:16 pm
Forum: General Discussion
Topic: Printing ASCII characters
Replies: 4
Views: 18060

Thanks again, Ted.

My friend doesn't have QB, so I'm going to ask him to try your first suggestion above.

Regards,
Moneo
by moneo
Sat Dec 05, 2009 6:53 pm
Forum: General Discussion
Topic: Printing ASCII characters
Replies: 4
Views: 18060

Thanks alot, Ted.

I'll ask my friend to set LEMF to text, like you said.

Best regards,
Moneo
by moneo
Sat Dec 05, 2009 3:11 pm
Forum: General Discussion
Topic: Printing ASCII characters
Replies: 4
Views: 18060

Printing ASCII characters

I have a calendar printing progam written in Quickbasic. To make the boxes around each day I use chr$(179), chr$(196) and chr$(205). The program works fine and prints the calendar to an attached printer, printing directly from the program with LPRINT statements. It also works fine printing the calen...
by moneo
Thu Jul 30, 2009 12:33 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Copy Files Using QB45
Replies: 14
Views: 43131

Add this to your list Moneo: If you are ahead of me, lead. If you are behind me, follow. If you are not doing anything, Get out of the way. If you posted something 3 years ago, who is the dummy for answering it? :wink: You're right, Ted. That makes me a dummy. I went by the date of the last post, a...
by moneo
Wed Jul 29, 2009 12:02 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Copy Files Using QB45
Replies: 14
Views: 43131

Hi, Back in 1990, I was confronted with the need to copy files from within a QB program. I played around with different methods that actually read and wrote the records from within the program. I discovered that there there were several sticky little problems that caused the filles not to be exactly...
by moneo
Fri May 22, 2009 8:47 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: E within a number/at end (not Hex)
Replies: 11
Views: 40503

Gee Ted, I've been wondering why you hadn't made some unkind remarks to me in quite some time. It's nice to see that you're back to your old self again.

Regards..... Moneo
by moneo
Fri May 22, 2009 7:33 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: E within a number/at end (not Hex)
Replies: 11
Views: 40503

Your number of 1.496E+E08 is equal to 149600000. It's too big to fit into an integer variable. To be expressed as a single variable, it it needs to be converted to the format you have with E+08. Sorry, but I don't have the reason for this. It fits fine into a long variable and a double variabe, and ...
by moneo
Fri Apr 24, 2009 8:46 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: How to send PCL code to HP printers
Replies: 2
Views: 9162

Re: How to send PCL code to HP printers

Searching the QB forums, I found what might have been year 2002 solutions on responder's websites are no longer alive. I hope someone might know of a solution. I can easily print to my HP laser via my QB45 program, but need to format the output. What exactly do you mean by "format the oiutput&...
by moneo
Mon Apr 13, 2009 8:09 pm
Forum: General Discussion
Topic: Floppies Banned from Program issue
Replies: 8
Views: 17295

I agree with Imortis, but here is a little background. Diskettes have been notorious for introducing viruses into PCs for many years. There are two ways you can get viruses from diskettes: 1. Via an infected executable program on the diskette. 2. Via a boot record virus on the diskette. You can avoi...
by moneo
Mon Feb 02, 2009 8:38 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Verifying match between Source.bas and Run.exe
Replies: 12
Views: 25423

I wouldn't waste any more time trying to figure out the differences with the .EXEs. The minute you start making any needed modifications to the source code, the program will be your total responsibility from then on. I would start out by doing some good testing with the original .EXE to learn how th...
by moneo
Thu Jan 29, 2009 8:19 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Verifying match between Source.bas and Run.exe
Replies: 12
Views: 25423

Some time ago, I tried what you are trying to do. The .EXE files were not the same. Then I took a program of mine, compiled it, and saved the .EXE. Then I re-compiled the program again and compared the new .EXE to the one saved. The were not equal. Apparently, the compiler gives different results, I...
by moneo
Thu Jan 22, 2009 2:02 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: Birthday
Replies: 3
Views: 10787

Hi Zingo, welcome to the forum. Date handling programs are quite difficult. You need to consider logic for: 1) Knowing how to determine if a given year is a leap year or not. 2) Figuring out the maximum number of days in any month. For February, you need to know if the year is a leap year. 3) You ne...
by moneo
Wed Dec 24, 2008 8:02 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: divisible by 2
Replies: 26
Views: 56697

Hello,, Moneo! Here is another quirk I find in QuickBASIC 4.5. I ran the code in G-W BASIC, and got Odd. 0, ODD, odd, 0, A is odd. I ran the code in QuickBASIC and got Odd, -1.734723E-18, EVEN, even, -1.734723E-18, A is odd. So, the value that qb returns for 5 ^ 2 is not truly the integer 25, since...
by moneo
Wed Dec 24, 2008 8:01 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: divisible by 2
Replies: 26
Views: 56697

Hello,, Moneo! Here is another quirk I find in QuickBASIC 4.5. I ran the code in G-W BASIC, and got Odd. 0, ODD, odd, 0, A is odd. I ran the code in QuickBASIC and got Odd, -1.734723E-18, EVEN, even, -1.734723E-18, A is odd. So, the value that qb returns for 5 ^ 2 is not truly the integer 25, since...
by moneo
Fri Dec 19, 2008 10:19 pm
Forum: QBASIC and QB64 Questions & Answers
Topic: divisible by 2
Replies: 26
Views: 56697

This is really a dumb question but how can you check if a number is a multiple of 2? I've tried everything I could think of. ie. IF string% = 'divisible by 2' THEN Thanks Qbasicfreak Saying that a number is a multiple of 2 is the same as saying that the number is even. Assuming that the number is a...