Home Energy Analysis

A home energy calculator. Choose A for air conditioning or H for heating, then enter the month, the cost from your utility bill, the units used and the degree days for the month. The program prints the cost per unit, the comfort energy cost (the cost of the energy used for heating or cooling, after taking off your usual non-heating use), the cost per degree day and an efficiency rating. Enter 1 to do another month.

Lines 250 and 260 subtract 500 units as an example of normal usage. The article asks you to replace that figure with your own average from months when you neither heat nor cool: electricity use in line 250 and fuel use in line 260.

The article says the program runs on a 1K ZX81, but in 1K it runs out of memory (report 4) before it prints the last two results. It runs in 2K.

Published in Syntax December 1982 (Home Energy Analysis).

Related Articles

Home Energy Analysis

Takes into account the effectiveness of both heating and cooling systems and other factors affecting energy usage in your home.

Image Gallery

Source Code

  10 LET L$=""
  20 CLS
  30 PRINT
  40 PRINT "***** HOME ENERGY ANALYSIS*****"
  50 PRINT
  60 IF L$="A" OR L$="H" THEN GOTO 100
  70 PRINT "CHOOSE ONE; A-AIR COND. H-HEAT"
  80 INPUT L$
  90 GOTO 20
 100 PRINT "MONTH? (ABBREVIATE) ";
 110 INPUT K$
 120 PRINT K$
 130 PRINT "COST? ";
 140 INPUT X
 150 PRINT X
 160 PRINT "UNITS USED? ";
 170 INPUT Y
 180 PRINT Y
 190 PRINT "DEGREES DAYS? ";
 200 INPUT Z
 210 PRINT Z
 220 PRINT
 230 LET A=X/Y
 240 PRINT "COST PER UNIT ";A
 250 IF L$="A" THEN LET Y=Y-500
 260 IF L$="H" THEN LET Y=Y-500
 270 LET D=A*Y
 280 PRINT K$;" COMFORT ENERGY COST ";D
 290 LET B=D/Z
 300 PRINT "COST PER DEGREE DAY ";B
 310 LET C=Y/Z
 320 PRINT "EFFICIENCY RATING ";C
 330 PRINT
 340 PRINT "ENTER 1 TO CONTINUE, 2 TO STOP"
 350 INPUT K
 360 IF K=1 THEN RUN

Note: Type-in program listings on this website use ZMAKEBAS notation for graphics characters.