home *** CD-ROM | disk | FTP | other *** search
/ Explore the World of Soft…e: Engineering & Science / Explore_the_World_of_Software_Engineering_and_Science_HRS_Software_1998.iso / programs / electrnc / mcgarret.exe / VTODBM.BAS < prev    next >
BASIC Source File  |  1988-03-09  |  596b  |  19 lines
  1. 100 REM PROGRAM "VTODBM" CONVERTS RMS VOLTS TO DBM IN A 50 OHM SYSTEM.
  2. 110 REM D. McGARRETT WROTE ME 8 MARCH 88 VER 1.0
  3. 120 REM COPYRIGHT 1988 BY D. McGARRETT. REPRODUCTION FOR NON-COMMERCIAL USE
  4. 130 REM PERMITTED; MAY NOT BE SOLD.
  5. 140 CLS
  6. 150 PRINT"OUTPUT IS FOR 50 OHM SYSTEM" : PRINT
  7. 160 INPUT"PLEASE ENTER THE VOLTAGE TO CONVERT ",V
  8. 170 PRINT
  9. 180 P=V^2/50
  10. 190 DBM=(10*(LOG(P)/LOG(10)))+30
  11. 200 PRINT"POWER LEVEL IS",
  12. 210 PRINT USING "+###.#";DBM,
  13. 220 PRINT" DBM"
  14. 230 PRINT
  15. 240 INPUT"ANOTHER";AN$
  16. 250 IF AN$="Y" THEN CLS : GOTO 160
  17. 260 IF AN$="y" THEN CLS : GOTO 160
  18. 270 END
  19.