Acsr.m
上传用户:eighthdate
上传日期:2014-05-24
资源大小:270k
文件大小:10k
源码类别:

其他行业

开发平台:

Matlab

  1. % This program displays the code name for the aluminum conductors
  2. % steel reinforced (ACSR).  To obtain the characteristics of the
  3. % ACSR conductors enter the conductor 'code name' within single quotes.
  4. %
  5. % Copyright (C)1998 by H. Saadat.
  6. JOREE     = ['2515000  76/19   4.7752    1.8928   0.02600  0.02800   1550'];
  7. joree     = ['2515000  76/19   4.7752    1.8928   0.02600  0.02800   1550'];
  8. THRASHER  = ['2312000  76/19   4.5771    1.8135   0.02770  0.03000   1500'];
  9. thrasher  = ['2312000  76/19   4.5771    1.8135   0.02770  0.03000   1500'];
  10. KIWI      = ['2167000  72/7    4.4069    1.7374   0.02940  0.03190   1465'];
  11. kiwi      = ['2167000  72/7    4.4069    1.7374   0.02940  0.03190   1465'];
  12. BLUEBIRD  = ['2156000  84/19   4.4755    1.7920   0.02900  0.03140   1475'];
  13. bluebird  = ['2156000  84/19   4.4755    1.7920   0.02900  0.03140   1475'];
  14. CHUKAR    = ['1781000  84/19   4.0691    1.6276   0.03410  0.03720   1405'];
  15. chukar    = ['1781000  84/19   4.0691    1.6276   0.03410  0.03720   1405'];
  16. FALCON    = ['1590000  54/19   3.9243    1.5847   0.03740  0.04080   1380'];
  17. falcon    = ['1590000  54/19   3.9243    1.5847   0.03740  0.04080   1380'];
  18. LAPWING   = ['1590000  54/19   3.8200    1.5150   0.03870  0.04210   1340'];
  19. lapwing   = ['1590000  54/19   3.8200    1.5150   0.03870  0.04210   1340'];
  20. PARROT    = ['1510500  54/19   3.8252    1.5453   0.03860  0.04280   1340'];
  21. parrot    = ['1510500  54/19   3.8252    1.5453   0.03860  0.04280   1340'];
  22. BOBOLINK  = ['1431000  45/7    3.6250    1.4390   0.04260   0.04640  1250'];
  23. bobolink  = ['1431000  45/7    3.6250    1.4390   0.04260   0.04640  1250'];
  24. PLOVER    = ['1431000  54/19   3.7210    1.5026   0.04077  0.04723   1300'];
  25. plover    = ['1431000  54/19   3.7210    1.5026   0.04077  0.04723   1300'];
  26. MARTIN    = ['1351000  54/19   3.6170    1.4600   0.04319  0.05000   1250'];
  27. martin    = ['1351000  54/19   3.6170    1.4600   0.04319  0.05000   1250'];
  28. PHEASANT  = ['1272000  54/19   3.5103    1.4173   0.04586  0.05290   1200'];
  29. pheasant  = ['1272000  54/19   3.5103    1.4173   0.04586  0.05290   1200'];
  30. BITTERN   = ['1272000  45/7    3.4160    1.3560   0.04750   0.05190  1100'];
  31. bittern   = ['1272000  45/7    3.4160    1.3560   0.04750   0.05190  1100'];
  32. GRACKLE   = ['1192500  54/19   3.3985    1.3716   0.04897  0.05630   1160'];
  33. grackle   = ['1192500  54/19   3.3985    1.3716   0.04897  0.05630   1160'];
  34. FINCH     = ['1113000  54/19   3.2842    1.3258   0.05245  0.06020   1110'];
  35. finch     = ['1113000  54/19   3.2842    1.3258   0.05245  0.06020   1110'];
  36. BLUEJAY   = ['1113000  45/7    3.1950    1.2680   0.05380   0.05890  1100'];
  37. bluejay   = ['1113000  45/7    3.1950    1.2680   0.05380   0.05890  1100'];
  38. CURLEW    = ['1033500  54/7    3.1648    1.2800   0.05650  0.06432   1060'];
  39. curlew    = ['1033500  54/7    3.1648    1.2800   0.05650  0.06432   1060'];
  40. ORTOLAN   = ['1033500  45/7    3.0780    1.2220   0.05780   0.06330  1050'];
  41. ortolan   = ['1033500  45/7    3.0780    1.2220   0.05780   0.06330  1050'];
  42. CARDINAL  = ['954000   54/7    3.0378    1.2283   0.06103  0.07000   1010'];
  43. cardinal  = ['954000   54/7    3.0378    1.2283   0.06103  0.07000   1010'];
  44. RAIL      = ['954000   45/7    2.9590    1.1730   0.06240  0.06830   1000'];
  45. rail      = ['954000   45/7    2.9590    1.1730   0.06240  0.06830   1000'];
  46. CANARY    = ['900000   54/7    2.9515    1.1917   0.06463  0.07365   970 '];
  47. canary    = ['900000   54/7    2.9515    1.1917   0.06463  0.07365   970 '];
  48. CRANE     = ['874500   54/7    2.9108    1.1765   0.06712  0.07632   950 '];
  49. crane     = ['874500   54/7    2.9108    1.1765   0.06712  0.07632   950 '];
  50. CONDOR    = ['795000   54/7    2.7762    1.1216   0.07396  0.08564   900 '];
  51. condor    = ['795000   54/7    2.7762    1.1216   0.07396  0.08564   900 '];
  52. DRAKE     = ['795000   26/7    2.8143    1.1430   0.07272  0.08000   900 '];
  53. drake     = ['795000   26/7    2.8143    1.1430   0.07272  0.08000   900 '];
  54. MALLARD   = ['795000   30/19   2.8956    1.1978   0.07272  0.08000   910 '];
  55. mallard   = ['795000   30/19   2.8956    1.1978   0.07272  0.08000   910 '];
  56. TERN      = ['795000   45/7    2.7000    1.0730   0.07440  0.08160   900 '];
  57. tern      = ['795000   45/7    2.7000    1.0730   0.07440  0.08160   900 '];
  58. CROW      = ['715500   54/7    2.6314    1.0637   0.08204  0.09211   830 '];
  59. crow      = ['715500   54/7    2.6314    1.0637   0.08204  0.09211   830 '];
  60. STARLING  = ['715500   26/7    2.6695    1.0820   0.08142  0.08962   840 '];
  61. starling  = ['715500   26/7    2.6695    1.0820   0.08142  0.08962   840 '];
  62. REDWING   = ['715500   30/19   2.7457    1.1338   0.08142  0.08962   840 '];
  63. redwing   = ['715500   30/19   2.7457    1.1338   0.08142  0.08962   840 '];
  64. FLAMINGO  = ['666600   54/7    2.5400    1.0272   0.08763  0.09950   800 '];
  65. flamingo  = ['666600   54/7    2.5400    1.0272   0.08763  0.09950   800 '];
  66. ROOK      = ['636000   54/7    2.4816    1.0028   0.09198  0.10490   770 '];
  67. rook      = ['636000   54/7    2.4816    1.0028   0.09198  0.10490   770 '];
  68. GROSBEAK  = ['636000   26/7    2.5146    1.0210   0.09136  0.10055   780 '];
  69. grosbeak  = ['636000   26/7    2.5146    1.0210   0.09136  0.10055   780 '];
  70. EGRET     = ['636000   30/19   2.5883    1.0698   0.09136  0.10055   780 '];
  71. egret     = ['636000   30/19   2.5883    1.0698   0.09136  0.10055   780 '];
  72. PEACOCK   = ['605000   54/7    2.4206    0.9784   0.09633  0.11032   750 '];
  73. peacock   = ['605000   54/7    2.4206    0.9784   0.09633  0.11032   750 '];
  74. SQUAB     = ['605000   26/7    2.4536    0.9967   0.09571  0.10690   760 '];
  75. squab     = ['605000   26/7    2.4536    0.9967   0.09571  0.10690   760 '];
  76. DOVE      = ['556500   26/7    2.3546    0.9540   0.10441  0.11554   730 '];
  77. dove      = ['556500   26/7    2.3546    0.9540   0.10441  0.11554   730 '];
  78. EAGLE     = ['556500   30/7    2.4206    0.9997   0.10441  0.11554   730 '];
  79. eagle     = ['556500   30/7    2.4206    0.9997   0.10441  0.11554   730 '];
  80. PARAKEET  = ['556500   24/7    2.3220    0.9330   0.10530  0.11560   715 '];
  81. parakeet  = ['556500   24/7    2.3220    0.9330   0.10530  0.11560   715 '];
  82. OSPREY    = ['556500   18/1    2.2330    0.8660   0.10520  0.11540   700 '];
  83. osprey    = ['556500   18/1    2.2330    0.8660   0.10520  0.11540   700 '];
  84. HAWK      = ['477000   26/7    2.1793    0.8839   0.12270  0.13480   670 '];
  85. hawk      = ['477000   26/7    2.1793    0.8839   0.12270  0.13480   670 '];
  86. HEN       = ['477000   30/7    2.2428    0.9266   0.12290  0.13490   670 '];
  87. hen       = ['477000   30/7    2.2428    0.9266   0.12290  0.13490   670 '];
  88. PELICAN   = ['477000   18/1    2.0680    0.8020   0.12240  0.13440   640 '];
  89. pelican   = ['477000   18/1    2.0680    0.8020   0.12240  0.13440   640 '];
  90. IBIS      = ['397500   26/7    1.9888    0.8077   0.14720  0.16170   590 '];
  91. ibis      = ['397500   26/7    1.9888    0.8077   0.14720  0.16170   590 '];
  92. LARK      = ['397500   30/7    2.0472    0.8473   0.14740  0.16190   600 '];
  93. lark      = ['397500   30/7    2.0472    0.8473   0.14740  0.16190   600 '];
  94. CHICKADEE = ['397500   18/1    1.8872    0.7345   0.14555  0.15985   575 '];
  95. chickadee = ['397500   18/1    1.8872    0.7345   0.14555  0.15985   575 '];
  96. LINNET    = ['336400   26/7    1.8313    0.7437   0.17380  0.19090   530 '];
  97. linnet    = ['336400   26/7    1.8313    0.7437   0.17380  0.19090   530 '];
  98. ORIOLE    = ['336400   30/7    1.8821    0.7772   0.17400  0.19120   530 '];
  99. oriole    = ['336400   30/7    1.8821    0.7772   0.17400  0.19120   530 '];
  100. OSTRICH   = ['300000   26/7    1.7272    0.7010   0.19480  0.21400   490 '];
  101. ostrich   = ['300000   26/7    1.7272    0.7010   0.19480  0.21400   490 '];
  102. PIPER     = ['300000   30/7    1.7780    0.7345   0.19510  0.21440   500 '];
  103. piper     = ['300000   30/7    1.7780    0.7345   0.19510  0.21440   500 '];
  104. PARTRIDGE = ['266800   26/7    1.6307    0.6614   0.21890  0.24050   460 '];
  105. partridge = ['266800   26/7    1.6307    0.6614   0.21890  0.24050   460 '];
  106. WAXWING   = ['266800   18/1    1.5468    0.6035   0.21678  0.23810   450 '];
  107. waxwing   = ['266800   18/1    1.5468    0.6035   0.21678  0.23810   450 '];
  108. MERLIN    = ['336400   18/1    1.6460    0.6740   0.17310  0.19010   460 '];
  109. merlin    = ['336400   18/1    1.6460    0.6740   0.17310  0.19010   460 '];
  110. clc
  111. disp('              ACSR Conductor''s Code Name and area in CMILS')
  112. disp('              --------------------------------------------- ')
  113. cond=['                                                                      '
  114.       ' bittern   bluebird  bluejay   bobolink  canary    cardinal  chickadee'
  115.       ' 1272000   2156000   1113000   1431000   900000    954000    397500   '
  116.       ' chukar    condor    crane     crow      curlew    dove      drake    '
  117.       ' 1781000   795000    874500    715500    1033500   556500    795000   '
  118.       ' eagle     egret     falcon    finch     flamingo  flicker   grackle  '
  119.       ' 556500    636000    1590000   1113000   666600    477000    1192500  '
  120.       ' grosbeak  hawk      hen       ibis      joree     kiwi      lapwing  '
  121.       ' 636000    477000    477000    397500    2515000   2167000   1590000  '
  122.       ' lark      linnet    mallard   martin    merlin    oriole    ortolan  '
  123.       ' 397500    336400    795000    1351000   336400    336400    1033500  '
  124.       ' osprey    ostrich   parakeet  parrot    partridge peacock   pelican  '
  125.       ' 556500    300000    556500    1510500   266800    605000    477000   '
  126.       ' pheasant  piper     plover    rail      redwing   rook      squab    '
  127.       ' 1272000   300000    1431000   954000    715500    636000    605000   '
  128.       ' starling  tern      thrasher  waxwing                                '
  129.       ' 715500    795000    2312000   266800                                 '];
  130. disp(cond)
  131. name = input('Enter ACSR code name within single quotes -> ');
  132. if exist(name)
  133. disp(' ')
  134. fprintf(' Al Area  Strand  Diameter  GMR      Resistance Ohm/Km  Ampacity n')
  135. fprintf(' CMILS    Al/St   cm        cm       60Hz,25C 60HZ,50C  Ampere   n')
  136. fprintf(' '), fprintf(eval(name')), fprintf('n')
  137. else, disp(' '), disp(' ACSR code name was not found, try again')
  138. disp(' Name must be entered within quotes, without any blanks')
  139. disp(' All characters must be in lower case or upper case letters')
  140. end