Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_30.ADF » P/FORM
P/FORM
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Personal collection » Acorn ADFS disks » Electron_User_Group » EUG_30.ADF |
Filename: | P/FORM |
Read OK: | ✔ |
File size: | 10F4 bytes |
Load address: | FFFF0E00 |
Exec address: | FFFF802B |
File contents
10MODE3 20REM ELECTRICAL TEST SHEET GENERATING PROGRAM 30PRINTTAB(0,0)"ELECTRICAL TEST SHEET GENERATING PROGRAM" 40INPUT"ENTER CLIENT'S NAME "client$:PRINTTAB(50,1)client$ 50INPUT"ENTER CLIENT'S ADDRESS "address$:PRINTTAB(50,3)address$ 60PRINT"Type of Installation:" 70PRINT"1=new 2=alteration 3=addition " 80REPEAT:a%=INSTR("123",GET$):UNTILa% 90IF a%=1 type$=" ---------- --------":PRINTTAB(50,5)"NEW" 100IF a%=2 type$=" --- --------":PRINTTAB(50,5)"ALTERATION" 110IF a%=3 type$=" --- ---------- ":PRINTTAB(50,5)"ADDITION" 120PRINT"Type of Earthing:" 130PRINT"1=TN-C 2=TN-S 3=TN-C-S 4=TT 5=IT" 140REPEAT:a%=INSTR("12345",GET$):UNTILa% 150IF a%=1 earth$=" ---- ------ -- --":PRINTTAB(50,7)"TN-C" 160IF a%=2 earth$=" ---- ------ -- --":PRINTTAB(50,7)"TN-S" 170IF a%=3 earth$=" ---- ---- -- --":PRINTTAB(50,7)"TN-C-S" 180IF a%=4 earth$=" ---- ---- ------ --":PRINTTAB(50,7)"TT" 190IF a%=5 earth$=" ---- ---- ------ --":PRINTTAB(50,7)"IT" 200INPUT"ENTER EARTH ELECTRODE RESISTANCE"ohm:PRINTTAB(50,9)"Earth electrode R = ";ohm 210INPUT"METHOD OF MEASUREMENT";method$:PRINTTAB(50,11)"Measurement method ";method$ 220INPUT"ENTER TYPE OF EARTH ELECTRODE AND LOCATION";typloc$:PRINTTAB(50,13)"Type and location ";typloc$ 410PRINT"PRESS SPACE TO PRINT":A=GET 420MODE3 430VDU2:REM Sends output to printer 440VDU1,27,1,120,1,1:REM Puts printer into NLQ mode 450PRINT"FORMS OF COMPLETION AND INSPECTION CERTIFICATE" 460VDU1,27,1,15:REM Condensed print 470PRINT"(as prescribed in the IEE Regulations for Electrical Installations(1))" 480VDU1,18:REM CANCEL CONDENSED PRINTING 490PRINT"DETAILS OF INSTALLATION" 500VDU1,27,1,15 510PRINT"Client "client$ 520PRINT 530PRINT"Address "address$ 540PRINT 550PRINT 560PRINT 570PRINT"_________________________________________________________________________" 580PRINT 590VDU1,18 600PRINT"PARTICULARS OF INSTALLATION" 610VDU1,27,1,15 620PRINT"(Delete or complete items as appropriate)" 630PRINT 640PRINT"Type of installation New/Alteration/Addition/to existing installation." 650VDU1,27,1,10:PRINT type$:REM REVERSE LINE FEED TO CROSS OUT UNWANTED ITEMS 660PRINT"Type of earthing (312-03) TN-C TN-S TN-C-S TT IT" 670VDU1,27,1,10:PRINT earth$ 680PRINT"Earth electrode: Resistance "ohm" ohms" 690PRINT 700PRINT" Method of measurement ";method$ 710PRINT 720PRINT" Type (542-02-01) and location ";typloc$ 730PRINT:REM QUESTIONS ONLY TAKEN THIS FAR 740PRINT"Characteristics of the supply at the origin of the installation (313-01)" 750PRINT 760PRINT" Nominal voltage.....................................volts" 770PRINT 780PRINT" Frequency...........................................Hz" 790PRINT 800PRINT" Number of phases..............." 810PRINT 820PRINT" Prospective short-circuit current...............kA how determined enquiry.....calculation.....measurement....." 830PRINT 840PRINT" Earth fault loop impedance (Z";:VDU1,27,1,83,1,1:PRINT"e";:VDU1,27,1,84:PRINT") ...............ohms how determined enquiry.....calculation.....measurement.....":REM SUBSCRIPE ON TO PRINT e THEN OFF AGAIN 850PRINT 860PRINT" Maximum demand per phase ...........................A" 870PRINT 880PRINT" Over current protective device - Type BS.................. Rating ..................A" 890PRINT 900PRINT" Main switch or circuit breaker (460-01-02): Type BS............. Rating ............A No of poles........" 910PRINT 920PRINT" (if an rcd rated residual current I";:VDU1,27,1,83,1,49:PRINT"an";:VDU1,27,1,84:PRINT"...............mA" 930PRINT 940PRINT 950PRINT"Method of protection against indirect contact" 960PRINT 970PRINT"1. Earthed equipotential bonding and automatic disconnection of supply .........." 980PRINT 990PRINT"or" 1000PRINT 1010PRINT"2. Other ...... (Describe)................................................................................" 1020PRINT 1030PRINT"Main equipotential bonding conductors (413-02-01/02. 547-02-01): Size ...............mm";:VDU1,27,1,83,1,0:PRINT"2":VDU1,27,1,84 1040PRINT 1050PRINT"Schedule of test results: Continuation ......................................pages" 1060PRINT 1070PRINT"Details of departures (if any from Wiring Regulations (120-04, 120-05) ........................" 1080PRINT 1090PRINT"Comments on existing installation, where applicable (743-01-01): .............." 1100VDU3 1110VDU1,18
�3 .� ELECTRICAL TEST SHEET GENERATING PROGRAM 4�0,0)"ELECTRICAL TEST SHEET GENERATING PROGRAM" (1�"ENTER CLIENT'S NAME "client$:�50,1)client$ 26�"ENTER CLIENT'S ADDRESS "address$:�50,3)address$ <�"Type of Installation:" F%�"1=new 2=alteration 3=addition " P�:a%=�"123",�):�a% ZV� a%=1 type$=" ---------- --------":�50,5)"NEW" d]� a%=2 type$=" --- --------":�50,5)"ALTERATION" nS� a%=3 type$=" --- ---------- ":�50,5)"ADDITION" x�"Type of Earthing:" �'�"1=TN-C 2=TN-S 3=TN-C-S 4=TT 5=IT" ��:a%=�"12345",�):�a% �k� a%=1 earth$=" ---- ------ -- --":�50,7)"TN-C" �k� a%=2 earth$=" ---- ------ -- --":�50,7)"TN-S" �m� a%=3 earth$=" ---- ---- -- --":�50,7)"TN-C-S" �i� a%=4 earth$=" ---- ---- ------ --":�50,7)"TT" �a� a%=5 earth$=" ---- ---- ------ --":�50,7)"IT" �L�"ENTER EARTH ELECTRODE RESISTANCE"ohm:�50,9)"Earth electrode R = ";ohm �J�"METHOD OF MEASUREMENT";method$:�50,11)"Measurement method ";method$ �^�"ENTER TYPE OF EARTH ELECTRODE AND LOCATION";typloc$:�50,13)"Type and location ";typloc$ ��"PRESS SPACE TO PRINT":A=� ��3 � �2:� Sends output to printer �0�1,27,1,120,1,1:� Puts printer into NLQ mode �5�"FORMS OF COMPLETION AND INSPECTION CERTIFICATE" � �1,27,1,15:� Condensed print �M�"(as prescribed in the IEE Regulations for Electrical Installations(1))" �%�1,18:� CANCEL CONDENSED PRINTING ��"DETAILS OF INSTALLATION" ��1,27,1,15 ��"Client "client$ � �"Address "address$ � &� 0� :P�"_________________________________________________________________________" D� N �1,18 X"�"PARTICULARS OF INSTALLATION" b�1,27,1,15 l0�"(Delete or complete items as appropriate)" v� �W�"Type of installation New/Alteration/Addition/to existing installation." �F�1,27,1,10:� type$:� REVERSE LINE FEED TO CROSS OUT UNWANTED ITEMS �P�"Type of earthing (312-03) TN-C TN-S TN-C-S TT IT" ��1,27,1,10:� earth$ �;�"Earth electrode: Resistance "ohm" ohms" �� �E�" Method of measurement ";method$ �� �M�" Type (542-02-01) and location ";typloc$ �%�:� QUESTIONS ONLY TAKEN THIS FAR �O�"Characteristics of the supply at the origin of the installation (313-01)" �� �O�" Nominal voltage.....................................volts" � L�" Frequency...........................................Hz" � 5�" Number of phases..............." *� 4y�" Prospective short-circuit current...............kA how determined enquiry.....calculation.....measurement....." >� H��" Earth fault loop impedance (Z";:�1,27,1,83,1,1:�"e";:�1,27,1,84:�") ...............ohms how determined enquiry.....calculation.....measurement.....":� SUBSCRIPE ON TO PRINT e THEN OFF AGAIN R� \K�" Maximum demand per phase ...........................A" f� pk�" Over current protective device - Type BS.................. Rating ..................A" z� �x�" Main switch or circuit breaker (460-01-02): Type BS............. Rating ............A No of poles........" �� �q�" (if an rcd rated residual current I";:�1,27,1,83,1,49:�"an";:�1,27,1,84:�"...............mA" �� �� �4�"Method of protection against indirect contact" �� �X�"1. Earthed equipotential bonding and automatic disconnection of supply .........." �� � �"or" �� �q�"2. Other ...... (Describe)................................................................................" �� ��"Main equipotential bonding conductors (413-02-01/02. 547-02-01): Size ...............mm";:�1,27,1,83,1,0:�"2":�1,27,1,84 � Y�"Schedule of test results: Continuation ......................................pages" $� .f�"Details of departures (if any from Wiring Regulations (120-04, 120-05) ........................" 8� BV�"Comments on existing installation, where applicable (743-01-01): .............." L�3 V �1,18 �
00000000 0d 00 0a 06 eb 33 0d 00 14 2e f4 20 45 4c 45 43 |.....3..... ELEC| 00000010 54 52 49 43 41 4c 20 54 45 53 54 20 53 48 45 45 |TRICAL TEST SHEE| 00000020 54 20 47 45 4e 45 52 41 54 49 4e 47 20 50 52 4f |T GENERATING PRO| 00000030 47 52 41 4d 0d 00 1e 34 f1 8a 30 2c 30 29 22 45 |GRAM...4..0,0)"E| 00000040 4c 45 43 54 52 49 43 41 4c 20 54 45 53 54 20 53 |LECTRICAL TEST S| 00000050 48 45 45 54 20 47 45 4e 45 52 41 54 49 4e 47 20 |HEET GENERATING | 00000060 50 52 4f 47 52 41 4d 22 0d 00 28 31 e8 22 45 4e |PROGRAM"..(1."EN| 00000070 54 45 52 20 43 4c 49 45 4e 54 27 53 20 4e 41 4d |TER CLIENT'S NAM| 00000080 45 20 22 63 6c 69 65 6e 74 24 3a f1 8a 35 30 2c |E "client$:..50,| 00000090 31 29 63 6c 69 65 6e 74 24 0d 00 32 36 e8 22 45 |1)client$..26."E| 000000a0 4e 54 45 52 20 43 4c 49 45 4e 54 27 53 20 41 44 |NTER CLIENT'S AD| 000000b0 44 52 45 53 53 20 22 61 64 64 72 65 73 73 24 3a |DRESS "address$:| 000000c0 f1 8a 35 30 2c 33 29 61 64 64 72 65 73 73 24 0d |..50,3)address$.| 000000d0 00 3c 1c f1 22 54 79 70 65 20 6f 66 20 49 6e 73 |.<.."Type of Ins| 000000e0 74 61 6c 6c 61 74 69 6f 6e 3a 22 0d 00 46 25 f1 |tallation:"..F%.| 000000f0 22 31 3d 6e 65 77 20 32 3d 61 6c 74 65 72 61 74 |"1=new 2=alterat| 00000100 69 6f 6e 20 33 3d 61 64 64 69 74 69 6f 6e 20 22 |ion 3=addition "| 00000110 0d 00 50 16 f5 3a 61 25 3d a7 22 31 32 33 22 2c |..P..:a%=."123",| 00000120 be 29 3a fd 61 25 0d 00 5a 56 e7 20 61 25 3d 31 |.):.a%..ZV. a%=1| 00000130 20 74 79 70 65 24 3d 22 20 20 20 20 20 20 20 20 | type$=" | 00000140 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000150 20 20 20 20 20 20 20 20 20 20 20 2d 2d 2d 2d 2d | -----| 00000160 2d 2d 2d 2d 2d 20 2d 2d 2d 2d 2d 2d 2d 2d 22 3a |----- --------":| 00000170 f1 8a 35 30 2c 35 29 22 4e 45 57 22 0d 00 64 5d |..50,5)"NEW"..d]| 00000180 e7 20 61 25 3d 32 20 74 79 70 65 24 3d 22 20 20 |. a%=2 type$=" | 00000190 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000001a0 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 2d 2d | ---| 000001b0 20 20 20 20 20 20 20 20 20 20 20 20 2d 2d 2d 2d | ----| 000001c0 2d 2d 2d 2d 22 3a f1 8a 35 30 2c 35 29 22 41 4c |----":..50,5)"AL| 000001d0 54 45 52 41 54 49 4f 4e 22 0d 00 6e 53 e7 20 61 |TERATION"..nS. a| 000001e0 25 3d 33 20 74 79 70 65 24 3d 22 20 20 20 20 20 |%=3 type$=" | 000001f0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000200 20 20 20 20 20 20 20 20 20 20 2d 2d 2d 20 2d 2d | --- --| 00000210 2d 2d 2d 2d 2d 2d 2d 2d 20 22 3a f1 8a 35 30 2c |-------- ":..50,| 00000220 35 29 22 41 44 44 49 54 49 4f 4e 22 0d 00 78 18 |5)"ADDITION"..x.| 00000230 f1 22 54 79 70 65 20 6f 66 20 45 61 72 74 68 69 |."Type of Earthi| 00000240 6e 67 3a 22 0d 00 82 27 f1 22 31 3d 54 4e 2d 43 |ng:"...'."1=TN-C| 00000250 20 32 3d 54 4e 2d 53 20 33 3d 54 4e 2d 43 2d 53 | 2=TN-S 3=TN-C-S| 00000260 20 34 3d 54 54 20 35 3d 49 54 22 0d 00 8c 18 f5 | 4=TT 5=IT".....| 00000270 3a 61 25 3d a7 22 31 32 33 34 35 22 2c be 29 3a |:a%=."12345",.):| 00000280 fd 61 25 0d 00 96 6b e7 20 61 25 3d 31 20 65 61 |.a%...k. a%=1 ea| 00000290 72 74 68 24 3d 22 20 20 20 20 20 20 20 20 20 20 |rth$=" | 000002a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002b0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d | -| 000002c0 2d 2d 2d 20 20 20 20 20 20 2d 2d 2d 2d 2d 2d 20 |--- ------ | 000002d0 20 20 20 20 20 2d 2d 20 20 20 20 20 20 2d 2d 22 | -- --"| 000002e0 3a f1 8a 35 30 2c 37 29 22 54 4e 2d 43 22 0d 00 |:..50,7)"TN-C"..| 000002f0 a0 6b e7 20 61 25 3d 32 20 65 61 72 74 68 24 3d |.k. a%=2 earth$=| 00000300 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |" | 00000310 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000320 2d 2d 2d 2d 20 20 20 20 20 20 20 20 20 20 20 20 |---- | 00000330 20 20 20 20 2d 2d 2d 2d 2d 2d 20 20 20 20 20 20 | ------ | 00000340 2d 2d 20 20 20 20 20 20 2d 2d 22 3a f1 8a 35 30 |-- --":..50| 00000350 2c 37 29 22 54 4e 2d 53 22 0d 00 aa 6d e7 20 61 |,7)"TN-S"...m. a| 00000360 25 3d 33 20 65 61 72 74 68 24 3d 22 20 20 20 20 |%=3 earth$=" | 00000370 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000380 20 20 20 20 20 20 20 20 20 20 20 2d 2d 2d 2d 20 | ---- | 00000390 20 20 20 20 20 2d 2d 2d 2d 20 20 20 20 20 20 20 | ---- | 000003a0 20 20 20 20 20 20 20 20 20 20 20 2d 2d 20 20 20 | -- | 000003b0 20 20 20 2d 2d 22 3a f1 8a 35 30 2c 37 29 22 54 | --":..50,7)"T| 000003c0 4e 2d 43 2d 53 22 0d 00 b4 69 e7 20 61 25 3d 34 |N-C-S"...i. a%=4| 000003d0 20 65 61 72 74 68 24 3d 22 20 20 20 20 20 20 20 | earth$=" | 000003e0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000003f0 20 20 20 20 20 20 20 20 2d 2d 2d 2d 20 20 20 20 | ---- | 00000400 20 20 2d 2d 2d 2d 20 20 20 20 20 20 2d 2d 2d 2d | ---- ----| 00000410 2d 2d 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |-- | 00000420 2d 2d 22 3a f1 8a 35 30 2c 37 29 22 54 54 22 0d |--":..50,7)"TT".| 00000430 00 be 61 e7 20 61 25 3d 35 20 65 61 72 74 68 24 |..a. a%=5 earth$| 00000440 3d 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |=" | 00000450 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000460 20 2d 2d 2d 2d 20 20 20 20 20 20 2d 2d 2d 2d 20 | ---- ---- | 00000470 20 20 20 20 20 2d 2d 2d 2d 2d 2d 20 20 20 20 20 | ------ | 00000480 20 2d 2d 22 3a f1 8a 35 30 2c 37 29 22 49 54 22 | --":..50,7)"IT"| 00000490 0d 00 c8 4c e8 22 45 4e 54 45 52 20 45 41 52 54 |...L."ENTER EART| 000004a0 48 20 45 4c 45 43 54 52 4f 44 45 20 52 45 53 49 |H ELECTRODE RESI| 000004b0 53 54 41 4e 43 45 22 6f 68 6d 3a f1 8a 35 30 2c |STANCE"ohm:..50,| 000004c0 39 29 22 45 61 72 74 68 20 65 6c 65 63 74 72 6f |9)"Earth electro| 000004d0 64 65 20 52 20 3d 20 22 3b 6f 68 6d 0d 00 d2 4a |de R = ";ohm...J| 000004e0 e8 22 4d 45 54 48 4f 44 20 4f 46 20 4d 45 41 53 |."METHOD OF MEAS| 000004f0 55 52 45 4d 45 4e 54 22 3b 6d 65 74 68 6f 64 24 |UREMENT";method$| 00000500 3a f1 8a 35 30 2c 31 31 29 22 4d 65 61 73 75 72 |:..50,11)"Measur| 00000510 65 6d 65 6e 74 20 6d 65 74 68 6f 64 20 22 3b 6d |ement method ";m| 00000520 65 74 68 6f 64 24 0d 00 dc 5e e8 22 45 4e 54 45 |ethod$...^."ENTE| 00000530 52 20 54 59 50 45 20 4f 46 20 45 41 52 54 48 20 |R TYPE OF EARTH | 00000540 45 4c 45 43 54 52 4f 44 45 20 41 4e 44 20 4c 4f |ELECTRODE AND LO| 00000550 43 41 54 49 4f 4e 22 3b 74 79 70 6c 6f 63 24 3a |CATION";typloc$:| 00000560 f1 8a 35 30 2c 31 33 29 22 54 79 70 65 20 61 6e |..50,13)"Type an| 00000570 64 20 6c 6f 63 61 74 69 6f 6e 20 22 3b 74 79 70 |d location ";typ| 00000580 6c 6f 63 24 0d 01 9a 1f f1 22 50 52 45 53 53 20 |loc$....."PRESS | 00000590 53 50 41 43 45 20 54 4f 20 50 52 49 4e 54 22 3a |SPACE TO PRINT":| 000005a0 41 3d a5 0d 01 a4 06 eb 33 0d 01 ae 20 ef 32 3a |A=......3... .2:| 000005b0 f4 20 53 65 6e 64 73 20 6f 75 74 70 75 74 20 74 |. Sends output t| 000005c0 6f 20 70 72 69 6e 74 65 72 0d 01 b8 30 ef 31 2c |o printer...0.1,| 000005d0 32 37 2c 31 2c 31 32 30 2c 31 2c 31 3a f4 20 50 |27,1,120,1,1:. P| 000005e0 75 74 73 20 70 72 69 6e 74 65 72 20 69 6e 74 6f |uts printer into| 000005f0 20 4e 4c 51 20 6d 6f 64 65 0d 01 c2 35 f1 22 46 | NLQ mode...5."F| 00000600 4f 52 4d 53 20 4f 46 20 43 4f 4d 50 4c 45 54 49 |ORMS OF COMPLETI| 00000610 4f 4e 20 41 4e 44 20 49 4e 53 50 45 43 54 49 4f |ON AND INSPECTIO| 00000620 4e 20 43 45 52 54 49 46 49 43 41 54 45 22 0d 01 |N CERTIFICATE"..| 00000630 cc 20 ef 31 2c 32 37 2c 31 2c 31 35 3a f4 20 43 |. .1,27,1,15:. C| 00000640 6f 6e 64 65 6e 73 65 64 20 70 72 69 6e 74 0d 01 |ondensed print..| 00000650 d6 4d f1 22 28 61 73 20 70 72 65 73 63 72 69 62 |.M."(as prescrib| 00000660 65 64 20 69 6e 20 74 68 65 20 49 45 45 20 52 65 |ed in the IEE Re| 00000670 67 75 6c 61 74 69 6f 6e 73 20 66 6f 72 20 45 6c |gulations for El| 00000680 65 63 74 72 69 63 61 6c 20 49 6e 73 74 61 6c 6c |ectrical Install| 00000690 61 74 69 6f 6e 73 28 31 29 29 22 0d 01 e0 25 ef |ations(1))"...%.| 000006a0 31 2c 31 38 3a f4 20 43 41 4e 43 45 4c 20 43 4f |1,18:. CANCEL CO| 000006b0 4e 44 45 4e 53 45 44 20 50 52 49 4e 54 49 4e 47 |NDENSED PRINTING| 000006c0 0d 01 ea 1e f1 22 44 45 54 41 49 4c 53 20 4f 46 |....."DETAILS OF| 000006d0 20 49 4e 53 54 41 4c 4c 41 54 49 4f 4e 22 0d 01 | INSTALLATION"..| 000006e0 f4 0e ef 31 2c 32 37 2c 31 2c 31 35 0d 01 fe 15 |...1,27,1,15....| 000006f0 f1 22 43 6c 69 65 6e 74 20 22 63 6c 69 65 6e 74 |."Client "client| 00000700 24 0d 02 08 05 f1 0d 02 12 17 f1 22 41 64 64 72 |$.........."Addr| 00000710 65 73 73 20 22 61 64 64 72 65 73 73 24 0d 02 1c |ess "address$...| 00000720 05 f1 0d 02 26 05 f1 0d 02 30 05 f1 0d 02 3a 50 |....&....0....:P| 00000730 f1 22 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f |."______________| 00000740 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f |________________| * 00000770 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 22 0d 02 44 05 |___________"..D.| 00000780 f1 0d 02 4e 09 ef 31 2c 31 38 0d 02 58 22 f1 22 |...N..1,18..X"."| 00000790 50 41 52 54 49 43 55 4c 41 52 53 20 4f 46 20 49 |PARTICULARS OF I| 000007a0 4e 53 54 41 4c 4c 41 54 49 4f 4e 22 0d 02 62 0e |NSTALLATION"..b.| 000007b0 ef 31 2c 32 37 2c 31 2c 31 35 0d 02 6c 30 f1 22 |.1,27,1,15..l0."| 000007c0 28 44 65 6c 65 74 65 20 6f 72 20 63 6f 6d 70 6c |(Delete or compl| 000007d0 65 74 65 20 69 74 65 6d 73 20 61 73 20 61 70 70 |ete items as app| 000007e0 72 6f 70 72 69 61 74 65 29 22 0d 02 76 05 f1 0d |ropriate)"..v...| 000007f0 02 80 57 f1 22 54 79 70 65 20 6f 66 20 69 6e 73 |..W."Type of ins| 00000800 74 61 6c 6c 61 74 69 6f 6e 20 20 20 20 20 20 20 |tallation | 00000810 20 20 20 20 4e 65 77 2f 41 6c 74 65 72 61 74 69 | New/Alterati| 00000820 6f 6e 2f 41 64 64 69 74 69 6f 6e 2f 74 6f 20 65 |on/Addition/to e| 00000830 78 69 73 74 69 6e 67 20 69 6e 73 74 61 6c 6c 61 |xisting installa| 00000840 74 69 6f 6e 2e 22 0d 02 8a 46 ef 31 2c 32 37 2c |tion."...F.1,27,| 00000850 31 2c 31 30 3a f1 20 74 79 70 65 24 3a f4 20 52 |1,10:. type$:. R| 00000860 45 56 45 52 53 45 20 4c 49 4e 45 20 46 45 45 44 |EVERSE LINE FEED| 00000870 20 54 4f 20 43 52 4f 53 53 20 4f 55 54 20 55 4e | TO CROSS OUT UN| 00000880 57 41 4e 54 45 44 20 49 54 45 4d 53 0d 02 94 50 |WANTED ITEMS...P| 00000890 f1 22 54 79 70 65 20 6f 66 20 65 61 72 74 68 69 |."Type of earthi| 000008a0 6e 67 20 28 33 31 32 2d 30 33 29 20 20 20 20 20 |ng (312-03) | 000008b0 20 54 4e 2d 43 20 20 20 20 20 20 54 4e 2d 53 20 | TN-C TN-S | 000008c0 20 20 20 20 20 54 4e 2d 43 2d 53 20 20 20 20 20 | TN-C-S | 000008d0 20 54 54 20 20 20 20 20 20 49 54 22 0d 02 9e 17 | TT IT"....| 000008e0 ef 31 2c 32 37 2c 31 2c 31 30 3a f1 20 65 61 72 |.1,27,1,10:. ear| 000008f0 74 68 24 0d 02 a8 3b f1 22 45 61 72 74 68 20 65 |th$...;."Earth e| 00000900 6c 65 63 74 72 6f 64 65 3a 20 20 20 20 20 20 20 |lectrode: | 00000910 20 20 20 20 20 20 20 20 52 65 73 69 73 74 61 6e | Resistan| 00000920 63 65 20 22 6f 68 6d 22 20 6f 68 6d 73 22 0d 02 |ce "ohm" ohms"..| 00000930 b2 05 f1 0d 02 bc 45 f1 22 20 20 20 20 20 20 20 |......E." | 00000940 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000950 20 20 20 20 20 20 20 20 4d 65 74 68 6f 64 20 6f | Method o| 00000960 66 20 6d 65 61 73 75 72 65 6d 65 6e 74 20 20 22 |f measurement "| 00000970 3b 6d 65 74 68 6f 64 24 0d 02 c6 05 f1 0d 02 d0 |;method$........| 00000980 4d f1 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |M." | 00000990 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000009a0 20 20 54 79 70 65 20 28 35 34 32 2d 30 32 2d 30 | Type (542-02-0| 000009b0 31 29 20 61 6e 64 20 6c 6f 63 61 74 69 6f 6e 20 |1) and location | 000009c0 20 22 3b 74 79 70 6c 6f 63 24 0d 02 da 25 f1 3a | ";typloc$...%.:| 000009d0 f4 20 51 55 45 53 54 49 4f 4e 53 20 4f 4e 4c 59 |. QUESTIONS ONLY| 000009e0 20 54 41 4b 45 4e 20 54 48 49 53 20 46 41 52 0d | TAKEN THIS FAR.| 000009f0 02 e4 4f f1 22 43 68 61 72 61 63 74 65 72 69 73 |..O."Characteris| 00000a00 74 69 63 73 20 6f 66 20 74 68 65 20 73 75 70 70 |tics of the supp| 00000a10 6c 79 20 61 74 20 74 68 65 20 6f 72 69 67 69 6e |ly at the origin| 00000a20 20 6f 66 20 74 68 65 20 69 6e 73 74 61 6c 6c 61 | of the installa| 00000a30 74 69 6f 6e 20 28 33 31 33 2d 30 31 29 22 0d 02 |tion (313-01)"..| 00000a40 ee 05 f1 0d 02 f8 4f f1 22 20 20 20 20 20 20 20 |......O." | 00000a50 20 20 20 20 20 20 20 20 4e 6f 6d 69 6e 61 6c 20 | Nominal | 00000a60 76 6f 6c 74 61 67 65 2e 2e 2e 2e 2e 2e 2e 2e 2e |voltage.........| 00000a70 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| 00000a80 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 76 6f 6c 74 |............volt| 00000a90 73 22 0d 03 02 05 f1 0d 03 0c 4c f1 22 20 20 20 |s"........L." | 00000aa0 20 20 20 20 20 20 20 20 20 20 20 20 46 72 65 71 | Freq| 00000ab0 75 65 6e 63 79 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |uency...........| 00000ac0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| * 00000ae0 48 7a 22 0d 03 16 05 f1 0d 03 20 35 f1 22 20 20 |Hz"....... 5." | 00000af0 20 20 20 20 20 20 20 20 20 20 20 20 20 4e 75 6d | Num| 00000b00 62 65 72 20 6f 66 20 70 68 61 73 65 73 2e 2e 2e |ber of phases...| 00000b10 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 22 0d 03 2a |............"..*| 00000b20 05 f1 0d 03 34 79 f1 22 20 20 20 50 72 6f 73 70 |....4y." Prosp| 00000b30 65 63 74 69 76 65 20 73 68 6f 72 74 2d 63 69 72 |ective short-cir| 00000b40 63 75 69 74 20 63 75 72 72 65 6e 74 2e 2e 2e 2e |cuit current....| 00000b50 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 6b 41 20 20 68 |...........kA h| 00000b60 6f 77 20 64 65 74 65 72 6d 69 6e 65 64 20 65 6e |ow determined en| 00000b70 71 75 69 72 79 2e 2e 2e 2e 2e 63 61 6c 63 75 6c |quiry.....calcul| 00000b80 61 74 69 6f 6e 2e 2e 2e 2e 2e 6d 65 61 73 75 72 |ation.....measur| 00000b90 65 6d 65 6e 74 2e 2e 2e 2e 2e 22 0d 03 3e 05 f1 |ement....."..>..| 00000ba0 0d 03 48 c8 f1 22 20 20 20 45 61 72 74 68 20 66 |..H.." Earth f| 00000bb0 61 75 6c 74 20 6c 6f 6f 70 20 69 6d 70 65 64 61 |ault loop impeda| 00000bc0 6e 63 65 20 28 5a 22 3b 3a ef 31 2c 32 37 2c 31 |nce (Z";:.1,27,1| 00000bd0 2c 38 33 2c 31 2c 31 3a f1 22 65 22 3b 3a ef 31 |,83,1,1:."e";:.1| 00000be0 2c 32 37 2c 31 2c 38 34 3a f1 22 29 20 2e 2e 2e |,27,1,84:.") ...| 00000bf0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 6f 68 6d 73 |............ohms| 00000c00 20 20 20 68 6f 77 20 64 65 74 65 72 6d 69 6e 65 | how determine| 00000c10 64 20 65 6e 71 75 69 72 79 2e 2e 2e 2e 2e 63 61 |d enquiry.....ca| 00000c20 6c 63 75 6c 61 74 69 6f 6e 2e 2e 2e 2e 2e 6d 65 |lculation.....me| 00000c30 61 73 75 72 65 6d 65 6e 74 2e 2e 2e 2e 2e 22 3a |asurement.....":| 00000c40 f4 20 53 55 42 53 43 52 49 50 45 20 4f 4e 20 54 |. SUBSCRIPE ON T| 00000c50 4f 20 50 52 49 4e 54 20 65 20 54 48 45 4e 20 4f |O PRINT e THEN O| 00000c60 46 46 20 41 47 41 49 4e 0d 03 52 05 f1 0d 03 5c |FF AGAIN..R....\| 00000c70 4b f1 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |K." | 00000c80 20 20 4d 61 78 69 6d 75 6d 20 64 65 6d 61 6e 64 | Maximum demand| 00000c90 20 70 65 72 20 70 68 61 73 65 20 2e 2e 2e 2e 2e | per phase .....| 00000ca0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| 00000cb0 2e 2e 2e 2e 2e 2e 41 22 0d 03 66 05 f1 0d 03 70 |......A"..f....p| 00000cc0 6b f1 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |k." | 00000cd0 20 20 4f 76 65 72 20 63 75 72 72 65 6e 74 20 70 | Over current p| 00000ce0 72 6f 74 65 63 74 69 76 65 20 64 65 76 69 63 65 |rotective device| 00000cf0 20 2d 20 54 79 70 65 20 42 53 2e 2e 2e 2e 2e 2e | - Type BS......| 00000d00 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 20 52 61 74 |............ Rat| 00000d10 69 6e 67 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |ing ............| 00000d20 2e 2e 2e 2e 2e 2e 41 22 0d 03 7a 05 f1 0d 03 84 |......A"..z.....| 00000d30 78 f1 22 20 20 20 20 20 20 20 20 4d 61 69 6e 20 |x." Main | 00000d40 73 77 69 74 63 68 20 6f 72 20 63 69 72 63 75 69 |switch or circui| 00000d50 74 20 62 72 65 61 6b 65 72 20 28 34 36 30 2d 30 |t breaker (460-0| 00000d60 31 2d 30 32 29 3a 20 54 79 70 65 20 42 53 2e 2e |1-02): Type BS..| 00000d70 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 20 52 61 74 69 |........... Rati| 00000d80 6e 67 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 41 |ng ............A| 00000d90 20 4e 6f 20 6f 66 20 70 6f 6c 65 73 2e 2e 2e 2e | No of poles....| 00000da0 2e 2e 2e 2e 22 0d 03 8e 05 f1 0d 03 98 71 f1 22 |...."........q."| 00000db0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | (| 00000dc0 69 66 20 61 6e 20 72 63 64 20 72 61 74 65 64 20 |if an rcd rated | 00000dd0 72 65 73 69 64 75 61 6c 20 63 75 72 72 65 6e 74 |residual current| 00000de0 20 49 22 3b 3a ef 31 2c 32 37 2c 31 2c 38 33 2c | I";:.1,27,1,83,| 00000df0 31 2c 34 39 3a f1 22 61 6e 22 3b 3a ef 31 2c 32 |1,49:."an";:.1,2| 00000e00 37 2c 31 2c 38 34 3a f1 22 2e 2e 2e 2e 2e 2e 2e |7,1,84:.".......| 00000e10 2e 2e 2e 2e 2e 2e 2e 2e 6d 41 22 0d 03 a2 05 f1 |........mA".....| 00000e20 0d 03 ac 05 f1 0d 03 b6 34 f1 22 4d 65 74 68 6f |........4."Metho| 00000e30 64 20 6f 66 20 70 72 6f 74 65 63 74 69 6f 6e 20 |d of protection | 00000e40 61 67 61 69 6e 73 74 20 69 6e 64 69 72 65 63 74 |against indirect| 00000e50 20 63 6f 6e 74 61 63 74 22 0d 03 c0 05 f1 0d 03 | contact".......| 00000e60 ca 58 f1 22 31 2e 20 45 61 72 74 68 65 64 20 65 |.X."1. Earthed e| 00000e70 71 75 69 70 6f 74 65 6e 74 69 61 6c 20 62 6f 6e |quipotential bon| 00000e80 64 69 6e 67 20 61 6e 64 20 61 75 74 6f 6d 61 74 |ding and automat| 00000e90 69 63 20 64 69 73 63 6f 6e 6e 65 63 74 69 6f 6e |ic disconnection| 00000ea0 20 6f 66 20 73 75 70 70 6c 79 20 2e 2e 2e 2e 2e | of supply .....| 00000eb0 2e 2e 2e 2e 2e 22 0d 03 d4 05 f1 0d 03 de 09 f1 |....."..........| 00000ec0 22 6f 72 22 0d 03 e8 05 f1 0d 03 f2 71 f1 22 32 |"or"........q."2| 00000ed0 2e 20 4f 74 68 65 72 20 2e 2e 2e 2e 2e 2e 20 28 |. Other ...... (| 00000ee0 44 65 73 63 72 69 62 65 29 2e 2e 2e 2e 2e 2e 2e |Describe).......| 00000ef0 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| * 00000f30 2e 2e 2e 2e 2e 2e 2e 2e 2e 22 0d 03 fc 05 f1 0d |........."......| 00000f40 04 06 80 f1 22 4d 61 69 6e 20 65 71 75 69 70 6f |...."Main equipo| 00000f50 74 65 6e 74 69 61 6c 20 62 6f 6e 64 69 6e 67 20 |tential bonding | 00000f60 63 6f 6e 64 75 63 74 6f 72 73 20 28 34 31 33 2d |conductors (413-| 00000f70 30 32 2d 30 31 2f 30 32 2e 20 35 34 37 2d 30 32 |02-01/02. 547-02| 00000f80 2d 30 31 29 3a 20 53 69 7a 65 20 2e 2e 2e 2e 2e |-01): Size .....| 00000f90 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 6d 6d 22 3b 3a ef |..........mm";:.| 00000fa0 31 2c 32 37 2c 31 2c 38 33 2c 31 2c 30 3a f1 22 |1,27,1,83,1,0:."| 00000fb0 32 22 3a ef 31 2c 32 37 2c 31 2c 38 34 20 20 0d |2":.1,27,1,84 .| 00000fc0 04 10 05 f1 0d 04 1a 59 f1 22 53 63 68 65 64 75 |.......Y."Schedu| 00000fd0 6c 65 20 6f 66 20 74 65 73 74 20 72 65 73 75 6c |le of test resul| 00000fe0 74 73 3a 20 43 6f 6e 74 69 6e 75 61 74 69 6f 6e |ts: Continuation| 00000ff0 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e | ...............| 00001000 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| 00001010 2e 2e 2e 2e 2e 2e 2e 70 61 67 65 73 22 0d 04 24 |.......pages"..$| 00001020 05 f1 0d 04 2e 66 f1 22 44 65 74 61 69 6c 73 20 |.....f."Details | 00001030 6f 66 20 64 65 70 61 72 74 75 72 65 73 20 28 69 |of departures (i| 00001040 66 20 61 6e 79 20 66 72 6f 6d 20 57 69 72 69 6e |f any from Wirin| 00001050 67 20 52 65 67 75 6c 61 74 69 6f 6e 73 20 28 31 |g Regulations (1| 00001060 32 30 2d 30 34 2c 20 31 32 30 2d 30 35 29 20 2e |20-04, 120-05) .| 00001070 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |................| 00001080 2e 2e 2e 2e 2e 2e 2e 22 0d 04 38 05 f1 0d 04 42 |......."..8....B| 00001090 56 f1 22 43 6f 6d 6d 65 6e 74 73 20 6f 6e 20 65 |V."Comments on e| 000010a0 78 69 73 74 69 6e 67 20 69 6e 73 74 61 6c 6c 61 |xisting installa| 000010b0 74 69 6f 6e 2c 20 77 68 65 72 65 20 61 70 70 6c |tion, where appl| 000010c0 69 63 61 62 6c 65 20 28 37 34 33 2d 30 31 2d 30 |icable (743-01-0| 000010d0 31 29 3a 20 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e 2e |1): ............| 000010e0 2e 2e 22 0d 04 4c 06 ef 33 0d 04 56 09 ef 31 2c |.."..L..3..V..1,| 000010f0 31 38 0d ff |18..| 000010f4