--------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00015 Date: 01/20/98 From: BERT VAN DAM Time: 11:21pm \/To: TERRY MUELLER (Read 4 times) Subj: assembly language Hi Terry, > BVD> In order to make working with assembler libraries > BVD> easier I have made a batch file to start QB4.5 If I > BVD> load a .BAS file it first checks to see if a .ASM > I'd like to see that BATch file. I'm a firm believer BATch files for > such things. I run my QB45 "processing" that way to predefine the > necessary libraries. The following batch file is created by a QB program. This means path and filenames are changed whenever I start a new project. Here's an example tch: @echo off cd\qb45\mixed IF NOT EXIST C:\QB45\MIXED\BYVAL.ASM GOTO GEENASM COPY C:\QB45\MIXED\BYVAL.ASM C:\MASM6\BIN CD\MASM6\BIN ML BYVAL.ASM /Zi DEL C:\MASM6\BIN\BYVAL.EXE COPY C:\MASM6\BIN\BYVAL.ASM C:\QB45\MIXED MOVE C:\MASM6\BIN\BYVAL.OBJ C:\QB45 CD\QB45 LINK /q BYVAL.OBJ,,,BQLB45.LIB DEL C:\QB45\BYVAL.OBJ MOVE C:\QB45\BYVAL.QLB C:\QB45\MIXED :GEENASM IF NOT EXIST C:\QB45\MIXED\BYVAL.QLB GOTO GEENQLB CD\QB45 pqsyntax /R /F PQSYNTAX.QKW exc c:\qb45\mixed\script\bert QB C:\QB45\MIXED\BYVAL.BAS /l C:\QB45\MIXED\BYVAL.QLB cd\qb45 pqsyntax /u GOTO EINDE :GEENQLB CD\QB45 pqsyntax /R /F PQSYNTAX.QKW exc c:\qb45\mixed\script\bert QB C:\QB45\MIXED\BYVAL.BAS /l cd\qb45 pqsyntax /u :EINDE In order to run this you need QB4.5, MASM, PQSYNTAX and EXC. EXC is an advanced keyboard stuffer. For your information it uses the following script to load the .asm file as a document file in QB: DELAY 1 WAITFOR "File" KEY WAITFOR "New Program" TYPE "L" WAITFOR "File Name:" TYPE "C:\QB45\MIXED\BYVAL.ASM" KEY 2 KEY 2 KEY KEY WAITFOR "Choose" KEY QUIT Hope this is usefull to you, CU Bert --- GEcho 1.00 * Origin: Hotel Zeezicht (2:285/750.16) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00016 Date: 01/24/98 From: BOB LOTSPEICH Time: 09:32pm \/To: SCOTT MCNAY (Read 4 times) Subj: Official MS Word on QB -=> Scott McNay wrote to Bob Lotspeich concerning Official MS Word on QB <=- SM> The copyright in this case is by a corporation, not an individual; SM> does this mean that the copyright will continue for as long as SM> Microsoft Corp. exists? Well, I am not a lawyer, but my guess would be "yes", plus 50 years beyond that. Copyrights are quite different than patents, trademarks and registrations. --- Blue Wave/386 v2.30 * Origin: The Circle Circus * Dale City, VA * 703-730-3115 (1:265/124) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00017 Date: 01/24/98 From: JASON MACINNES Time: 06:22am \/To: TED CRAMER (Read 4 times) Subj: Official MS Word on QB Greetings and salutations, -=> Quoting Ted Cramer to Tika Carr <=- TC> It might be interesting to check and see if Microsoft still holds TC> copyrights to QB4.5. I could be mistaken here but it is my TC> understanding that copyrights are only good for a specific number of TC> years unless renewed from time to time. Since the last QB4.5 was TC> released in 1988, the program will be 10 years old in September of TC> this year. Perhaps someone with more legal knowledge will clafiy this TC> for us??? It varies from country to country, especially in regards to protection levels of the right to copy. However, in the US a copyright lasts for the lifetime of the author plus 50 years (and can be passed to heirs as roperty). If the copyright is held by a company (in the case Microsoft) then the copyright lasts 100 years from creation, and 75 years from actual publication. Unlike in countries like Canada where copyright law is very strong, in the US copyright law has been continually weakened to remove various rights of the creator and right to their intellectual property. My law class was a few years back, so it's possible they could have been weakened even more since then. However, copyrights don't need to renewed or even defended in court to maintain them (that's trademarks). Although it isn't necessary fair that a company has a product, but oesn't actually market it, it doesn't in anyway diminish their rights to it. It's still theirs, and if they just want to sit on it then they can do that to. Personally I wish companies would release all their old products as freeware; still copyrighted, but freely available. Jason Mac Innes ___ Blue Wave/DOS v2.30 --- Platinum Xpress/Win/Wildcat5! v2.0 * Origin: Bits & Bytes BBS - Toronto, Ont. 416- 532-1784 1:25 (1:250/350) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00018 Date: 01/24/98 From: BILL WHITE Time: 01:18pm \/To: BOB LOTSPEICH (Read 4 times) Subj: Computer piracy BL> RG> ' QB.BI - Assembly Support Include File BL> RG> ' BL> RG> ' Copyright 1987 Microsoft Corporation BL> BW> ^^^^^^^^^ BL> BW> I knew somebody would do this illegal act. What BL> BW> do you think the word "Copyright" means! BL> "While the author's original work can be copyrighted, you cannot BL> copyright methods, procedures, systems, concepts or processes. ) BL> While there is no doubt that QuickBASIC 4.5 is copyrighted, and BL> should not be copied, duplicated, or electronically transmitted, I BL> believe that the QB.BI, in and of itself, is not copyrighted. Many BL> of us have written our own BI's, using many of the same concepts. Nevertheless, it is copyrighted. At least, that's what it says and that's what I go by. If Mr. Rich Billy is inappropriately using the word `copyright' on this work, I suggest _you_ take him to court! *:o) Yes, many have written BI's using the same ideas. I believe each of those BI's could be copyrighted. But it's not what you and I believe, it's what the courts decide and I doubt either of us knows what that is. My feeling is: if the person making the request has a pirated copy of QB (or anything else), then I am not going to help him in the least in updating or replacing lost parts or in any other way. But you may have noted that I said that if he could convince me that his copy is legal, then I would help - via NetMail, not in the echo. I.E., quietly and just between us, not in an open forum where any pirate could get it. After Hurricane Andrew, which left me with only the CPU and my dog I'd taken to the shelter with me, and the clothes I was wearing - my house and everything in it was GONE - I understand how someone can be without documentation, original disks, backups, toothbrush and razor! And experience has shown me that Mr. Gate$ company is not the most generous in replacing missing items. :-( FIDO: Bill White @ 1:135/110 (Miami) InterNet: bill.white@110.sunshine.com * SLMR 2.1a * Don't pick up after your children. That's their job! --- Maximus 2.01wb * Origin: Miami Amateur Computer Club BBS/USR Courier V.E (1:135/110) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00019 Date: 01/24/98 From: PEDRO MARTORI Time: 05:31pm \/To: ALL (Read 4 times) Subj: Cuba-Exports From: ricardoag@aol.com (Ricardoag) Organization: AOL http://www.aol.com (Socio-economic comparison prepared by U.S. State Dept.) (3400) WASHINGTON -- The following comparison of socio-economic indicators in pre-Castro and present-day Cuba was compiled by the U.S. State Department's Bureau of Inter-American Affairs and released January 12: LATIN AMERICA: TOTAL EXPORTS (MILLION USD) AVERAGE ANNUAL GROWTH 1958 1996 (PERCENT) MEXICO 736 95991 14 PANAMA 23 2722 13 ECUADOR 95 5243 11 COSTA RICA 92 3826 10 CHILE 389 15396 10 BRAZIL 1243 47747 10 PARAGUAY 34 1282 10 HONDURAS 70 2469 10 ARGENTINA 994 23794 9 COLOMBIA 461 10437 9 GUATEMALA 103 2330 9 PERU 291 5854 8 BOLIVIA 65 1216 8 URUGUAY 139 2397 8 VENEZUELA 2319 23149 6 EL SALVADOR 116 1020 6 NICARAGUA 71 621 6 DOMINICAN REPUBLIC 136 886 5 HAITI 48 181 4 CUBA ------ 732 1831 2 SOURCE: IMF DIRECTION OF TRADE STATISTICS. As the numbers above imply, Cuba had a very favorable overall balance of payments situation during the 1950s, contrasted with the tenuous situation today. In 1958, Cuba had gold and foreign exchange reserves -- a key measure of a healthy balance of payments -- totaling $387 million in 1958 dollars, according to IMF statistics. (That level of reserves would be worth more than 1.9 billion USD in today's dollars.) Cuba's reserves were third in Latin America, behind only Venezuela and Brazil, which was impressive for a small economy with a population of fewer than 7 million people. Unfortunately, Cuba no longer publishes information on its foreign exchange and gold reserves. (end text) ============== Saludos Pedro Martori ... " Si es verde y con espinas, guanabana es !" ___ Blue Wave/DOS v2.30 [NR] --- WILDMAIL!/WC v4.12 * Origin: SUP-TECH * Longueuil * 1-514(468-4744) (1:167/500.0) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00020 Date: 01/25/98 From: KURT KUZBA Time: 01:07am \/To: NIGEL TRAVES (Read 4 times) Subj: Sprite13.OBJ - QLB proble NT> I personally have various batch files which I run before NT> and after for the various compiler/linker set-ups for NT> various languages and one called oldpath which just sets NT> the PATH back to its standard config. I have one huge menu file. It's a .BAT file with a call to a program that returns a keypress as an errorlevel. The .BAT runs the appropriate file, and sets up whatever environment and path are required. I set to my default path at the beginning of the menu loop, so it gets reset. I don't clear out the environment variables, though, so it was still finding the C libraries. The scroll code follows. It will still look for the C library, even though it does not need it for anything. I had it using a long, and it would try to promote int to long via a shl call, which pretty much drove me nuts for a while, since there is no visible code which calls for a shift left. :) At any rate, it will look for a C .LIB, but it doesn't use anything from it, so I don't know why. It will then link without it and work just fine. It's a Scwewy Wabbit... The following message contains both the .OBJ in POSTIT! format and a bit of Basic code to test the module. > ] If they could reason there would be no argument............. --- * Origin: *YOPS ]I[* 3.1 GIG * RA/FD/FE RADist * Milwaukee, WI (1:154/750) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00021 Date: 01/25/98 From: KURT KUZBA Time: 01:07am \/To: NIGEL TRAVES (Read 4 times) Subj: A C scroll.OBJ for QB '>>> Page 1 of SCROLL.OBJ begins here. TYPE:BINAA TLEN:1859 DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.1 SUB V1:OPEN "O",1,"SCROLL.OBJ",4^6:Z&=1859:?STRING$(50,177); U"&O/%-MB2A8D;;S2(%W+%(%p&h/%%ed%%%)h%tij)%ifyf%*hts%xy(g%xx-k.fw U".i%fyf.#IIx(%rgtq%x+ij.gx(r%,IIy&(ujx%+ijg(y(u%&en%0%xhwn.qq.y( U"j'y*&.ify%f*ht%sxy)&.gxx%+ilw%tzu0%xhwn.qq.i%fyf1%xhwn.qq.h%tsx U"y%/xhw#nqq.%gxx%&g,%m'U(0'.&%g,%%m%%%1(&%&g,%m%=%2).&%g,%%m%%%3 U"*&%&g,%E%%%,-.&%g,%%E%%%./&%&W#%%%&EEE%EEEE%EEEE%EEEE%EEEE%EEEE U".E%i-7%4x'9x(x)(%k0%%5&6'%7(8)#i&%W#*%%lCU;%W#.%%n%qqng#hj%[#1% U"..M%O(=U]3=Y%'l=%]=$)%'=r1]= U"5n%(=JY]=N%X'ER%.&%oV%%&%&&]+/%(Kp%%cJY(QG]:KZg,Z%oQJ[Z-$uZswO( U"SZ%?kJ[(MLb%(%Zk/nXkmbd%%_x5Em]+#9%Kp#%%ui%%%%%GR=)X4koZk^1XkkKd%_Z U"skoJYVZ-uZasw(QnZkkJTY(Q]0:KZlg'Z%oQJ[Z-$uZswO(SZ%?kJ[(xBb%% U"Z.k/Xk-mb%%k_xEm&]+;%(Kp%%(ui%%d%%R=^)XkoAZk-X=kkd%__ZkoQJYZ-$u U"Zsw4(QZk?kJY(xd:%_d%]d%H9nD(bn0ub3%nD(bV0vb;%SD(bx0wbA%8D(bd0xbD%nD(b U"jZudL_+%+0%%&&4(/V%s%[)(%+%4%&%&x(O%&v(Q%&s(T%(%o1%F&M(.V-Z^,'C U"/%%&oA%(%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%#%%%k7V%A%8%(A'8%'A)8%'A+ U"8%(A-8%'A/8%'A18%'A38%'A58%'A78%'A98%'A;A%'%_%?%%&L..>> Page 1 of SCROLL.OBJ ends here. Last page. TCHK:33 '_|_|_| SCRLTEST.BAS Requires SCROLL.OBJ as a .LIB '_|_|_| PUBLIC DOMAIN (.OBJ & .BAS) by Kurt Kuzba (1/21/1998) DECLARE SUB ScrollTest () DECLARE SUB FillScr (TXT$) DECLARE SUB scr0ll (BYVAL dir%, BYVAL left%, BYVAL top%,_ BYVAL right%, BYVAL bottom%) UP% = ASC("u"): DN% = ASC("d"): LF% = ASC("l"): RT% = ASC("r") Wide% = 40: High% = 25: WIDTH Wide%, High% scr0ll 0, Wide%, High%, 0, 0 'set height and width !! ScrollTest Wide% = 80: High% = 50: WIDTH Wide%, High% scr0ll 0, Wide%, High%, 0, 0 'set height and width !! ScrollTest Wide% = 80: High% = 25: WIDTH Wide%, High% scr0ll 0, Wide%, High%, 0, 0 'set height and width !! ScrollTest SUB FillScr (TXT$) SHARED High%, Wide% L% = LEN(TXT$): COLOR 14, 4: limit% = High% * Wide% - 1 FOR x% = 0 TO limit% LOCATE (x% \ Wide%) + 1, x% MOD Wide% + 1 PRINT MID$(TXT$, (x% MOD L%) + 1, 1); NEXT END SUB SUB ScrollTest SHARED UP%, DN%, RT%, LF%, Wide%, High% R% = Wide% - 5: B% = High% - 5: LH% = Wide% \ 2: LV% = High% \ 2 FillScr "*[ Test Screen ]*": COLOR 15, 1 LOCATE 1, 1: PRINT " Scroll LEFT ": WHILE INKEY$ = "": WEND FOR t% = 1 TO LH%: scr0ll LF%, 10, 5, R%, B%: NEXT WHILE INKEY$ = "": WEND FillScr "*[ Test Screen ]*": COLOR 15, 1 LOCATE 1, 1: PRINT " Scroll RIGHT ": WHILE INKEY$ = "": WEND FOR t% = 1 TO LH%: scr0ll RT%, 10, 5, R%, B%: NEXT WHILE INKEY$ = "": WEND FillScr "*[ Test Screen ]*": COLOR 15, 1 LOCATE 1, 1: PRINT " Scroll UP ": WHILE INKEY$ = "": WEND FOR t% = 1 TO LV%: scr0ll UP%, 10, 5, R%, B%: NEXT WHILE INKEY$ = "": WEND FillScr "*[ Test Screen ]*": COLOR 15, 1 LOCATE 1, 1: PRINT " Scroll DOWN ": WHILE INKEY$ = "": WEND FOR t% = 1 TO LV%: scr0ll DN%, 10, 5, R%, B%: NEXT WHILE INKEY$ = "": WEND END SUB > ] You can prove anything with a properly written benchmark.... --- * Origin: *YOPS ]I[* 3.1 GIG * RA/FD/FE RADist * Milwaukee, WI (1:154/750) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00022 Date: 01/24/98 From: HARRY HICKEY Time: 09:49pm \/To: ALL (Read 4 times) Subj: Computer Privacy Word to the wise: If you want to send something you'd rather B-ll G-tes didn't know about, DO NOT use BBS or e-mail. You can, of course, post your snail-mail address on-line, then correspondent can use the mail to write you about anything he/she pleases, and, given a return address, vice versa. There are powerful privacy rights covering first-class mail (not absolute; nothing is absolute). -!- SLMR 2.1a Galactic Dept of Wts & Measures: TAKE US TO YOUR LITER! --- * Origin: * My Place BBS * 28.8 V.34 * Bowie, Md * (301)805-1602 * (1:109/570) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00023 Date: 01/24/98 From: HARRY HICKEY Time: 09:49pm \/To: ALL (Read 4 times) Subj: Moonrock Basic Dialect Since many people are trying to acquire QuickBasic, which is no longer being made but to which Microsoft still holds on with its copyright, and since the main requirement of these people is to be able to write compiled .EXE modules in Basic, may I suggest a couple of alternatives: -- there is PowerBasic, which is well known & which I will not amplify on; -- there is Moonrock, a basic-dialect produced in Australia. To find out how to get it, you may hit the Web for: http://www.rowan.sensation.net.au/moonrock.html Moonrock is not quite so easy to write as ordinary Basic. You have to start your module with a BEGIN DEF line, followed by certain such codes as #INCLUDE whatever.h , STRSEGSIZE 5k ... ending with a BEGIN CODE line. OTOH it produces assembler-type output which then gets compiled to .exe, and also it allows for in-line assembler instructions. Finally, if you wish to Boldly Go Where Few BASIC-niks Have Gone Before, the entire source code for the compiler is made available free to the public. -!- SLMR 2.1a Galactic Dept of Wts & Measures: TAKE US TO YOUR LITER! --- * Origin: * My Place BBS * 28.8 V.34 * Bowie, Md * (301)805-1602 * (1:109/570) --------------- FIDO MESSAGE AREA==> TOPIC: 125 QUICK BASIC Ref: F1U00024 Date: 01/24/98 From: SEAN DENNIS Time: 01:16pm \/To: ALL (Read 4 times) Subj: Copyright Why don't you all go down to your local library and read about the copyright laws? I thought this was about QuickBASIC, not copyright laws. Who's the moderator in this echo? Better yet, why doesn't somebody go call the Library of Congress and ask? I've posted a message about it, as I own copyrights to different things (including songs and computer programs - it's basically the same copyright). You can read it, look at it, print it out. **** BUT: You can't use the code in your own programs unless you have written permission/license from the original author. Does that satisfy everyone? Sean Nighthawk BBS Sysop : nighthawk@mail.compconn.net: http://tdmbbs.ml.org/sunspot --- Telegard v3.09.g1/mL * Origin: Nighthawk-a little itty bitty corner in cyberspace (1:395/11.86)