home *** CD-ROM | disk | FTP | other *** search
/ Archive Magazine 1996 / ARCHIVE_96.iso / discs / gerald / 6_10 / ElecUsage / To_GF_01 / ELECTRIC-1 < prev    next >
Text File  |  1993-04-10  |  6KB  |  476 lines
  1. K31K31
  2. %OP%PZK33K33
  3. %OP%PZM8M8
  4. %OP%PZM11M33
  5. %OP%PZO7O8
  6. %OP%PZO10O33
  7. %OP%PZO35O35
  8. %OP%PZQ7Q8
  9. %OP%PZQ10Q33
  10. %OP%PZQ35Q35
  11. %OP%PZS7S8
  12. %OP%PZS10S33
  13. %OP%PZS35S35
  14. %OP%PZU7U8
  15. %OP%PZU10U10
  16. %OP%PZU12U12
  17. %OP%PZU14U14
  18. %OP%PZU16U16
  19. %OP%PZU18U18
  20. %OP%PZU20U20
  21. %OP%PZU22U22
  22. %OP%PZU24U24
  23. %OP%PZU26U26
  24. %OP%PZU28U28
  25. %OP%PZU30U30
  26. %OP%PZU32U32
  27. %OP%PZU35U35
  28. %OP%PZW7W8
  29. %OP%PZW10W10
  30. %OP%PZW12W12
  31. %OP%PZW14W14
  32. %OP%PZW16W16
  33. %OP%PZW18W18
  34. %OP%PZW20W20
  35. %OP%PZW22W22
  36. %OP%PZW24W24
  37. %OP%PZW26W26
  38. %OP%PZW28W28
  39. %OP%PZW30W30
  40. %OP%PZW32W32
  41. %OP%PZW35W35
  42. %CO:A,8,118%
  43.  
  44.  
  45.  
  46.  
  47.  
  48.      METER READINGS
  49. PRESENT
  50.  
  51.  
  52.  
  53.  
  54.  
  55.  
  56.  
  57.  
  58.  
  59.  
  60.  
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70.  
  71.  
  72.  
  73.  
  74.  
  75.  
  76. TOTALS FOR YEAR
  77. %CO:B,2,39%%CO:C,5,0%
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  DAY
  87. NIGHT
  88.  DAY
  89. NIGHT
  90.  DAY
  91. NIGHT
  92.  DAY
  93. NIGHT
  94.  DAY
  95. NIGHT
  96.  DAY
  97. NIGHT
  98.  DAY
  99. NIGHT
  100.  DAY
  101. NIGHT
  102.  DAY
  103. NIGHT
  104.  DAY
  105. NIGHT
  106.  DAY
  107. NIGHT
  108.  DAY
  109. NIGHT
  110. %CO:D,2,60%%CO:E,8,48%
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117. PREVIOUS
  118.  
  119.  
  120.  
  121. %V%%R%sum(A10)
  122. %V%%R%sum(A11)
  123. %V%%R%sum(A12)
  124. %V%%R%sum(A13)
  125. %V%%R%sum(A14)
  126. %V%%R%sum(A15)
  127. %V%%R%sum(A16)
  128. %V%%R%sum(A17)
  129. %V%%R%sum(A18)
  130. %V%%R%sum(A19)
  131. %V%%R%sum(A20)
  132. %V%%R%sum(A21)
  133. %V%%R%sum(A22)
  134. %V%%R%sum(A23)
  135. %V%%R%sum(A24)
  136. %V%%R%sum(A25)
  137. %V%%R%sum(A26)
  138. %V%%R%sum(A27)
  139. %V%%R%sum(A28)
  140. %V%%R%sum(A29)
  141. %V%%R%sum(A30)
  142. %V%%R%sum(A31)
  143. %CO:F,2,36%%CO:G,7,91%      ELECTRICITY  CHART  CALCULATOR  BY  B.R.MERRIDAN
  144.  
  145.  
  146.  
  147.  
  148.  
  149.  UNITS
  150.  USED
  151.  
  152. %V%%R%(A10-E10)
  153. %V%%R%(A11-E11)
  154. %V%%R%(A12-E12)
  155. %V%%R%(A13-E13)
  156. %V%%R%(A14-E14)
  157. %V%%R%(A15-E15)
  158. %V%%R%(A16-E16)
  159. %V%%R%(A17-E17)
  160. %V%%R%(A18-E18)
  161. %V%%R%(A19-E19)
  162. %V%%R%(A20-E20)
  163. %V%%R%(A21-E21)
  164. %V%%R%(A22-E22)
  165. %V%%R%(A23-E23)
  166. %V%%R%(A24-E24)
  167. %V%%R%(A25-E25)
  168. %V%%R%(A26-E26)
  169. %V%%R%(A27-E27)
  170. %V%%R%(A28-E28)
  171. %V%%R%(A29-E29)
  172. %V%%R%(A30-E30)
  173. %V%%R%(A31-E31)
  174. %V%%R%(A32-E32)
  175. %V%%R%(A33-E33)
  176.  
  177. %V%%R%sum(G10G33)
  178. %CO:H,2,12%%CO:I,5,77%
  179. UNIT COST DAY     ====   
  180. UNIT COST NIGHT   ====
  181. FIXED CHARGES     ====
  182. VAT PERCENTAGE    ====
  183.  
  184.  
  185.  
  186.  
  187.  DAY
  188. NIGHT
  189.  DAY
  190. NIGHT
  191.  DAY
  192. NIGHT
  193.  DAY
  194. NIGHT
  195.  DAY
  196. NIGHT
  197.  DAY
  198. NIGHT
  199.  DAY
  200. NIGHT
  201.  DAY
  202. NIGHT
  203.  DAY
  204. NIGHT
  205.  DAY
  206. NIGHT
  207.  DAY
  208. NIGHT
  209.  DAY
  210. NIGHT
  211. %CO:J,2,0%%CO:K,13,86%
  212.  
  213.  
  214.  
  215.  
  216.  
  217.      METER READING DATES
  218. %C%PRESENT
  219.  
  220.  
  221. %V%%R%sum(K10)
  222.  
  223. %V%%R%sum(K12)
  224.  
  225. %V%%R%sum(K14)
  226.  
  227. %V%%R%sum(K16)
  228.  
  229. %V%%R%sum(K18)
  230.  
  231. %V%%R%sum(K20)
  232.  
  233. %V%%R%sum(K22)
  234.  
  235. %V%%R%sum(K24)
  236.  
  237. %V%%R%sum(K26)
  238.  
  239. %V%%R%sum(K28)
  240.  
  241. %V%%R%sum(K30)
  242.  
  243. %V%%R%sum(K32)
  244. %CO:L,2,0%%CO:M,13,0%
  245. %V%%R%%LC%%D4%0.0742
  246. %V%%R%%LC%%D4%0.0274
  247. %V%%R%%LC%%D2%14.3
  248. %V%%R%%TC%%D3%0
  249.  
  250.  
  251. %C%PREVIOUS
  252.  
  253.  
  254. %V%%R%sum(M10)
  255. %V%%R%sum(K10)
  256. %V%%R%sum(K11)
  257. %V%%R%sum(K12)
  258. %V%%R%sum(K13)
  259. %V%%R%sum(K14)
  260. %V%%R%sum(K15)
  261. %V%%R%sum(K16)
  262. %V%%R%sum(K17)
  263. %V%%R%sum(K18)
  264. %V%%R%sum(K19)
  265. %V%%R%sum(K20)
  266. %V%%R%sum(K21)
  267. %V%%R%sum(K22)
  268. %V%%R%sum(K23)
  269. %V%%R%sum(K24)
  270. %V%%R%sum(K25)
  271. %V%%R%sum(K26)
  272. %V%%R%sum(K27)
  273. %V%%R%sum(K28)
  274. %V%%R%sum(K29)
  275. %V%%R%sum(K30)
  276. %V%%R%sum(K31)
  277. %CO:N,2,52%%CO:O,5,45%
  278.  DAY
  279. NIGHT
  280.  QTR
  281. PCENT
  282.  
  283. NO OF
  284. DAYS
  285.  
  286. %V%%R%sum(K10-M10)
  287. %V%%R%sum(K11-M11)
  288. %V%%R%sum(K12-M12)
  289. %V%%R%sum(K13-M13)
  290. %V%%R%sum(K14-M14)
  291. %V%%R%sum(K15-M15)
  292. %V%%R%sum(K16-M16)
  293. %V%%R%sum(K17-M17)
  294. %V%%R%sum(K18-M18)
  295. %V%%R%sum(K19-M19)
  296. %V%%R%sum(K20-M20)
  297. %V%%R%sum(K21-M21)
  298. %V%%R%sum(K22-M22)
  299. %V%%R%sum(K23-M23)
  300. %V%%R%sum(K24-M24)
  301. %V%%R%sum(K25-M25)
  302. %V%%R%sum(K26-M26)
  303. %V%%R%sum(K27-M27)
  304. %V%%R%sum(K28-M28)
  305. %V%%R%sum(K29-M29)
  306. %V%%R%sum(K30-M30)
  307. %V%%R%sum(K31-M31)
  308. %V%%R%sum(K32-M32)
  309. %V%%R%sum(K33-M33)
  310.  
  311. %V%%R%O10+O12+O14+O16+O18+O20+O22+O24+O26+O28+O30+O32
  312. %CO:P,2,38%%CO:Q,6,0%
  313.  
  314.  
  315.  
  316.  
  317.  
  318. AV PER
  319.  DAY
  320.  
  321. %V%%R%sum(G10/O10)
  322. %V%%R%sum(G11/O11)
  323. %V%%R%sum(G12/O12)
  324. %V%%R%sum(G13/O13)
  325. %V%%R%sum(G14/O14)
  326. %V%%R%sum(G15/O15)
  327. %V%%R%sum(G16/O16)
  328. %V%%R%sum(G17/O17)
  329. %V%%R%sum(G18/O18)
  330. %V%%R%sum(G19/O19)
  331. %V%%R%sum(G20/O20)
  332. %V%%R%sum(G21/O21)
  333. %V%%R%sum(G22/O22)
  334. %V%%R%sum(G23/O23)
  335. %V%%R%sum(G24/O24)
  336. %V%%R%sum(G25/O25)
  337. %V%%R%sum(G26/O26)
  338. %V%%R%sum(G27/O27)
  339. %V%%R%sum(G28/O28)
  340. %V%%R%sum(G29/O29)
  341. %V%%R%sum(G30/O30)
  342. %V%%R%sum(G31/O31)
  343. %V%%R%sum(G32/O32)
  344. %V%%R%sum(G33/O33)
  345.  
  346. %V%%R%sum(Q10Q33)
  347. %CO:R,2,0%%CO:S,9,0%
  348.  
  349.  
  350.  
  351.  
  352.  
  353.   UNIT
  354.  CHARGES
  355.  
  356. %V%%R%%LC%%D2%G10*M2
  357. %V%%R%%LC%%D2%G11*M3
  358. %V%%R%%LC%%D2%G12*M2
  359. %V%%R%%LC%%D2%G13*M3
  360. %V%%R%%LC%%D2%G14*M2
  361. %V%%R%%LC%%D2%G15*M3
  362. %V%%R%%LC%%D2%G16*M2
  363. %V%%R%%LC%%D2%G17*M3
  364. %V%%R%%LC%%D2%G18*M2
  365. %V%%R%%LC%%D2%G19*M3
  366. %V%%R%%LC%%D2%G20*M2
  367. %V%%R%%LC%%D2%G21*M3
  368. %V%%R%%LC%%D2%G22*M2
  369. %V%%R%%LC%%D2%G23*M3
  370. %V%%R%%LC%%D2%G24*M2
  371. %V%%R%%LC%%D2%G25*M3
  372. %V%%R%%LC%%D2%G26*M2
  373. %V%%R%%LC%%D2%G27*M3
  374. %V%%R%%LC%%D2%G28*M2
  375. %V%%R%%LC%%D2%G29*M3
  376. %V%%R%%LC%%D2%G30*M2
  377. %V%%R%%LC%%D2%G31*M3
  378. %V%%R%%LC%%D2%G32*M2
  379. %V%%R%%LC%%D2%G33*M3
  380.  
  381. %V%%R%%LC%%D2%sum(S10S33)
  382. %CO:T,2,0%%CO:U,7,21%
  383.  
  384.  
  385.  
  386.  
  387.  
  388.   VAT
  389. CHARGES
  390.  
  391. %V%%R%%LC%%D2%sum(S10+S11+M4)*M5
  392.  
  393. %V%%R%%LC%%D2%sum(S12+S13+M4)*M5
  394.  
  395. %V%%R%%LC%%D2%sum(S14+S15+M4)*M5
  396.  
  397. %V%%R%%LC%%D2%sum(S16+S17+M4)*M5
  398.  
  399. %V%%R%%LC%%D2%sum(S18+S19+M4)*M5
  400.  
  401. %V%%R%%LC%%D2%sum(S20+S21+M4)*M5
  402.  
  403. %V%%R%%LC%%D2%sum(S22+S23+M4)*M5
  404.  
  405. %V%%R%%LC%%D2%sum(S24+S25+M4)*M5
  406.  
  407. %V%%R%%LC%%D2%sum(S26+S27+M4)*M5
  408.  
  409. %V%%R%%LC%%D2%sum(S28+S29+M4)*M5
  410.  
  411. %V%%R%%LC%%D2%sum(S30+S31+M4)*M5
  412.  
  413. %V%%R%%LC%%D2%sum(S32+S33+M4)*M5
  414.  
  415.  
  416. %V%%R%%LC%%D2%sum(U10U33)
  417. %CO:V,2,15%%CO:W,9,11%
  418.  
  419.  
  420.  
  421.  
  422.  
  423.   TOTAL
  424.  CHARGES
  425.  
  426. %V%%R%%LC%%D2%S10+S11+M4+U10
  427.  
  428. %V%%R%%LC%%D2%S12+S13+M4+U12
  429.  
  430. %V%%R%%LC%%D2%S14+S15+M4+U14
  431.  
  432. %V%%R%%LC%%D2%S16+S17+M4+U16
  433.  
  434. %V%%R%%LC%%D2%S18+S19+M4+U18
  435.  
  436. %V%%R%%LC%%D2%S20+S21+M4+U20
  437.  
  438. %V%%R%%LC%%D2%S22+S23+M4+U22
  439.  
  440. %V%%R%%LC%%D2%S24+S25+M4+U24
  441.  
  442. %V%%R%%LC%%D2%S26+S27+M4+U26
  443.  
  444. %V%%R%%LC%%D2%S28+S29+M4+U28
  445.  
  446. %V%%R%%LC%%D2%S30+S31+M4+U30
  447.  
  448. %V%%R%%LC%%D2%S32+S33+M4+U32
  449.  
  450.  
  451. %V%%R%%LC%%D2%sum(W10W33)
  452. FileDataéGeraldÅD▐² nú ú%OP%VS4.13 (28-Apr-92), Gerald L Fitton, R4000 5966 9904 9938 
  453. %OP%JUY
  454. %OP%DP2
  455. %OP%IRN
  456. %OP%PL70
  457. %OP%HM0
  458. %OP%FM0
  459. %OP%BM0
  460. %OP%LM6
  461. %OP%FS14000
  462. %OP%PT0
  463. %OP%PDHPJet
  464. %OP%WC2,2262,44,1748,0,0,0,0
  465. %CO:A,6,75%%R%Mr B.R.Merridan
  466. %R%88 Belsize Road
  467. %R%Hemel Hempstead
  468. %R%Herts.  HP3 8DQ
  469. %R%Phone 044265182
  470.  
  471. Dear Gerald,
  472.  
  473. %JR%I have make up this quite simple electric chart calculator which may be of 
  474. interest to others.
  475.  
  476. %JR%I have asked a question which you or readers may be able to s