1 char amino[]="GAVLISTDENQKHRFYWCMP"; 2 3 int helix[20][17]= 4 { 5 {-5,-10,-15,-20,-30,-40,-50,-60,-86,-60,-50,-40,-30,-20,-15,-10, -5}, 6 { 5, 10, 15, 20, 30, 40, 50, 60, 65, 60, 50, 40, 30, 20, 15, 10, 5}, 7 { 0, 0, 0, 0, 0, 0, 0, 5, 10, 14, 10, 5, 0, 0, 0, 0, 0}, 8 { 0, 5, 10, 15, 20, 25, 28, 30, 32, 30, 28, 25, 20, 15, 10, 5, 0}, 9 { 5, 10, 15, 20, 25, 20, 15, 10, 6, 0,-10,-15,-20,-25,-20,-10, -5}, 10 { 0, -5,-10,-15,-20,-25,-30,-35,-39,-35,-30,-25,-20,-15,-10, -5, 0}, 11 { 0, 0, 0, -5,-10,-15,-20,-25,-26,-25,-20,-15,-10, -5, 0, 0, 0}, 12 { 0, -5,-10,-15,-20,-15,-10, 0, 5, 10, 15, 20, 20, 20, 15, 10, 5}, 13 { 0, 0, 0, 0, 10, 20, 60, 70, 78, 78, 78, 78, 78, 70, 60, 40, 20}, 14 { 0, 0, 0, 0,-10,-20,-30,-40,-51,-40,-30,-20,-10, 0, 0, 0, 0}, 15 { 0, 0, 0, 0, 5, 10, 20, 20, 10,-10,-20,-20,-10, -5, 0, 0, 0}, 16 {20, 40, 50, 55, 60, 60, 50, 30, 23, 10, 5, 0, 0, 0, 0, 0, 0}, 17 {10, 20, 30, 40, 50, 50, 50, 30, 12,-20,-10, 0, 0, 0, 0, 0, 0}, 18 { 0, 0, 0, 0, 0, 0, 0, 0, -9,-15,-20,-30,-40,-50,-50,-30,-10}, 19 { 0, 0, 0, 0, 0, 5, 10, 15, 16, 15, 10, 5, 0, 0, 0, 0, 0}, 20 {-5,-10,-15,-20,-25,-30,-35,-40,-45,-40,-35,-30,-25,-20,-15,-10, -5}, 21 {-10,-20,-40,-50,-50,-10, 0, 10, 12, 10, 0,-10,-50,-50,-40,-20,-10}, 22 { 0, 0, 0, 0, 0, 0, -5,-10,-13,-10, -5, 0, 0, 0, 0, 0, 0}, 23 {10, 20, 25, 30, 35, 40, 45, 50, 53, 50, 45, 40, 35, 30, 25, 20, 10}, 24 {-10,-20,-40,-60,-80,-100,-120,-140,-77,-60,-30,-20,-10, 0, 0, 0, 0}}; 25 26 int extend [20][17]= 27 { 28 {10, 20, 30, 40, 40, 20, 0,-20,-42,-20, 0, 20, 40, 40, 30, 20,-10}, 29 { 0, 0, 0, 0, -5,-10,-15,-20,-23,-20,-15,-10, -5, 0, 0, 0, 0}, 30 { 0, 0,-10,-20, 0, 20, 40, 60, 68, 60, 40, 20, 0,-20,-10, 0, 0}, 31 { 0, 0, 0, 0, 0, 5, 10, 20, 23, 20, 10, 5, 0, 0, 0, 0, 0}, 32 { 0,-10,-20,-10, 0, 20, 40, 60, 67, 60, 40, 20, 0,-10,-20,-10, 0}, 33 { 0, 10, 20, 10, 0, -5,-10,-15,-17,-15,-10, -5, 0, 10, 20, 10, 0}, 34 { 5, 10, 15, 20, 15, 15, 10, 10, 13, 10, 10, 15, 15, 20, 15, 10, 5}, 35 { 0, 5, 10, 15, 20, 0,-20,-30,-44,-30,-20, 0, 0, 0, 0, 0, 0}, 36 {-10,-15,-20,-25,-30,-35,-40,-45,-50,-55,-60,-60,-50,-40,-30,-20,-10}, 37 {10, 30, 50, 30, 20, 0,-15,-30,-41,-30,-15, 0, 20, 50, 30, 50, 10}, 38 { 0, 0, 0, 0, 0, -5,-10, 0, 12, 20, 30, 40, 50, 50, 40, 30, 15}, 39 {-5,-10,-15,-20,-30,-40,-50,-40,-33,-20,-10, 0, 10, 10, 0, 0, 0}, 40 {-10,-20,-40,-20,-10, 0,-10,-20,-25,-35,-30,-25,-20,-15,-10, -5, 0}, 41 { 0, 0, 0, 0, 0, 0, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0}, 42 { 0, 0, 0, 0, 0, 5, 10, 20, 26, 10,-10,-30,-60,-65,-60,-40,-20}, 43 { 0, 5, 10, 15, 20, 25, 30, 35, 40, 35, 30, 25, 20, 15, 10, 5, 0}, 44 { 0, 0, 0, 0, 0,-10,-10,-10,-10,-10,-10,-15,-20,-25,-30,-20,-10}, 45 { 0, 0, 0, 0, 0, 10, 20, 30, 44, 30, 20, 10, 0, 0, 0, 0, 0}, 46 {-10,-20,-30,-40,-40,-30, 0, 10, 23, 10, 0,-30,-40,-40,-30,-20,-10}, 47 {10, 20, 30, 30, 20, 10, 0,-10,-18,-20,-10, 10, 30, 40, 30, 20, 10} 48 }; 49 50 int turns[20][17]= 51 { 52 { 0, 0, 0, 0, 10, 30, 55, 55, 57, 40, 0, 0, 0, 0, 0, 0, 0}, 53 { 0, 0, 0,-10,-20,-30,-40,-50,-50,-40,-30,-20,-10, 0, 0, 0, 0}, 54 { 0, 0, 0, 0,-10,-20,-30,-40,-60,-40,-30,-20,-10, 0, 0, 0, 0}, 55 { 0, 0, 0,-10,-20,-30,-40,-50,-56,-20,-10, 0, 0, 0, 0, 0, 0}, 56 { 0, 0, 0, 0, 0,-10,-20,-30,-46,-40,-10, 0, 0, 20, 30, 20, 10}, 57 { 0,-10,-20,-20, 10, 15, 20, 25, 26, 25, 20, 15, 10, 0, 0, 0, 0}, 58 { 0, 10, 20, 20, 20, 15, 18, 5, 3, 5, 10, 15, 20, 20, 20, 10, 0}, 59 { 0, 0, 0, 0, 0, 0, 5, 10, 31, 10, 5, 0, 0, 0, 0, 0, 0}, 60 { 0, -5,-10,-15,-20,-30,-40,-45,-47,-20, 0, 10, 5, 0, 0, 0, 0}, 61 { 0, 0, 0, 10, 20, 30, 35, 40, 42, 40, 35, 30, 20, 10, 5, 0, 0}, 62 {10, 20, 30, 25, 20, 15, 10, 5, 4, 20, 30, 40, 50, 60, 50, 40, 20}, 63 {-10,-20,-30,-40,-25,-10, 0, 10, 10, 10, 0,-20,-30,-20,-10, -5, 0}, 64 { 0, 0, 0, 0, 0, 0, 0, 0, -3, 0, 10, 20, 30, 20, 10, 0, 0}, 65 { 0, 0, 0, 0, 0, 0, 0, 10, 21, 30, 40, 30, 20, 10, 0, 0, 0}, 66 { 0, 0, 0, 0, 0, -5,-10,-15,-18,-15, 0, 15, 30, 25, 20, 10, 0}, 67 { 0, 0, 0, 5, 15, 15, 20, 25, 29, 25, 20, 15, 15, 5, 0, 0, 0}, 68 { 0, 0, 0, 10, 20, 30, 40, 80, 36,-30, 30, 40, 50, 60, 70, 40, 20}, 69 { 20, 40, 50, 60, 60, 55, 50, 45, 44, 40, 35, 30, 25, 20, 15, 10, 5}, 70 { -5,-15,-20,-25,-30,-35,-40,-45,-48,-45,-40,-35,-30,-25,-20,-15, -5}, 71 {10, 20, 30, 40, 50, 70, 10,-90, 36, 90, 10, 0, 0, 0, 0, 0, 0}}; 72 73 int coil[20][17]= 74 { 75 { 0, 0, 0, 0, 10, 30, 40, 45, 49, 45, 40, 30, 10, 0, 0, 0, 0}, 76 { 0, 0, 0, 0, -5,-10,-20,-25,-25,-25,-20,-15,-10, -5, 0, 0, 0}, 77 { 0, 0, 0, 0,-10,-20,-25,-30,-35,-30,-25,-20,-10, 0, 0, 0, 0}, 78 { 0, 0, 0,-10,-20,-30,-40,-30,-20,-20,-10, 0, 0, 0, 0, 0, 0}, 79 { 0, 0, 0, 0, 0,-10,-20,-30,-33,-30,-10, 0, 10, 20, 30, 20, 0}, 80 { 0,-10,-20,-20, 10, 15, 20, 25, 50, 25, 20, 15, 10, 0, 0, 0, 0}, 81 { 0, 10, 20, 30, 20, 15, 10, 15, 17, 15, 10, 15, 20, 30, 20, 10, 0}, 82 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}, 83 { 0, 0, 10, 20, 40, 20, 0,-10,-44,-40,-20,-10, 0, 0, 0, 0, 0}, 84 { 0, 0, 0, 10, 20, 30, 35, 40, 46, 40, 35, 30, 20, 10, 0, 0, 0}, 85 {10, 20, 30, 25, 20, 15, 10, 0, -5, 20, 30, 40, 50, 60, 50, 40, 20}, 86 {-10,-20,-30,-40,-25,-20,-10, -8, -8, 0, 0,-20,-30,-20,-10, -5, 0}, 87 { 0, 0, 0, 0, 0, 0, 0, 10, 16, 15, 10, 10, 10, 10, 5, 0, 0}, 88 { 0, 0, 0, 0, 0, 0, 0, 0,-12, 0, 20, 30, 20, 10, 0, 0, 0}, 89 { 0, 0, 0, 0, 0, -5,-10,-20,-41,-20, 0, 15, 30, 25, 20, 10, 0}, 90 { 0, 0, 0, 0, 0, 0, 0, 0, -6, 0, 0, 0, 0, 0, 0, 0, 0}, 91 { 0, 0, 0, 10, 20, 30, 40, 20, 12, 20, 30, 40, 50, 60, 70, 40, 20}, 92 { 0, 0, 0, 0, 0, 0,-10,-30,-47,-30,-10, 0, 0, 0, 0, 0, 0}, 93 { 0, -5,-10,-15,-20,-25,-30,-40,-41,-40,-30,-25,-20,-15,-10, -5, 0}, 94 { 0, 0, 10, 20, 30, 40, 50, 55, 58, 50, 10, 0, 0, 0, 0, 0, 0}}; 95