O/T: Monroe 324G Scientist Programmable - Printable Version +- HP Forums (https://archived.hpcalc.org/museumforum) +-- Forum: HP Museum Forums (https://archived.hpcalc.org/museumforum/forum-1.html) +--- Forum: Old HP Forum Archives (https://archived.hpcalc.org/museumforum/forum-2.html) +--- Thread: O/T: Monroe 324G Scientist Programmable (/thread-129318.html) O/T: Monroe 324G Scientist Programmable - Geoff Quickfall - 12-08-2007 Wow, talk about barely portable. Just finished restoring this by completely dis-assembling the 4 boards from each other and cleaning all contacts. The interior looks like a modern day computer with plugs and jumpers attaching the boards together. Any way, just wrote two programs for it: Great Circle Bearing and Great Circle Distance. Load one on program side 1 and the other on program side 2. You can find the formulae on the web, would have printed them here but the formatting would not accept it. This is a key and learn programming language with the ability to accept two separate 80 line programs. There are no conditional tests so I have a workaround for that. The Bearing program may come up with the wrong heading by 180 degrees because one cannot test for a negative sin and work that into the program. What I did was to slip in a subroutine (E and F) at the end of the bearing program to calculate the sin, display, if negative, then press start again and the reciprocal of the bearing is displayed. In other words, you run the conditional test. All this about 4 years before the HP 65. Cheers, Geoff ```MONROE SCIENTIST 324G GREAT CIRCLE DISTANCE PROGRAM VARIABLE FORMULA EXAMPLE KEY KEY • Latitude initial LAT.I N 049.05’ HMS-DEC STO 0 • Longitude initial LON.I W 123.09’ HMS-DEC STO 1 • Latitude final LAT.F S 037.57’ HMS-DEC STO 2 • Longitude final LON.F E 151.11’ HMS-DEC STO 3 1. SET DISPLAY TO ZERO 2. CONVERT LATITUDES AND LONGITUDES TO DECIMAL BEFORE STORING 3. EAST LATITUDES AND SOUTH LONGITUDES ENTER AS NEGATIVE 4. RUN THIS PROGRAM FIRST, THEN COURSE PROGRAM PROGRAM LISTING RCL 3 - RCL 1 = A SIN/COS 2ND STO 4 RCL 0 SIN/COS 2ND B STO * 4 RCL 2 SIN/COS 2ND C STO * 4 RCL 0 SIN/COS * D RCL 2 SIN/COS = + RCL 4 = SIN-1/COS-1 E 2ND STO 5 * 60 F = STOP PROGRAM SECTION EXPLANATION A = COS(LON.I – LON.F) B = COS(LAT.I) C = COS(LAT.F) D = SIN(LAT.I) * SIN(LAT.F) + A * B * C E = ARCOS(D) F = DISTANCE NM USE IN PLACE OF 60 69 FOR SM 111.11 FOR KM VARIABLE REGISTERS LAT.I 0 LON.I 1 LAT.F 2 LON.F 3 A 4 A * B 4 A * B * C 4 DISTANCE ARC 5 MONROE SCIENTIST 326 GREAT CIRCLE BEARING PROGRAM 1. BEARING PROGRAM USES DATA GENERATED BY GREAT CIRCLE DISTANCE PROGRAM 2. DISTANCE PROGRAM MUST BE RUN FIRST TO SUPPLY GREAT CIRCLE DISTANCE ARC IN STORAGE REGISTER 5. 3. IF SIN (LON.I – LON.F) IS NEGATIVE, TRUE BEARING IS: 360 –- C 4. TO TEST FOR NEGATIVE SIGN RUN SECTION E 5. IF SIGN IS NEGATIVE THEN RUN SECTION F FOR BEARING PROGRAM LISTING RCL 0 SIN/COS 2ND * A RCL 5 SIN/COS = STO 6 RCL 0 SIN/COS * RCL 5 B SIN/COS 2ND = STO 7 RCL 2 SIN/COS C - RCL 7 / RCL 6 = SIN-1/COS-1 D 2ND STO 8 STOP RCL 1 - RCL 3 = E SIN STOP 360 - F RCL 8 = STOP PROGRAM SECTION EXPLANATION A = cos(LAT.I) * sin(DIST ARC) B = sin(LAT.I) * cos(DIST ARC) C = sin(LAT.F) - (sin(LAT.I) * cos(DIST ARC) D = COURSE E = TEST FOR NEGATIVE SIGN F = IF SIGN NEGATIVE EXECUTE F FOR BEARING VARIABLE REGISTERS LAT.I 0 LON.I 1 LAT.F 2 LON.F 3 DISTANCE ARC 5 BEARING FOR SIGN TEST 8 EXAMPLE: ON CALCULATOR LOAD: • GREAT CIRCLE DISTANCE PROGRAM IN MEMORY 1 • GREAT CIRCLE BEARING PROGRAM IN MEMORY 2 • ENTER LAT.I, CONVERT TO DECIMAL, STORE IN REGISTER 0 • ENTER LON.I, CONVERT TO DECIMAL, STORE IN REGISTER 1 • ENTER LAT.F, CONVERT TO DECIMAL, STORE IN REGISTER 2 • ENTER LON.F, CONVERT TO DECIMAL, STORE IN REGISTER 3 1. SELECT PROGRAM 1 AND START 2. DISTANCE IS SHOWN IN NAUTICAL MILES 3. SELECT PROGRAM 2 AND START 4. BEARING IS SHOWN IN DEGREES • PRESS START TO SEE IF THE SINE(LON.I – LON.F) IS NEGATIVE • IF NOT NEGATIVE THEN PREVIOUS BEARING IS CORRECT • IF NEGATIVE THEN PRESS START AGAIN TO SEE CORRECTED BEARING VANCOUVER N 49’05” W 123’09” SYDNEY S 37’57” E 151’.11” DISTANCE = 6911 BEARING = 240’ TRUE ``` Edited: 8 Dec 2007, 1:57 p.m. Re: O/T: Monroe 324G Scientist Programmable - Maximilian Hohmann - 12-08-2007 Hello! Quote:Wow, talk about barely portable. Well, not less portable than an hp-97! I really love these "Compucorpses", truely amazing machines. You probably have come across this text already, if not it is certainly worth reading: http://www.oldcalculatormuseum.com/d-compucorp.html Did you try the example from the manual for computing factorials? The only way to break the loop is to force the end of the program by generating an error condition (negative square root)! The later model 326 (from 1974) has some program control functions and a cassette recorder for storing programs. Strangely, these rare calculators are sold much cheaper than commonplace hp calculators like the 42S. Thanks to this disinterest of many collectors, I am now only missing the 360 "bond trader" and the 340 "statistician" from my collection, of all the other 300-series models I have at least one (320, 322, 324, 326+392 cassette tape, 342, 344 and 354 "Surveyor") :-) Greetings, Max funny quirk during the program phase, - Geoff Quickfall - 12-08-2007 I also noticed a funny quirk, as you key in the program sequence it actually calculates the answer as you go. In other words you have to have the registers filled with the correct variables or the programming will generate an error! and prevent you from continuing with the programming. On the upside, once the program is in you can check the answer with the example and know there were no mistakes during the keying in phase. This really turns the eyes in the cockpit when I cross check our latitude and longitude distance and bearing between waypoints on the flight plan and onboard FMC (flight management computer) My backup is the HP 67 and my HP 01: thats the FMC (the green CRT on the central pedastal) Cheers, Geoff Re: funny quirk during the program phase, - Stefan Vorkoetter - 12-08-2007 Neat pic, but why isn't HP-67 on the console and the HP-01 on your wrist? Stefan Re: funny quirk during the program phase, - Geoff Quickfall - 12-08-2007 Well the hp 67 was in the flight bag to my right and the HP 01 was counting down the elapsed time / fuel remaining. Had to take the HP 01 off my wrist for the shot as the camera did not have a macro function. here's another shot of the HP 01 with the FMC in latitude/longitude mode. Re: funny quirk during the program phase, - Don Shepherd - 12-08-2007 Great picture Geoff! I see you were about to cross the International Date Line, where Sunday becomes Monday! Re: funny quirk during the program phase, - Dave Shaffer (Arizona) - 12-08-2007 Since I trundle around in Cessna 172s and don't recognize your console, what are you flying? Thats a Boeing 767-330 - Geoff Quickfall - 12-08-2007 Not quite that new but still got a few more toys than the C-172. Got about 200 hours in the Skyhawk then moved on to the: ```c-185 on floats DHC2 Beaver on floats DHC3 Otter on floats Beech 18 on floats B-737-200 DC10-30 B767-200 & 300 and soon to be the B777-200 & 300 ``` Cheers, Geoff Edited: 8 Dec 2007, 10:55 p.m. Re: O/T: Monroe 324G Scientist Programmable - bill platt - 12-08-2007 That's a nice foto. I think Dave Hicks will be impressed. Re: O/T: Monroe 324G Scientist Programmable - Katie Wasserman - 12-09-2007 Max, I really like the 300 series Compucorp too, you forgot one model though the 360/65. I have that one and all the others except the plain 360. I hope we don't get into a bidding war on ebay over that! :) -Katie Re: O/T: Monroe/CompuCorp Bond Trader 360/65 - Eric Bjornson - 12-15-2007 I own a Monroe 3180 Bond Trader. Do you know if the CompuCorp Bond Trader 360/65 or the Monroe equivalents have any patent numbers?? I can't find any patent numbers anywhere. ?? I've only found a few Monroe design patents... but no Utility patents in the late 70's - early 80's. Thank you! Eric Bjornson cell: 250.744.8751 eric@trading.tc Free Inflight Fuelchecks Software for you Geoff ? Re: Thats a Boeing 767-330 - Antoine M. Couëtte - 12-16-2007 Hello Geoff, I was highly interested at reading your Post and - as you will see hereafter - I instantly recognized your B 767 Cockpit ... So, as my money back :-))) , and if you are interested in some Airborne Fuelcheck Software I just recently wrote for DC10-30, B767 ... - or ANY other Jet A/C since I had lately modified this Software into easily accepting ANY JET A/C - please have a look here. Once you have this software, you just need to enter 6 or 7 constants pertaining to your A/C ( MTOW, MLDW, ... , COMPANY FINAL RESERVE FUEL ... ) Ahhh ! And by the way this software also computes all your Actual Limitations in a very accurate and realistic way, much better than the classical load sheets computations which ALWAYS compute a too big last minute extra Payload because they just forget that carrying any extra Payload implies carrying extra Fuel ... It can ruin your day on a long haul flight ... And the free package comes complete with a free 30 page document I recently wrote on Transport Coefficients Computations which work extremely well on ANY long haul Aircraft trip. Friendly yours Antoine