Here is the website that I downloaded GWBasic from:
http://www.geocities.com/KindlyRat/GWBASIC.html
I just checked it and it said that the site was down due to it exceeding it's data transfer limit. Are all you guys downloading it?:brows: Maybe it will be back up. My virus software didn't find anything, but any time you download something there is a chance. So, use at your own risk, blah, blah ,blah. GW Basic is old school.... no mouse, black screen, and you have to type commands in.
Download the GWBASIC.EXE zip file to your computer. Exract the zip to a folder and remember where you stored the folder.
Go here:
http://www.riflebarrels.com/articles/custom_actions/bolt_lug_strength.htm
and go to the program code. Left click, highlight all the code (line 10 to line 330), right click, and copy.
Now on your computer go to start, programs, accessories, and open notepad.
In notepad paste the program. Now we need to do some work. When the program was loaded to the web, any line that was to long was dropped to the next line. Fine for a web page, but bad for a program. So we need to fix this. Between line 40 and 50 it says BMG";QHS. We need to stick that back at the end of the line above it. Go to the end of line 40, hit delete twice, then the space bar once, and that should bring the code back into one line. Do this to every line that ran over. When done it should read 10 to 330 on the left side without any breaks.
After line 280 replace the rest of the program with this:
281 U=(THRUST/10+.5)*10
282 Z=(LS/10+.5)*10
290 PRINT"":
291 PRINT"THE APPROXIMATE BOLT THRUST IN POUNDS IS:";U
300 PRINT"THE APPROXIMATE BOLT LUG SHEAR STRENGTH IN POUNDS IS:";Z
310 PRINT"THE LUG SHEAR AREA (SQ. INCHES):";
RINT USING".###";SA
320 PRINT"THE AMOUNT OF BOLT LUG FLEX FOR THESE CONDITIONS (INCHES):";
RINT USING".####";FLEX
330 END
It does the same as his orginal program but this version of GW Basic wouldn't print as he had it written. Also if the webpage drops some of the lines down you will need to do as above to get it back on one line.
Now we need to save it. At the top left click File and click Save As. Change the Save As Type box to All Files. Then name the file whatever you want .bas. I called it lug.bas. Then save the file. Remember where you saved it or save it right to the GWBASIC.EXE folder. If you saved it someplace else, go to it and copy it. Go to the folder with the GWBasic exe and paste it into the folder. Now we are ready to give it a try
Click the Basic.exe icon and the program should start. Windows will ask you if you want to run it. Click Run. It should open a black screen that has some words and then says OK. Type Load "whateveryoucalledit" and this will load the program. I called it lug.bas so I type Load "lug". It should come back with OK. Then type Run and the program should start and ask which size of cartridge. Input the values and it should list the results.
If you want to add the 7.62X39 instead of the Magnum in the list of cartridges then replace these two lines in the program.
40 INPUT"1=.222; 2=PPC; 3=.308; 4=7.62X39; 5=378 WBY MAGNUM; 6=.50 BMG";QHS
and
150 IF QHS=4 THEN HS=.356
This will give a close inside diameter of the case head. As before if the webpage drops any lines you will have to put them back on one.
If you need to edit the program after it is saved, then click on it twice. Windows will want to know what you want to open it with. Check "Select from a list" and "Open". Windows will pull up a box. At the bottom by default "Always use the selected program to open" is checked. UNCHECK it and then select notepad from the list above. Click OK and do your editing. When done just click save. If you have it in a different folder than the GW Basic folder, you will need to move the new saved program to the folder and overwrite the old one.
Once you run one set of numbers you have to type Run again to do another set. When finished type system and hit enter. The window should close.