“…10, D$(10) ,D(10) PRINT " ";U$(10) PRINT" 11 MONTHLY SPACE HEATING LOADS -";U$(11) FOR I -1 TO 6 PRINTUSING 09180,M$(I) ,L(I) ,M$(I+6) ,L(I4$) NEXT I PRINT PRINT "ENVIRONMENTAL DATA" PRINT PRINT " 12 AVERAGE DAILY HORIZONTAL RADIATION -";U$(12) FOR I -1 TO 6 PRINTUSING 09180,M$(I) ,H(I) ,M$(I4«) ,H(I+6) 09180: <##### -####.## <##### -####.## NEXT I 09200PRINT 09210 PRINT " 13 AVERAGE GROUND WATER TEMPERATURES -";U$(13) 09220 PRINTUSING 09260,M$(12) ,M$(2) ,N1 09230 PRINTUSING 09260, M$(3) ,M$(5) ,N2 09240 PRINTUSING 09260, M$(6) ,M$(8) ,N3 09250 PRINTUSING 09260, M$(9) ,M$(11) ,N4 09260: <### -<### -###.# 09270 IF M$ -"Y" THEN 09400 09280 PRINT 09290 PRINT 09300 PRINT " ******************************************* 09310 PRINT " ***************** ENERGY ANALYSIS DATA ***************" 09320 PRINT " ********************************************************** 09330 PRINT 09340 PRINT "DATA FOR ECONOMIC ANALYSIS ONLY" 09350 PRINT 09360FOR I -20 TO 25 09370 PRINTUSING 08970, I,D$(I) ,D(I) 09380 PRINT " ";U$(I) 09390 NEXT I 09400 PRINT 09410 PRINT " ******************************************************** N 09420 PRINT " ***************** LIFE CYCLE COST DATA ***************" 09430 PRINT " ********************************************************** 09440 PRINT 09450 PRINT "BASE YEAR INVESTMENT COSTS" 09460 PRINT 09470 FOR I -30 TO 34 09480 PRINTUSING 08970, I,D$(I) ,D(I) 09490 PRINT " ";U$("FUTURE NON-FUEL COSTS" 09540 PRINT 09550 PRINT "SOLAR ENERGY SYSTEM" 09560 PRINTUSING 08970, 40, D$ (40) ,D(40) 09570 PRINT " ";U$(40) A15 PRINT " 41 REPLACEMENT COST AND YEAR" PRINTUSING 09620, R(l) ,R(2) PRINTUSING09620,R(3) ,R(4)PRINTUSING 09620, R(5) ,R(6) 09620:$###### AT YEAR ## PRINTUSING 08970, 42, D$(42) ,D(42) PRINT " ";U$(42) PRINT PRINT "AUXILIARY SYSTEM" PRINTUSING 08970, 44, D$(44) ,D(44) PRINT " ";U$(44) PRINT " 45 REPLACEMENT COST AND YEAR" PRINTUSING 09620, R(7 ) ,R(8) PRINTUSING 09620, R(9) ,R(10) PRINTUSING 09620, R(ll) ,R(12) PRINTUSING 08970, 46, D$(46) ,D(46) PRINT " ";U$(46) PRINT PRINT "REFERENCE NON-SOLAR SYSTEM" PRINTUSING 08970, 47, D$(47) ,D(47) PRINT " ";U$(47) PRINT "48 REPLACEMENT COST AND YEAR" PRINTUSING 09620, R(13) "R(14) PRINTUSING09620, R(15),R(16) PRINTUSING 09620, R(17) ,R(18) PRINTUSING 08970, 49, D$(49) ,D(49) PRINT " ";U$(49) PRINT PRINT " PRINT "FUEL COSTS" 09880PRINT FOR I » 50 TO 57 PRINTUSING 08970, I, D$(I) ,D(I) PRINT " ";U$(I) NEXTI PRINT PRINT "DOE REGION -";R1 58 ENERGY PRICE ESCALATION (Z PER YEAR ABOVE INFLATION) -PRINT PRINT PRINT "…”