Files @ 009e9668a348
Branch filter:

Location: games/Awakening/atlantis_dlg.lua

Silverwing
Fixes
   1
   2
   3
   4
   5
   6
   7
   8
   9
  10
  11
  12
  13
  14
  15
  16
  17
  18
  19
  20
  21
  22
  23
  24
  25
  26
  27
  28
  29
  30
  31
  32
  33
  34
  35
  36
  37
  38
  39
  40
  41
  42
  43
  44
  45
  46
  47
  48
  49
  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
  77
  78
  79
  80
  81
  82
  83
  84
  85
  86
  87
  88
  89
  90
  91
  92
  93
  94
  95
  96
  97
  98
  99
 100
 101
 102
 103
 104
 105
 106
 107
 108
 109
 110
 111
 112
 113
 114
 115
 116
 117
 118
 119
 120
 121
 122
 123
 124
 125
 126
 127
 128
 129
 130
 131
 132
 133
 134
 135
 136
 137
 138
 139
 140
 141
 142
 143
 144
 145
 146
 147
 148
 149
 150
 151
 152
 153
 154
 155
 156
 157
 158
 159
 160
 161
 162
 163
 164
 165
 166
 167
 168
 169
 170
 171
 172
 173
 174
 175
 176
 177
 178
 179
 180
 181
 182
 183
 184
 185
 186
 187
 188
 189
 190
 191
 192
 193
 194
 195
 196
 197
 198
 199
 200
 201
 202
 203
 204
 205
 206
 207
 208
 209
 210
 211
 212
 213
 214
 215
 216
 217
 218
 219
 220
 221
 222
 223
 224
 225
 226
 227
 228
 229
 230
 231
 232
 233
 234
 235
 236
 237
 238
 239
 240
 241
 242
 243
 244
 245
 246
 247
 248
 249
 250
 251
 252
 253
 254
 255
 256
 257
 258
 259
 260
 261
 262
 263
 264
 265
 266
 267
 268
 269
 270
 271
 272
 273
 274
 275
 276
 277
 278
 279
 280
 281
 282
 283
 284
 285
 286
 287
 288
 289
 290
 291
 292
 293
 294
 295
 296
 297
 298
 299
 300
 301
 302
 303
 304
 305
 306
 307
 308
 309
 310
 311
 312
 313
 314
 315
 316
 317
 318
 319
 320
 321
 322
 323
 324
 325
 326
 327
 328
 329
 330
 331
 332
 333
 334
 335
 336
 337
 338
 339
 340
 341
 342
 343
 344
 345
 346
 347
 348
 349
 350
 351
 352
 353
 354
 355
 356
 357
 358
 359
 360
 361
 362
 363
 364
 365
 366
 367
 368
 369
 370
 371
 372
 373
 374
 375
 376
 377
 378
 379
 380
 381
 382
 383
 384
 385
 386
 387
 388
 389
 390
 391
 392
 393
 394
 395
 396
 397
 398
 399
 400
 401
 402
 403
 404
 405
 406
 407
 408
 409
 410
 411
 412
 413
 414
 415
 416
 417
 418
 419
 420
 421
 422
 423
 424
 425
 426
 427
 428
 429
 430
 431
 432
 433
 434
 435
 436
 437
 438
 439
 440
 441
 442
 443
 444
 445
 446
 447
 448
 449
 450
 451
 452
 453
 454
 455
 456
 457
 458
 459
 460
 461
 462
 463
 464
 465
 466
 467
 468
 469
 470
 471
 472
 473
 474
 475
 476
 477
 478
 479
 480
 481
 482
 483
 484
 485
 486
 487
 488
 489
 490
 491
 492
 493
 494
 495
 496
 497
 498
 499
 500
 501
 502
 503
 504
 505
 506
 507
 508
 509
 510
 511
 512
 513
 514
 515
 516
 517
 518
 519
 520
 521
 522
 523
 524
 525
 526
 527
 528
 529
 530
 531
 532
 533
 534
 535
 536
 537
 538
 539
 540
 541
 542
 543
 544
 545
 546
 547
 548
 549
 550
 551
 552
 553
 554
 555
 556
 557
 558
 559
 560
 561
 562
 563
 564
 565
 566
 567
 568
 569
 570
 571
 572
 573
 574
 575
 576
 577
 578
 579
 580
 581
 582
 583
 584
 585
 586
 587
 588
 589
 590
 591
 592
 593
 594
 595
 596
 597
 598
 599
 600
 601
 602
 603
 604
 605
 606
 607
 608
 609
 610
 611
 612
 613
 614
 615
 616
 617
 618
 619
 620
 621
 622
 623
 624
 625
 626
 627
 628
 629
 630
 631
 632
 633
 634
 635
 636
 637
 638
 639
 640
 641
 642
 643
 644
 645
 646
 647
 648
 649
 650
 651
 652
 653
 654
 655
 656
 657
 658
 659
 660
 661
 662
 663
 664
 665
 666
 667
 668
 669
 670
 671
 672
 673
 674
 675
 676
 677
 678
 679
 680
 681
 682
 683
 684
 685
 686
 687
 688
 689
 690
 691
 692
 693
 694
 695
 696
 697
 698
 699
 700
 701
 702
 703
 704
 705
 706
 707
 708
 709
 710
 711
 712
 713
 714
 715
 716
 717
 718
 719
 720
 721
 722
 723
 724
 725
 726
 727
 728
 729
 730
 731
 732
 733
 734
 735
 736
 737
 738
 739
 740
 741
 742
 743
 744
 745
 746
 747
 748
 749
 750
 751
 752
 753
 754
 755
 756
 757
 758
 759
 760
 761
 762
 763
 764
 765
 766
 767
 768
 769
 770
 771
 772
 773
 774
 775
 776
 777
 778
 779
 780
 781
 782
 783
 784
 785
 786
 787
 788
 789
 790
 791
 792
 793
 794
 795
 796
 797
 798
 799
 800
 801
 802
 803
 804
 805
 806
 807
 808
 809
 810
 811
 812
 813
 814
 815
 816
 817
 818
 819
 820
 821
 822
 823
 824
 825
 826
 827
 828
 829
 830
 831
 832
 833
 834
 835
 836
 837
 838
 839
 840
 841
 842
 843
 844
 845
 846
 847
 848
 849
 850
 851
 852
 853
 854
 855
 856
 857
 858
 859
 860
 861
 862
 863
 864
 865
 866
 867
 868
 869
 870
 871
 872
 873
 874
 875
 876
 877
 878
 879
 880
 881
 882
 883
 884
 885
 886
 887
 888
 889
 890
 891
 892
 893
 894
 895
 896
 897
 898
 899
 900
 901
 902
 903
 904
 905
 906
 907
 908
 909
 910
 911
 912
 913
 914
 915
 916
 917
 918
 919
 920
 921
 922
 923
 924
 925
 926
 927
 928
 929
 930
 931
 932
 933
 934
 935
 936
 937
 938
 939
 940
 941
 942
 943
 944
 945
 946
 947
 948
 949
 950
 951
 952
 953
 954
 955
 956
 957
 958
 959
 960
 961
 962
 963
 964
 965
 966
 967
 968
 969
 970
 971
 972
 973
 974
 975
 976
 977
 978
 979
 980
 981
 982
 983
 984
 985
 986
 987
 988
 989
 990
 991
 992
 993
 994
 995
 996
 997
 998
 999
1000
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085
1086
1087
1088
1089
1090
1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
1137
1138
1139
1140
1141
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
1160
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182
1183
1184
1185
1186
1187
1188
1189
1190
1191
1192
1193
1194
1195
1196
1197
1198
1199
1200
1201
1202
1203
1204
1205
1206
1207
1208
1209
1210
1211
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
1249
1250
1251
1252
1253
1254
1255
1256
1257
1258
1259
1260
1261
1262
1263
1264
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284
1285
1286
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
1298
1299
1300
1301
1302
1303
1304
1305
1306
1307
1308
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
1320
1321
1322
1323
1324
1325
1326
1327
1328
1329
1330
1331
1332
1333
1334
1335
1336
1337
1338
1339
1340
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
1357
1358
1359
1360
1361
1362
1363
1364
1365
1366
1367
1368
1369
1370
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
1388
1389
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
1411
1412
1413
1414
1415
1416
1417
1418
1419
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
1434
1435
1436
1437
1438
1439
1440
1441
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
1455
1456
1457
1458
1459
1460
1461
1462
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
1482
1483
1484
1485
1486
1487
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077
2078
2079
2080
2081
2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095
2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262
2263
2264
2265
2266
2267
2268
2269
2270
2271
2272
2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363
2364
2365
2366
2367
2368
2369
2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
char_darkstar_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Винсент Даркстар";
	disp = "Винсент Даркстар";
	entered = function(s)
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
            psub("lfc_warning");
            return [[Винсент Даркстар недовольно смотрит на вас: "Господин Дрейк. Вы вообще понимаете, что делаете? Это последнее предупреждение. В следующий раз я приму меры. Все ясно? "]];
        end;
    
		if (atl_lfc_leroy_spoken) then
			pon("accuse_leroy");
		end;
		
		if (atl_lfc_goldman_spoken) then
			pon("accuse_goldman");
		end;

		poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr");
        poff("ask_more");
        if (atl_rep_darkstar < 0) then
            if (char_darkstar.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
            if (char_darkstar.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
            if (char_darkstar.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_darkstar.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_darkstar.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
            if (char_darkstar.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_darkstar.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
                if (char_darkstar.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
                if (char_darkstar.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_darkstar.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
            
            if (char_darkstar.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_darkstar.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
            if (char_darkstar.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
        else
            if (char_darkstar.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
            if (char_darkstar.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
            if (char_darkstar.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_darkstar.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_darkstar.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
            if (char_darkstar.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
            if (atl_iof_completed) then
                if (char_darkstar.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
                if (char_darkstar.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
                if (char_darkstar.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
            end;
            if (char_darkstar.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
            
            if (char_darkstar.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_darkstar.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_darkstar.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
            if (char_darkstar.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
        end;
        
		if (s.state == 0) then
			psub("first_meeting");
            s.state = 1;         
			return [[За столом сидит средних лет мужчина с короткими черными волосами. Он одет в строгий деловой костюм черного цвета. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он приветствует вас: "Добро пожаловать на Атлантиду, господин Дрейк. Я Винсент Даркстар, мы уже общались по радио. Я занимаю на Атлантиде пост начальника службы безопаности". ]];
		elseif (atl_fta_state == 2) then
			psub("fta");
			return [[Винсент Даркстар приказывает: "Рассказывайте". ]];
		else
			psub("generic");
			return [[Винсент Даркстар сообщает: "Я слушаю". ]];
		end;
	end;
    phr = {
        {tag="lfc_warning"};
        {always = true, "Так точно.", [[Даркстар кивает: "Отлично. Вам нужно что-то еще?"]], code[[ atl_lfc_panic_warning = 3; psub("generic")]]};
		{tag="first_meeting"};
		{"Что мне нужно сделать, чтобы мне вернули Левиафан?", [[Винсент Даркстар хлопает ладонями о стол и уверенно сообщает: "Вести себя хорошо и не делать глупостей". ]]};
		{"Когда мне вернут Левиафан?", [[Винсент Даркстар отвечает: "Всему свое время. Используйте это время с пользой. Если хотите найти Уильяма, сначала стоит выяснить где и как его искать. И вам не помешает узнать кое-что помимо этого". ]]};
		{"Я пришел кое-что спросить. ", [[Винсент Даркстар сообщает :"Я слушаю". ]], code [[psub("generic");]]};
        {tag="ask_more"};
        {tag="on_drake", false, "Расскажите об Уильяме. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.drake_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.drake_asked = 2;
                return [[Винсент Даркстар отвечает: "Что вы ожидаете услышать? Дрейк -- основатель Вестхейвен Трансоушен. Он -- мой непосредственный руководитель, однако у нас, на Атлантиде, принято решать важные вопросы совместно. Не так давно он отправился в научную экспедицию вместе с Адрианом Блэком и еще несколькими сотрудниками. Дрейк неосторожен и склонен к опрометчивым решениям. Это может сыграть с ним злую шутку".]];
            end;
        end};
        {tag="on_black", false, "Расскажите об Адриане Блэке. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.black_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.black_asked = 2;
                return [[Винсент Даркстар отвечает: "Блэк -- главный помощник Дрейка по управлению компанией. Ни одно важное решение в Вестхейвен Трансоушен не принимается без его участия. Не так давно он отправился в научную экспедицию вместе с Уильямом Дрейком и еще несколькими сотрудниками. С одной стороны -- он хороший руководитель и Дрейку повезло иметь такого помощника, с другой -- Блэк, несомненно, принесет в жертву и станцию и всех нас, если это послужит его интересам. Будьте осторожны при общении с ним". ]];
            end;
        end};
        {tag="on_darkstar", false, "Расскажите о себе. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.darkstar_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.darkstar_asked = 2;
                return [[Винсент Даркстар отвечает: "Мне нечего рассказывать, кроме того, что я уже сказал. Мое имя Винсент Даркстар и я занимаю пост начальника службы безопасности Атлантиды". ]];
            end;
        end};
        {tag="on_svetlova", false, "Расскажите о Екатерине Светловой. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.svetlova_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.svetlova_asked = 2;
                return [[Винсент Даркстар отвечает: "Екатерина Светлова -- руководитель исследовательского отдела на Атлантиде. Секция Окулус находится в ее ведении. Атлантида для нее -- неисчерпаемый источник материала для исследований, поэтому она заинтересована в продолжении работы станции". ]];
            end;
        end};
        {tag="on_moreau", false, "Расскажите о Фредерике Моро. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.moreau_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.moreau_asked = 2;
                return [[Винсент Даркстар отвечает: "Фредерик Моро руководит станцией в отсутствие Дрейка и Блэка. Должен сказать, справляется он неплохо. Ему можно доверять безоговорочно -- он с полной ответственностью подходит к управлению станцией. Хотя он склонен делегировать многие решения, он отдает их правильным людям". ]];
            end;
        end};
        {tag="on_wright", false, "Расскажите о Майлке Райте. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.wright_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.wright_asked = 2;
                return [[Винсент Даркстар отвечает: "Майкл Райт -- руководитель инженерного отдела на Атлантиде. В его задачи входит поддержание работоспособности станции и ее техническое развитие. Станция -- дело всей его жизни. Когда поднимался вопрос, он не колеблясь оставил семью на поверхности ради возможности развивать Атлантиду". ]];
            end;
        end};
        {tag="on_leroy", false, "Что вы думаете о Мишеле Леруа? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.leroy_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.leroy_asked = 2;
                return [[Винсент Даркстар отвечает: "Леруа много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он не выглядит настолько глупым, чтобы саботировать работу станции, однако он один из немногих подпадающих под подозрение. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
            end;
        end};
        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.jones_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.jones_asked = 2;
                return [[Винсент Даркстар отвечает: "Джонс много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он недостаточно смел, чтобы попытаться саботировать работу станции, однако он один из немногих попадающих под подозрение. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
            end;
        end};
        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.goldman_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.goldman_asked = 2;
                return [[Винсент Даркстар отвечает: "Голдман много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он эмоционально неуравновешен. Если бы он устроил аварию, он бы уже выдал себя. Однако, он один из немногих, кому хватает знаний, чтобы спланировать саботаж. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
            end;
        end};
        {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.atlantis_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.atlantis_asked = 2;
                return [[Винсент Даркстар отвечает: "Атлантида построена на средства Вестхейвен Трансоушен -- компании вашего отца. Майкл Райт -- создатель станции, многое продумал, существенно облегчив мне работу. Конечно, периодически, мне приходится иметь дело с нарушениями правил -- я неоднократно просил не загромоздать коридоры; всегда закрывать за собой шлюзы, двери, щитки, панели; не перекрывать посторонними предметами доступ к важным узлам станции. Думаю, вы сами заметили, как исполняются эти указания". ]];
            end;
        end};
        {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.navjiarr_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.navjiarr_asked = 2;
                return [[Винсент Даркстар отвечает: "Они -- причина существования Атлантиды, так что в какой-то мере мы все обязаны им тем, что оказались здесь. Не все на станции довольны этим -- и это создает определенную угрозу. Но, надо признать, они не пытались навредить нам последнее время, однако, я все еще советую Моро и Светловой быть настороже при общении с ними. Они не так просты, как кажутся". ]];
            end;
        end};
        {tag="on_learr", false, "Что вы думаете о Леарр? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.learr_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                if (atl_iof_learr_dead) then
                    char_darkstar.learr_asked = 3;
                    return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
                else
                    char_darkstar.learr_asked = 2;
                    return [[Винсент Даркстар отвечает: "Леарр -- представительница одного из навьярских племен на станции. Она любопытна, молода и умна. Она искренне заинтересована нами и нашими технологиями и это не может не радовать". ]];
                end;
            end;
        end};
        {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.ryveerr_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.ryveerr_asked = 2;
                return [[Винсент Даркстар отвечает: "Ривеерр -- представитель одного из навьярских племен на станции. Я мало что могу о нем сказать, и, в данном случае, это говорит в его пользу". ]];
            end;
        end};
        {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре? ", function()
            if (atl_rep_darkstar < 0) then
                char_darkstar.aikerjarr_asked = 1;
                return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
            else
                char_darkstar.aikerjarr_asked = 2;
                return [[Винсент Даркстар отвечает: "Он будет создавать проблемы. Это не предположение, это -- факт". ]];
            end;
        end};
        {always=true, "Вернемся к делу.", [[Даркстар кивает: "Слушаю".]], code [[ pret(); ]]};
		{tag="generic"};
		{tag="accuse_goldman", false, "Саботаж - дело рук Голдмана.", [[Даркстар недовольно отчитывает вас: "Во-первых, я вас просил не лезть в это дело. Во-вторых, я бы не был так уверен. В третьих, я еще раз прошу вас больше расследованию не мешать". ]], code [[ atl_lfc_suspect="goldman"; ]]};
		{tag="accuse_leroy", "Саботаж - дело рук Леруа.", [[Даркстар недовольно отчитывает вас: "Во-первых, я вас просил не лезть в это дело. Во-вторых, я бы не был так уверен. В третьих, я еще раз прошу вас больше расследованию не мешать". ]], code [[ atl_lfc_suspect="leroy"; ]]};
        {always=true, "У меня есть несколько вопросов.", [[Даркстар кивает: "Слушаю".]], code [[ psub('ask_more'); ]]};
		{always=true, "Я пойду", [[Даркстар прощается: "До встречи". ]], code [[ back(); ]]};
		{tag="fta"};
		{"Что вы хотите услышать?", [[Даркстар поясняет: "Все, что произошло в Солисе и показалось вам подозрительным". ]]};
		{"Первый взрыв раздался, когда я был у входа в секцию[Кратко пересказать основные события]", [[Даркстар молча кивает. ]]};
		{"Один из клапанов работал неправильно - давление в нем было выше нормы", [[Даркстар с сомнением произносит: "Интересно. За десять лет работы станции такого никогда не было". ]]};
		{tag="clock", "[Показать часы]А еще я нашел там вот это", [[Даркстар забирает часы и вертит их в руках: "Так-так-так. Франсуа Голдман. Леонард однозначно в этом замешан, но действовал он не один. Я все еще думаю, что они попытаются вывести из строя одну из субмарин. Скорее всего их целью будет Наутилус". ]], code [[ atl_lfc_goldman_exposed = true; psub("why_nau"); ]]};
		{tag="why_nau"};
		{"Почему именно Наутилус?", [[Даркстар объясняет:"Саботажник хочет не убить всех, а поломать станцию. Он хочет наверх, а не умереть здесь. Наутилус - субмарина малого радиуса, а Энтерпрайз и Левиафан способны доставить нас на континенты". ]]};
		{"Соглашусь с вашим предположением", [[Даркстар кивает: "Хорошо. Я попрошу вас помочь мне с этим заданием". ]], code [[ psub("lfc_help"); ]]};
		{"Мне кажется, целью будет другая субмарина", [[Даркстар кивает: "Я это учел. Мы будем следить за всеми доками. Также, я попрошу вас помочь мне с этим заданием". ]], code [[ psub("lfc_help"); ]]};
		{tag="lfc_help"};
		{"Почему я?", [[Даркстар объясняет:"Я хочу свести количество людей, знающих о саботажах к минимуму, а вы уже в курсе ситуации". ]]};
		{"Что я должен сделать?", [[Даркстар рассказывает:"В семь часов вечера вы отправляетесь в док Наутилуса и наблюдаете за происходящим в течение ночи. Если вы замечаете что-то подозрительное - принимаете меры на ваше усмотрение", -- Даркстар достает из ящика стола револьвер и кладет перед вами: "Это вам не помешает".
		]], code [[
			take(item_colt);
			atl_lfc_state = 2;
			back();
		]]};
	};
};

char_moreau_dlg = dlg {
	var {
		state = 0;
		lfc_dialog = false;
	};
	nam = "Фредерик Моро";
	disp = "Фредерик Моро";
	entered = function(s)
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
            psub("lfc_warning");
            return [[Фредерик Моро сообщает вам: "Месье Дрейк, добрый день. Винсент Даркстар просил вас срочно поговорить с ним". ]];
        end;
    
		if (atl_lfc_state == 3) then
			atl_lfc_state = 4;
			atl_lev_state = 1;
			local reputation = 0;
			if (atl_rep_darkstar > 0) then
				reputation = reputation + 1;
			end;
			if (atl_rep_moreau > 0) then
				reputation = reputation + 1;
			end;
			if (atl_rep_svetlova > 0) then
				reputation = reputation + 1;
			end;
			if (atl_rep_wright > 0) then
				reputation = reputation + 1;
			end;
			
			if (reputation > 2 and atl_rep_moreau >= 0) then
				psub("lfc_debrief_good");
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. Также, вы можете посещать Атлантиду в любое удобное для вас время -- мы всегда будем рады вас видеть". ]];
			elseif (reputation > 2) then
				psub("lfc_debrief_good");
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Также, мы решили не запрещать вам доступ на Атлантиду, но не думайте, что я рад вас видеть". ]];
			elseif (atl_rep_moreau >= 0) then
				psub("lfc_debrief_bad");
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. К сожалению, совет решил ограничить вам доступ к станции, поэтому я прошу вас покинуть Атлантиду как можно скорее". ]];
			else
				psub("lfc_debrief_bad");
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Убирайтесь и больше не возвращайтесь сюда". ]];
			end;
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
        elseif (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
		end;
        
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr", "ask_more");
        
        if (atl_rep_moreau < 0) then
            if (char_moreau.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
            if (char_moreau.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
            if (char_moreau.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_moreau.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_moreau.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
            if (char_moreau.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_moreau.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
                if (char_moreau.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
                if (char_moreau.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_moreau.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
            
            
            if (char_moreau.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_moreau.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
            if (char_moreau.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
        else
            if (char_moreau.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
            if (char_moreau.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
            if (char_moreau.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_moreau.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_moreau.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
            if (char_moreau.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_moreau.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
                if (char_moreau.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
                if (char_moreau.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_moreau.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
            
            if (char_moreau.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_moreau.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_moreau.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
            if (char_moreau.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
        end;
	
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[За столом перед вами сидит немолодой мужчина. Кудрявые седые волосы обрамляют его лицо. Он носит длинные седые усы. Одет человек в строгий деловой костюм бежевого цвета. Его серые глаза, скрытые очками, внимательно рассматривают вас. Вертя в руках перо он приветствует вас: "Добро пожаловать на Атлантиду, месье Дрейк. Мое имя - Фредерик Моро и я исполняю обязанности начальника станции в отсутствие Уильяма и Адриана. Ваше прибытие крайне удивило нас - мы думали, с поверхности найти нашу станцию невозможно. Пока мы думаем, что делать с вами дальше, вы можете воспользоваться ресурсами станции, чтобы узнать побольше о вашем отце и, быть может, понять, куда в точности он направился. Для начала, стоит немного ввести вас в курс дела".^
				Моро подходит к книжной полке и берет какую-то книгу. Вернувшись за стол, он раскрывает ее и приступает к рассказу: "Когда мы строили Надежду, нашей целью было создать быстрый и безопасный способ путешествий через Атлантику. Однако, все с самого начала пошло не так, как планировалось. Мы встретили племя подводных существ, именующих себя навьярами - они похожи на рыб и людей одновременно - ходят на двух ногах, используют две руки, но покрыты чешуей и имеют жабры. Тогда мы приняли решение исследовать их тщательнее. Были построены Энтерпрайз, Наутилус и сама Атлантида. Потом мы переселились сюда. Дрейк был захвачен одной из легенд этих рыбней и не так давно, наконец, решился отправиться в экспедицию". ]];
		elseif (char_moreau.iof_reaction == 0 and atl_iof_completed) then
            char_moreau.iof_reaction = 1;      
            if (atl_iof_learr_dead) then
                psub("iof_learr_dead");
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. К сожалению, нам не удалось спасти Леарр. Это большая потеря для всех нас. Думаю, вам стоит знать, что на станцию прибыл Аикерьярр, чтобы продолжить ее работу". ]];
            elseif (atl_iof_learr_suit) then
                psub("iof_learr_suit");
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. Леарр рассказала мне о вашей идее со скафандром. Спасибо, что позаботились о ней". ]];
            else
                psub("iof_learr");
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. Спасибо, что позаботились о Леарр. С ней все хорошо". ]];
            end;
        else      
			psub("generic");
			return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Чем могу помочь?" ]];
		end;		
	end;
	phr = {
        {tag="lfc_warning"};
        {always = true, "Я пойду", [[Моро прощается с вами: "До встречи, месье Дрейк". ]], code [[ back(); ]]};
        {tag="iof_learr_dead"};
        {"Я ничего не мог сделать. ", [[Фредерик Моро кивает: "Я понимаю". Немного помолчав он говорит: "Давайте к делу". ]], code [[psub("generic");]]};
        {"Давайте к делу. ", [[Фредерик Моро неодобрительно кивает: "Слушаю". ]], code [[
            atl_rep_moreau = atl_rep_moreau - 1;
            psub("generic");
        ]]};
        {tag="iof_learr_suit"};
        {"Рад, что никто не пострадал. ", [[Фредерик Моро кивает: "Ваши действия достойны уважения. Еще раз благодарю вас. Но, перейдем к делу". ]], code [[psub("generic");]]};
        {tag="iof_learr"};
        {"Рад, что никто не пострадал. ", [[Фредерик моро кивает: "Перейдем к делу". ]], code [[psub("generic");]]};
		{tag="first_meeting", empty = code[[ psub("generic"); ]]};
		{"Я не имею намерения раскрывать существование Атлантиды.", [[Фредерик Моро кивает: "Рад это слышать, но нам нужно больше чем ваши слова". ]]};
		{"Что за навьяры?", [[Фредерик Моро отвечает: _"Na'vji'a'rr -- с их языка это переводится, как ,,Живущие в глубинах''. Как я сказал, они чем-то похожи на людей, но по сути своей они -- рыбы. Подробнее о них вам стоит поговорить с нашими учеными в секции Окулус. Там же вы можете встретить Ривеерра и Леарр -- наших гостей из двух ближайших поселений навьяров"_. ]]};
		{"Как получилось, что Левиафан остался на поверхности?", [[Фредерик Моро задумчиво чешет подбородок. Через некоторое время он отвечает: _"Сложно сказать. Это было в ведении Майкла Райта. Скорее всего -- они с Дрейком сознательно спрятали его"_.
		]]};
        {"Куда конкретно направился Уильям?", [[Фредерик Моро вздыхает: "У нас нет точных данных. И похоже их не было и у Блэка с Дрейком. Мы знаем, что их цель - древний навьярский город". ]]};
        {tag="ask_more"};
        {tag="on_drake", false, "Расскажите об Уильяме. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.drake_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.drake_asked = 2;
                return [[Фредерик Моро отвечает: "Уильям Дрейк безусловно гениальный предприниматель и грамотный руководитель, однако он не достиг бы таких успехов, если бы работал один. Адриан Блэк всегда помогал ему управлять компанией. Майкл Райт придумал и построил многие суда компании. Уильям всегда понимал важность сотрудников Вестхейвен Трансоушен и оказывал и продолжает оказывать должное уважение всем нам". ]];
            end;
        end};
        {tag="on_black", false, "Расскажите об Адриане Блэке. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.black_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.black_asked = 2;
                return [[Фредерик Моро отвечает: "Адриан Блэк -- один из основателей Вестхейвен Трансоушен. Он совсем не похож на Уильяма -- осторожный и рассчетливый, он часто вступал в спор с Дрейком по поводу особенно рискованных предприятий. Ему мы тоже многим обязаны, но, если говорить честно, Уильям был гораздо популярнее среди сотрудников". ]];
            end;
        end};
        {tag="on_darkstar", false, "Расскажите о Винсенте Даркстаре. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.darkstar_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.darkstar_asked = 2;
                return [[Фредерик Моро отвечает: "О нем мало что известно, да он и неразговорчив. Впрочем он справляется со своими обязанностями и Дрейк доверяет ему". ]];
            end;
        end};
        {tag="on_svetlova", false, "Расскажите о Екатерине Светловой. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.svetlova_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.svetlova_asked = 2;
                return [[Фредерик Моро отвечает: "Екатерина здесь только из-за навьяров. Ваш отец пригласил ее в Вестхейвен Трансоушен сразу после первой экспедиции Надежды. Сейчас она руководит исследованиями на Атлантиде. Она может показаться вам циничной, но, поверьте, это не вполне так". ]];
            end;
        end};
        {tag="on_moreau", false, "Расскажите о себе. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.moreau_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.moreau_asked = 2;
                return [[Фредерик Моро отвечает: "Я мало что могу рассказать. Мы с вашим отцом, Адрианом и Майклом вместе учились. Когда мы основали Вестхейвен Трансоушен, я остался в тени моих более талантливых друзей. Впрочем, меня, если честно, вполне устраивало такое положение. Сейчас, когда Уильям и Адриан отправились в свою экспедицию, мне пришлось занять пост руководителя станции, но я с радостью вернусь на свою прежнюю должность, как только они вернутся". ]];
            end;
        end};
        {tag="on_wright", false, "Расскажите о Майкле Райте. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.wright_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.wright_asked = 2;
                return [[Фредерик Моро отвечает: "Майкл Райт в компании с самого основания. Он гениальный инженер и изобретатель. Атлантиду тоже спроектировал он и для него она стала смыслом существования. Майкл даже оставил жену и сына на поверхности в пользу возможности развивать станцию". ]];
            end;
        end};
        {tag="on_leroy", false, "Что вы думаете о Мишеле Леруа?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.leroy_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.leroy_asked = 2;
                return [[Фредерик Моро отвечает: "Мишель Леруа -- один из наших инженеров. Последнее время он очень активно выступает в пользу завершения работы станции и возвращения на поверхность. К счастью, его пока поддерживает не слишком много людей. Майкл Райт расскажет вам больше про него". ]];
            end;
        end};
        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.jones_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.jones_asked = 2;
                return [[Фредерик Моро отвечает: "Чарли Джонс -- один из наших инженеров. Кажется, он поддался влиянию Леруа и поддерживает его в плане возвращения на поверхность. Майкл Райт расскажет вам больше про него". ]];
            end;
        end};
        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.goldman_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.goldman_asked = 2;
                return [[Фредерик Моро отвечает: "Леонард Голдман -- один из наших инженеров. Он один из сторонников возвращения на поверхность -- он первым на станции начал поднимать этот вопрос . Майкл Райт расскажет вам больше про него". ]];
            end;
        end};
        {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
            if (atl_rep_moreau < 0) then
                char_moreau.atlantis_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.atlantis_asked = 2;
                return [[Фредерик Моро отвечает: "Мы построили Атлантиду чтобы изучать навьяров. Для этого же мы собрали команду ученых, которую возглавила Екатерина Светлова. Станция постепенно росла, благодаря усилиям инженерной команды под руководством Майкла Райта. Мы пригласили сюда навьяров из ближайших поселений -- Леарр из Ираафаанотра и Ривеерра из Дипатреанотра. Можете поговорить с ними, если хотите -- они сейчас на станции". ]];
            end;
        end};
        {tag="on_navjiarr", false, "Что вы думаете о навьярах?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.navjiarr_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.navjiarr_asked = 2;
                return [[Фредерик Моро отвечает: "Интересные существа. Наши ученые говорят, что они ближе к рыбам, чем к кому бы то ни было еще. Однако, они ходят на двух ногах, имеют руки, и способны дышать воздухом! Более подробно вам лучше говорить с учеными, не со мной, -- он делает небольшую паузу, -- Атлантида обязана им своим существованием. Если бы мы не встретили их при первой экспедиции, вряд ли кто-то стал бы строить эту станцию, тем более здесь. Первое время они создавали нам проблемы, но, к счастью, нам удалось их разрешить и наладить отношения с ними. Двое из них сейчас находятся на станции и вы можете погвоорить с ними". ]];
            end;
        end};
        {tag="on_learr", false, "Что вы думаете о Леарр?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.learr_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                if (atl_iof_learr_dead) then
                    char_moreau.learr_asked = 3;
                    return [[Фредерик Моро тяжело вздыхает: "Ее гибель -- большая потеря для всех нас. Кажется, даже Винсент Даркстар, не способный, как мне казалось на дружеские чувства, относился к ней с некоторой теплотой". ]];
                else
                    char_moreau.learr_asked = 2;
                    return [[Фредерик Моро отвечает: "Милая девушка, хоть и рыба. Она, конечно, порой бывает надоедлива в виду своей излишней, на мой взгляд любознательности, но вы себя на ее месте представьте -- она родилась и росла в своей примитивной деревне, а тут мы -- неспособные дышать в воде, зато способные строить поразительные машины. Нет ничего удивительного, что она только и делает, что носится между Игнисом, Окулусом и Террой, расспрашивая всех обо всем". ]];
                end;
            end;
        end};
        {tag="on_ryveerr", false, "Что вы думаете о Ривеерре?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.ryveerr_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.ryveerr_asked = 2;
                return [[Фредерик Моро отвечает: "Я мало что могу о нем сказать. Он почти не покидает Окулус, общаясь только с учеными. Возможно их вам и стоит спросить о нем". ]];
            end;
        end};
        {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре?", function()
            if (atl_rep_moreau < 0) then
                char_moreau.aikerjarr_asked = 1;
                return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
            else
                char_moreau.aikerjarr_asked = 2;
                return [[Фредерик Моро отвечает: "Пренеприятный персонаж. Будь моя воля -- я бы прогнал его со станции, и большая часть руководителей со мной согласна. Однако, понимая, какие у этого будут последствия, я вынужден позволить ему находиться здесь". ]];
            end;
        end};
        {always=true, "Вернемся к делу.", [[Фредерик Моро спрашивает: "Вы что-то хотели?"]], code [[ pret(); ]]};
		{tag="generic"};
		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", [[Фредерик Моро несколько раз стучит пальцем по столу. Недовольным тоном он делает вам замечание: "Месье Дрейк, -- он выдерживает небольшую паузу, -- Если вы хотите вернуть себе Левиафан, вам стоит следовать нашим правилам и, в частности, не нарушать прямых наших распоряжений". ]], code [[
			atl_rep_moreau = atl_rep_moreau - 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
		]]};
		{tag="ignis_what", false, "Почему начался пожар в Игнисе?", [[Фредерик Моро пожимает плечами и как-то неуверенно проговаривает: "Не знаю. Этим вопросом занимаются инженеры и служба безопасности. Будьте спокойны, наши специалисты не допустят повторения аварии". ]]};
        {always=true, "У меня есть несколько вопросов.", [[Моро кивает: "Да, конечно. Я слушаю".]], code [[ psub('ask_more'); ]]};    
		{always = true, "Я пойду", [[Моро прощается с вами: "До встречи, месье Дрейк". ]], code [[ back(); ]]};
		{tag="lfc_debrief_good"};
		{always = true, "Спасибо, это все.", [[Моро спрашивает: "Вы что-то хотели?". ]], code [[ psub("generic");]]};
		{tag="lfc_debrief_bad"};
		{always = true, "Я пойду", [[Моро кивает. ]], code [[ walk("game_over_banished"); ]]};
	};
};

char_svetlova_dlg = dlg {
	var {
		state = 0;
		lfc_sabotage = false;
		lfc_dialog = false;
		flag_help = false;
		flag_explain = false;
	};
	nam = "Екатерина Светлова";
	disp = "Екатерина Светлова";
	entered = function(s)
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
            psub("lfc_warning");
            return [[Екатерина Светлова сообщает вам: "Добрый день, господин Дрейк. Винсент Даркстар просил вас срочно поговорить с ним". ]];
        end;
    
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr", "ask_more");
        if (atl_rep_svetlova < 0) then
            if (char_svetlova.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
            if (char_svetlova.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
            if (char_svetlova.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_svetlova.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_svetlova.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
            if (char_svetlova.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_svetlova.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
                if (char_svetlova.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
                if (char_svetlova.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_svetlova.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
            
            
            if (char_svetlova.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_svetlova.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
            if (char_svetlova.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
        else
            if (char_svetlova.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
            if (char_svetlova.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
            if (char_svetlova.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_svetlova.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_svetlova.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
            if (char_svetlova.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_svetlova.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
                if (char_svetlova.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
                if (char_svetlova.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_svetlova.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
            
            if (char_svetlova.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_svetlova.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_svetlova.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
            if (char_svetlova.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
        end;
    
		if (s.state == 0) then
			psub('first_meeting');
            s.state = 1;         
			return [[За столом сидит женщина лет сорока-пяти. Золотистые волосы собраны в пучок на затылке. Она одета в простое синее платье. В правой руке она держит карандаш, которым периодически делает пометки в бумагах, лежащих на столе. Она отрывает взгляд от бумаг и приветствует вас: _"Добрый день, господин Дрейк. Мое имя -- Екатерина Светлова, я управляю исследованиями на Атлантиде. Должна признать, вы нас всех узрядно напугали. Даркстар сказал, что вы зайдете. Думаю, вы будете полезны нам. У меня есть предложение для вас. Я знаю, что вы ищете своего отца. Уходя в экспедицию, он не оставил нам почти никаких материалов -- карты, схемы, переводы -- они забрали все с собой. Я прошу вас помочь нам с некоторыми проблемами. Взамен -- мы предоставим вам все имеющиеся у нас материалы. Возможно они помогут вам найти отца"_.]];
        elseif (char_svetlova.iof_reaction == 0 and atl_iof_completed) then
            char_svetlova.iof_reaction = 1;
            if (atl_iof_learr_dead) then
                psub("iof_learr_dead");
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Господин Дрейк, вы были в Игнисе, вместе с Леарр. И все же, вы не смогли спасти ее". ]];
            elseif (atl_iof_learr_suit) then
                psub("iof_learr_suit");
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Господин Дрейк, добрый день. Спасибо, что помогли Леарр выбраться из Игниса. Она рассказала мне о вашей замечательной идее. Благодарю вас от лица всех работников Окулуса". ]];
            else
                psub("iof_learr");
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас:"Господин Дрейк, добрый день. Спасибо, что вытащили Леарр из Игниса. Благодарю вас от лица всех работников Окулуса". ]];
            end;         
		elseif (s.state == 2) then
			psub('ryveerr_on_steal');
			return [[Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Ну как? Поговорили с Ривеерром?" ]];
        else
			if (atl_iyh_state == 9) then
				atl_iyh_state = 10;
                conflict_resolved = 1;
                if atl_iyh_shockfish_dead then
                    psub('iyh_more');
                    if (atl_iyh_artifacts_on_atlantis) then
                        -- навьяры не знают про гибель ската. Светловой пофиг
                        return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                    else
                        -- навьяры в ярости, светлова тоже
                        return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Дрейк! Вы понимаете, что вы сделали?! Одним маленьким взрывом вы погубили годы работы по налаживанию отношений с навьярами! Конечно, вы решили проблему, но разве не было другого способа?!"^Чуть подождав, она сообщает: "К делу. Покажите фрагмент карты, который вы нашли". ]];
                    end;
                elseif atl_iyh_entrance_destroyed then
                    if (atl_iyh_artifacts_on_atlantis) then
                        -- навьяры не знают про разрушение храма. Светловой пофиг
                        psub('iyh_more');
                        return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                    else
                        -- навьяры в ярости, светлова тоже
                        if iof_learr_dead then
                            psub('iyh_more');
                            return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Однако, из-за ваших поспешных действий они теперь гораздо хуже относятся к нам и, скорее всего, нам не придется расчитывать на их помощь в ближайшее время. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                        else
                            psub('learr_back');
                            return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Мы еще раз обсудили все с Леарр, она хотела бы вернуться в экипаж Левиафана. Вы возьмете ее?" ]]
                        end;
                    end;
                else
                    psub('iyh_more');
                    if (atl_iyh_artifacts_on_atlantis) then
                        --Храм в целости, навьяры пляшут, Светлова довольна :)
                        return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Ваши действия в храме были воистину потрясающи. Мы не зря отправили туда именно вас. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                    else
                        --Храм в целости, навьяры пляшут, Светлова довольна, но без артефактов :(
                        return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены.  сожалению, мы не смогли получить доступ к артефактам, добытым вами в храме. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                    end;
                end;
			else
				psub('generic');
				
				if (atl_lfc_state ~= 1) then
					poff('sabotage', 'ignis_what');
				end;
				
				if (atl_lfc_state == 1 and not s.lfc_dialog) then
					s.lfc_dialog = true;
					pon('sabotage', 'ignis_what');
				end;
				
                poff('iyh1');
                if (atl_iyh_state == 1 and atl_iyh_learr_spoken and atl_iyh_ryveerr_spoken) then
                    pon('iyh1');
                end;
                
				return [[Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Добрый день". ]];
			end;
		end;
	end;
	phr = {
        {tag="lfc_warning"};
        {always = true, "Я пойду", [[Светлова возвращается ко своим бумагам: "До встречи". ]], code [[ back(); ]]};
        {tag = "iof_learr_dead"};
        {"Я ничего не мог сделать. ", [[Екатерина Светлова опускает глаза: "Я понимаю". Вздохнув, она спрашивает: "Вам что-то нужно?" ]], code [[ psub("generic"); ]]};
        {"Перейдем к делу. ", [[Екатерина Светлова кивает: "Что вам нужно?" ]], code [[ 
            atl_rep_svetlova = atl_rep_svetlova - 1;
            psub("generic"); 
        ]]};
        {tag = "iof_learr_suit"};
        {"Был рад помочь. ", [[Екатерина Светлова кивает и спрашивает: "Вам что-то нужно?"]], code [[ psub("generic"); ]]};
        {tag = "iof_learr"};
        {"Рад, что никто не пострадал. ", [[Екатерина Светлова кивает и спрашивает: "Вам что-то нужно?"]], code [[ psub("generic"); ]]};
		{tag = "first_meeting"};
		{"Как так получилось, что не осталось никакой информации?", [[Екатерина Светлова поясняет: "Блэк сильно торопил Уильяма и едва они закончили минимальные исследования, они отправились в Венаэданотр -- отдаленный навьярский город к западу от Атлантиды. К сожалению, мы не знаем его точное местоположение". ]], code [[ pon('venaedanotrr'); ]]};
        {"В чем заключается цель экспедиции?", [[Екатерина Светлова отвечает: "Дрейк и Блэк ищут Лсэрианотр -- легендарный навьярский город". ]], code [[pon('lseryanotr')]]};
        {tag = "venaedanotrr", false, "Венаэданотр?", [[Екатерина светлова отвечает: "Один из множества навьярских городов. К сожалению, у нас нет почти никакой информации о нем, кроме предположений. Думаю Дрейк и Блэк смогут многое рассказать о нем, когда вернутся из своей экспедиции". ]]};
		{tag = "lseryanotr", false, "Лсэрианотр?", [[Екатерина Светлова отвечает: "По легенде -- это самый древний город навьяров. С ним связано множество легенд. Одна из них гласит, что Наэтвьирр -- существо великой мудрости, по одной из версий, призванное навьярами из другого мира -- должен был дать навьярам великие знания, которые позволили бы им войти в век процветания. Однако, один из мудрецов предостерег навьяров об обмане, задуманном Наэтвьирром. Но, к тому моменту, Наэтвьирр уже прибыл в Лсэрианотр. Навьяры испугались и запечатали город, навеки закрыв Наэтвьирра внутри". ]]};
		{"В чем заключается ваше предложение?", [[Екатерина Светлова откладывает бумаги в сторону, достает из ящика стола карту и раскладывает ее на столе. После чего продолжает: _"На самом деле, вы прибыли как нельзя вовремя. Наши отношения с навьярами несколько натянулись в последнее время, и, боюсь, разрешить разногласия поможете только вы. Я попробую кратко изложить ситуацию, задавайте вопросы по ходу рассказа, если вам потребуется дополнительная информация, -- Светлова делает небольшую паузу, -- Неподалеку от Атлантиды находятся два навьярских поселения - Ираафаанотр и Дипатреанотр. Первая встреча с жителями Дипатреанотра прошла не совсем гладко и в результате ее погибло несколько человек. К счастью, в дальнейшем отношения удалось наладить. Недавно, между Ираафаанотром и Дипатреанотром произошел конфликт, который может негативно повлиять на нас и наши отношения с этими городами. Мы пытались вмешаться, но это лишь обострило разногласия и в дальнейшем может поставить под угрозу само существование станции"_. ]], code [[ psub('help')]]};
		{tag = 'help'};
		{"И как я смогу помочь?", [[Екатерина Светлова поясняет: _"Навьяры знают, что вы не с Атлантиды, поэтому вы предстанете как нейтральная сторона. Сейчас вам стоит поговорить с Леарр и Ривеерром - узнать их взгляд на ситуацию. Потом приходите ко мне и решим, что делать"_. ]], code [[
			char_svetlova_dlg.flag_help = true;
			if (char_svetlova_dlg.flag_explain) then
				pon("first_meeting_end");
			end;
		]]};
		{"И в чем суть этого конфликта?", [[Екатерина Светлова отвечает: "У навьяров много разных священных предметов, табу, пророчеств. За время существования станции мы заполучили и изучили множество реликвий. Большинство их вполне обычны: статуэтки, какие-то религиозные символы, записи и так далее. Однако, мы заметили закономерность -- самые древние предметы разительно отличаются от остальных -- изготовлены они более качественно, а многие предметы и вовсе не имеют сопоставимых аналогов. Например, у нас есть множество металлических фрагментов, очевидно использовавшихся в каких-то механизмах, есть диски, призмы, цилиндры, изготовленные из неизвестных нам материалов -- они преломляют свет совершенно удивительным образом благодаря внутренней структуре материала. Интересно, что эти предметы имеют совершенно правильную форму и хорошо сохранились. Навьяры говорят, что это не просто предметы красоты, но некие записи, изготовленные древними. Не знаю, как относиться к этому. Возможно, вернувшись из экспедиции Блэк и Дрейк смогут что-то прояснить. Но это было просто отступление. Не так давно из Ираафаанотра и Дипатреанотра пропали ценнейшие реликвии. Города теперь обвиняют в этом друг друга и дело грозит обернуться войной". ]], code [[
			char_svetlova_dlg.flag_explain = true;
			if (char_svetlova_dlg.flag_help) then
				psub("first_meeting_end");
			end;
		]]};
		{tag = "first_meeting_end"};
		{"Хорошо, я помогу вам. ", function(s)
                if (atl_iof_completed) then
                    if (atl_iof_learr_dead) then
                        return [[Екатерина Светлова кивает: _"Поговорите с Аикерьярром и Ривеерром, разберитесь, узнайте больше. Они оба скорее всего где-то здесь, в Окулусе"_. ]];
                    else
                        return [[Екатерина Светлова кивает: _"Поговорите с Леарр и Ривеерром, разберитесь, узнайте больше. Они оба скорее всего где-то здесь, в Окулусе"_. ]];
                    end;
                else
                    return [[Екатерина Светлова кивает: _"Поговорите с Леарр и Ривеерром, разберитесь, узнайте больше. Ривеерр большую часть времени находится здесь, в Окулусе. Леарр вы, скорее всего, найдете в Игнисе"_. ]];
                end;
        end, code [[ 
			char_svetlova_dlg.state = 1;
			atl_iyh_state = 1;
			psub("generic");
		]]};
		{"Я прибыл сюда искать своего отца, а не решать проблемы полуразумных рыбней", [[Екатерина Светлова пожимает плечами и недовольно отвечает: "Если вы не станете помогать нам, мы не станем помогать вам. Можете сидеть и ждать возвращения Надежды". ]]};
        {tag = "ask_more"};
        {tag = "on_drake", false, "Расскажите об Уильяме. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.drake_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.drake_asked = 2;
                return [[Екатерина Светлова отвечает: "Дрейк смог многого достигнуть и, хотя он работал не один, именно благодаря его таланту Вестхейвен Трансоушен просуществовала многие годы. Меня всегда удивляло его чутье -- он часто принимает странные, но, в конечном итоге, выгодные решения. Боюсь, когда-нибудь это чутье подведет его". ]];
            end;
        end};
        {tag = "on_black", false, "Расскажите об Адриане Блэке. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.black_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.black_asked = 2;
                return [[Екатерина Светлова отвечает: "Блэк и Дрейк всегда работали вместе. Там где Дрейк готов пойти на риск, Блэк предлагает поступить осторожно. Зачастую Дрейк полностью передает управление в руки Блэка и Блэк всегда хорошо справляется. В свою очередь, Дрейк всегда умел собирать вокруг себя правильных людей, чего Блэк никогда бы не смог". ]];
            end;
        end};
        {tag="on_darkstar", false, "Расскажите о Винсенте Даркстаре. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.darkstar_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.darkstar_asked = 2;
                return [[Екатерина Светлова отвечает: "Если вы уже говорили с ним, то вы итак все знаете. Вы можете посчитать его чрезмерно осторожным, но для его должности это скорее достоинство, чем недостаток. Не знаю, что творится у него в голове и почему он вообще занимается этим здесь, но пока у нас нет причин не доверять ему". ]];
            end;
        end};
        {tag="on_svetlova", false, "Расскажите о себе. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.svetlova_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.svetlova_asked = 2;
                return [[Екатерина Светлова отвечает: "Не знаю, что вам рассказать. Я родилась в России, но образование получала уже в Европе, во Франции. После завершения обучения, я занималась некоторыми исследованиями в своей области, отправлялась с несколькими экспедициями в различные уголки света. А потом на меня вышел Фредерик Моро -- я тогда как раз искала возможности для новой экспедиции, Атлантиды тогда еще не было, но уже была Надежда и в Вестхейвен Трансоушен уже знали про навьяров. Потом была построена Атлантида и вот я здесь, занимаюсь делом всей моей жизни". ]];
            end;
        end};
        {tag="on_moreau", false, "Расскажите о Фредерике Моро. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.moreau_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.moreau_asked = 2;
                return [[Екатерина Светлова отвечает: "С Фредериком Моро я познакомилась раньше, чем с другими руководителями Вестхейвен Трансоушен. Хотя он и работает в компании с самого ее основания, его имя звучит гораздо реже, чем имена Блэка и Дрейка, однако, вклад Моро в развитие Вестхейвен Трансоушен трудно переоценить. Со всей своей скрупулезностью и точностью, он умело управлял ресурсами компании и продолжает это делать на Атлантиде. Что меня в нем удивляет, так это то, что он, при всех своих способностях, предпочитает оставаться в тени Дрейка и Блэка". ]];
            end;
        end};
        {tag="on_wright", false, "Расскажите о Майкле Райте. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.wright_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.wright_asked = 2;
                return [[Екатерина Светлова отвечает: "Без Майкла Райта Вестхейвен Трансоушен никогда не достигла бы вершин. Сперва все более и более быстроходные и комфортабельные суда, а затем и Надежда с Атлантидой -- все было придумано им. Он напоминает мне безумного изобретателя из фантастической книжки, за исключением того, что не пытается захватить мир". ]];
            end;
        end};
        {tag="on_leroy", false, "Расскажите о Мишеле Леруа. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.leroy_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.leroy_asked = 2;
                return [[Екатерина Светлова отвечает: "Мишель Леруа хорошо известен на станции - он один из первых открыто поднял вопрос о закрытии станции и возвращении на поверхность. К счастью, он пока не успел слишком многих склонить на свою сторону. Вам лучше поговорить с Моро или Райтом по этому поводу". ]];
            end;
        end};
        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.jones_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.jones_asked = 2;
                return [[Екатерина Светлова отвечает: "Кажется, это кто-то из подчиненных Майкла Райта. Почему бы вам не поговорить с ним об этом". ]];
            end;
        end};
        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.goldman_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.goldman_asked = 2;
                return [[Екатерина Светлова отвечает: "Кажется, это кто-то из подчиненных Майкла Райта. Почему бы вам не поговорить с ним об этом". ]];
            end;
        end};
        {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.atlantis_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.atlantis_asked = 2;
                return [[Екатерина Светлова отвечает: "Атлантида была построена с единственной целью -- быть ближе к навьярам, получить возможность изучать их. Майкл Райт, конечно, скажет вам другое и будет по-своему прав -- в конце концов, станцию придумал именно он". ]];
            end;
        end};
        {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.navjiarr_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.navjiarr_asked = 2;
                return [[Екатерина Светлова отвечает: "Удивительные создания. Я никогда не поверила бы в их существование, если бы не видела их собственными глазами. Хотя они кажутся крайне примитивными на первый взгляд, у них богатая и интересная культура. К сожалению, сейчас они пребывают в некотором упадке. На многие вопросы, которые мы им задаем -- как они строят свои храмы, откуда достают материалы, кем созданы их реликвии, они отвечают туманными легендами о древних временах и дальних местах. К сожалению, их картографическая система настолько запутана, что многие из них путаются в ней". ]];
            end;
        end};
        {tag="on_learr", false, "Что вы думаете о Леарр? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.learr_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                if (atl_iof_learr_dead) then
                    char_darkstar.learr_asked = 3;
                    return [[Екатерина Светлова отвечает: "Помимо самого факта гибели этой замечательной юной девушки, это событие имеет далеко идущие последствия для Атлантиды". ]];
                else
                    char_darkstar.learr_asked = 2;
                    return [[Екатерина Светлова отвечает: "Леарр -- просто находка для нас всех. Она гораздо меньше скована догмами, чем другие, более старые, представители ее племени. Приятно наблюдать, как она с легкостью впитывает наши знания и с готовностью делится своими". ]];
                end;
            end;
        end};
        {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.ryveerr_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.ryveerr_asked = 2;
                return [[Екатерина Светлова отвечает: "Ривеерр -- достаточно дружелюбный и приятный навьяр. Его интеллект позволяет нам общаться с ним практически на равных, с поправкой на отсутствие знания и понимания многих, известных нам вещей". ]];
            end;
        end};
        {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре? ", function()
            if (atl_rep_svetlova < 0) then
                char_svetlova.aikerjarr_asked = 1;
                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
            else
                char_svetlova.aikerjarr_asked = 2;
                return [[Екатерина Светлова отвечает: "Нам всем было бы легче, если бы его не было на Атлантиде. К сожалению, сейчас мы не можем просто взять и прогнать его -- это сделает наше положение еще худшим, чем оно есть". ]];
            end;
        end};
        {always=true, "Вернемся к делу.", [[Светлова кивает: "Говорите".]], code [[ pret(); ]]};
		{tag = "generic"};
		{tag = "sabotage", false, "Даркстар считает, что причиной пожара в Игнисе был саботаж. Что вы об этом думаете?", function(s)
			if (atl_iof_learr_dead) then
				atl_rep_darkstar = atl_rep_darkstar - 1;
				return [[Екатерина Светлова отвечает: "Даркстар просил вас об этом никому не говорить. Разговор окончен". ]];
			else
			    char_svetlova_dlg.lfc_sabotage = true;
				atl_rep_svetlova = atl_rep_svetlova + 1;
				return [[Екатерина Светлова отвечает: "Даркстар просил вас об этом никому не говорить, но я понимаю ваш интерес. Саботажником может быть только кто-то из сторонников закрытия станции. Поговорите с Мишелем Леруа, чтобы больше об этом узнать. О саботаже попробуйте поговорить с Уолтером Рэдклиффом, если вам действительно интересно. И, пожалуйста, постарайтесь не разводить панику на станции". ]];
			end;
		end};
		{tag = "ignis_what", false, "Вы знаете, что произошло в Игнисе?", function(s)
			if (char_svetlova_dlg.lfc_sabotage) then
				return [[Екатерина Светлова отвечает: "Вы же только что сами сказали - саботаж". ]];
			elseif (atl_iof_learr_dead) then
				return [[Екатерина Светлова отказывается отвечать: "Мне кажется, это не ваше дело. И не мое. Этим занимается служба безопасности". ]];
			else
				poff("sabotage");
				psub("ignis_sabotage");
				return [[Екатерина Светлова отвечает: "Я думаю вы и сами прекрасно знаете. Может расскажете?". ]];
			end;
		end};
        {tag= "iyh1_learr", false, "Я поговорил с навьярами. Леарр отрицает причастность Ираафаанотра к краже реликвии из Дипатреанотра. Ривеерр же открыто признает, что навьяры Дипатреанотра забрали ценности из Ираафаанотра.", [[Светлова разводит руками: "Теперь вы в курсе ситуации. Однако, у нас есть зацепка -- Записи Уильяма. Он мало что оставил нам, но среди найденного есть следующее сообщение", -- Екатерина достает из ящика блокнот и передает вам.^ Вы читаете следующее: "Карты давно утеряны, но отшельник в старом храме обещал помочь. Понятия не имею, что и как он сделает, но если это поможет найти Лсэрианотр -- пусть делает что считает нужным". ]], code [[ dypatreanotrr_temple_found = true; atl_iyh_state = 2; psub('iyh1_sub'); ]]};
        {tag= "iyh1_aikerjarr", false, "Я поговорил с навьярами. Аикерьярр отрицает причастность Ираафаанотра к краже реликвии из Дипатреанотра. Ривеерр же открыто признает, что навьяры Дипатреанотра забрали ценности из Ираафаанотра.", [[Светлова разводит руками: "Теперь вы в курсе ситуации. Аикерьярр, конечно, доверия не заслуживает, но Леарр говорила то же самое. Тем не менее, у нас есть зацепка -- Записи Уильяма. Он мало что оставил нам, но среди найденного есть следующее сообщение", -- Екатерина достает из ящика блокнот и передает вам.^ Вы читаете следующее: "Карты давно утеряны, но отшельник в старом храме обещал помочь. Понятия не имею, что и как он сделает, но если это поможет найти Лсэрианотр -- пусть делает что считает нужным". ]], code [[ dypatreanotrr_temple_found = true; atl_iyh_state = 2; psub('iyh1_sub'); ]]};
        {always=true, "У меня есть несколько вопросов.", [[Светлова кивает: "Спрашивайте".]], code [[ psub('ask_more'); ]]};
		{always = true, "Я пойду", [[Светлова возвращается ко своим бумагам: "До встречи". ]], code [[ back(); ]]};
        {tag= "iyh1_sub"};
        {"Старый храм?", [[Светлова пожимает плечами: "К сожалению, у меня нет ничего кроме намеков. Предполагаю, что где-то здесь может быть еще один храм навьяров, возможно стоит расспросить их?" ]]};
        {"Я хотел бы посетить храм Дипатреанотра.", [[Светлова отвечает: "Не думаю, что это хорошая идея. Навьяры не пускают никого внутрь". ]], code [[ pon('outside');]]};
        {tag = "outside", false, "Возможно, самое интересное находится снаружи храма.", [[Светлова соглашается: "Возможно. В любом случае -- прошло уже достаточно много времени, чтобы хоть какие-то следы сохранились". ]], code [[ pret(); ]]};
		{tag = "ignis_sabotage"};
		{"Даркстар считает, что причиной пожара был саботаж", function(s)
			psub("generic");
			atl_rep_svetlova = atl_rep_svetlova + 1;
            return [[Екатерина Светлова отвечает: "Даркстар просил вас об этом никому не говорить, но я понимаю ваш интерес. Саботажником может быть только кто-то из сторонников закрытия станции. Поговорите с Мишелем Леруа, чтобы больше об этом узнать. О саботаже попробуйте поговорить с Уолтером Рэдклиффом, если вам действительно интересно. И, пожалуйста, постарайтесь не разводить панику на станции". ]];
		end};
		{"Понятия не имею", [[Екатерина Светлова разочарованно отвечает: "Очень жаль". ]], code [[ psub("generic"); ]]};
		{tag="secret_op"};
		{"Хорошо, я ничего не скажу навьярам. ", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]], code [[ back(); ]]};
		{"Мне кажется, нам стоит поставить их в известность. Как они отреагируют, если мы просто принесем им реликвию? ", [[Екатерина Светлова отвечает: "Они будут благодарить нас. А теперь представьте, что вы сообщаете им, что отправляетесь в их священное место охотиться на их священную рыбу. Что будет?" ]], code [[ psub("so_answer"); ]]};
		{tag="so_answer"};
		{"Да, пожалуй вы правы", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]]};
		{"А что будет, если мы принесем им реликвию, которая должна по их мнению быть в Ираафаанотре? Разве они не посчитают, что мы украли ее оттуда? ", [[Екатерина Светлова недовольно отвечает: "Поступайте как знаете. Если ваши действия повредят станции, то Левиафана вам не видать". ]], code [[ back(); ]]};
        {tag="learr_back"};
        {"Конечно, Леарр будет крайне полезна в нашей экспедиции.", [[Леарр, все это время молча стоявшая рядом, отвечает: "Я благодарю тебя-Дрейк. Ты помог нам-Ираафаанотру-и-Дипатреанотру. Я разрушение-храма-понимаю. Другого-пути не-было". ^Светлова кивает: "Этот вопрос решен. Переходим к следующему. Вы говорили, что нашли фрагмент карты. Можете показать его?"]], code [[
            table.insert(pl.party, 'learr');
            lifeon("char_learr");
            remove("char_learr_atlantis", where("char_learr_atlantis"));
            psub("iyh_more");
        ]]};
        {"Нет, мы справимся без ее помощи.", [[Леарр, все это время молча стоявшая рядом, кивает: "Я предпочла-бы-участвовать-в-экспедиции".]], code [[
            psub("learr_back2");
        ]]};
        {tag="learr_back2"};
        {"Хорошо, возвращайся на Левиафан.", [[Леарр отвечает: "Я благодарю тебя-Дрейк. Ты помог нам-Ираафаанотру-и-Дипатреанотру. Я разрушение-храма-понимаю. Другого-пути не-было". ^Светлова кивает: "Этот вопрос решен. Переходим к следующему. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]], code [[
            table.insert(pl.party, 'learr');
            lifeon("char_learr");
            remove("char_learr_atlantis", where("char_learr_atlantis"));
            psub("iyh_more");
        ]]};
        {"Нет, оставайся на Атлантиде", [[Леарр разочарованно отвечает: "Я на-Атлантиде-останусь", -- и выходит из комнаты. ^Светлова качает головой: "Вы зря отказались от ее помощи, Дрейк. Навьяр на борту мог бы оказаться очень полезен. Но, к делу. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]], [[
            move("char_learr_atlantis", "atl_oculus_library");
            psub("iyh_more");
        ]]};
		{tag="iyh_more"};
        {"[Передать фрагмент карты]Да, конечно. Мы нашли это в скрытом помещении в храме.", [[Екатерина Светлова с интересом рассматривает табличку: "Удивительно, это явно очень старое, но это может быть все что угодно. Да, это карта, она сильно отличается от других навьярских карт, виденных нами. Обратите внимание, на количество деталей -- здесь не только отмечены условными символами три-четыре ориентира. Здесь их десятки, если не сотни. Попробуйте разузнать побольше в Ираафаанотре и Дипатреанотре". ]], code [[ psub("generic"); ]]};
	};
};

char_michael_wright_dlg = dlg {
    var {
        state = 0;
        lfc_dialog = false;
    };
    nam = "Майкл Райт";
    disp = "Майкл Райт";
    entered = function(s)
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
            psub("lfc_warning");
            return [[Екатерина Светлова сообщает вам: "Добрый день Винсент Даркстар просил вас срочно поговорить с ним". ]];
        end;
    
        if (atl_nih_state == 2) then
            pon('nih_fixed');
        end;
        
        if (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
        end;
        
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
            s.lfc_dialog = true;
            pon('sabotage', 'ignis_what');
        end;
        poff("ask_more");
        if (atl_rep_wright < 0) then
            if (char_michael_wright.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
            if (char_michael_wright.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
            if (char_michael_wright.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_michael_wright.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_michael_wright.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
            if (char_michael_wright.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
            
            if (atl_iof_completed) then
                if (char_michael_wright.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
                if (char_michael_wright.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
                if (char_michael_wright.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_michael_wright.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
            if (char_michael_wright.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_michael_wright.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
            if (char_michael_wright.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
        else
            if (char_michael_wright.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
            if (char_michael_wright.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
            if (char_michael_wright.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
            if (char_michael_wright.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
            if (char_michael_wright.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
            if (char_michael_wright.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
            if (atl_iof_completed) then
                if (char_michael_wright.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
                if (char_michael_wright.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
                if (char_michael_wright.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
            end;
            
            if (char_michael_wright.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
            if (char_michael_wright.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
            if (char_michael_wright.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_michael_wright.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
            if (char_michael_wright.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
        end;
        
        if (atl_iof_completed and char_michael_wright.iof_reaction == 0) then
            char_michael_wright.iof_reaction = 1;
            if (atl_iof_learr_dead) then
                psub("iof_learr_dead");
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Трагедия на Игнисе стала для нас неожиданностью. Быть может, если бы мы были готовы к такому, Леарр была бы здесь, с нами". ]];
            elseif (atl_iof_learr_suit) then
                psub("iof_learr_suit");
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Авария на Игнисе стала для нас неожиданностью, однако благодаря вашим действиям никто не пострадал, а мы получили ценный опыт". ]];
            else
                psub("iof_learr");
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Авария на Игнисе стала для нас неожиданностью, однако благодаря вашим действиям никто не пострадал". ]];
            end;
        elseif (atl_nih_state == 3 and atl_iof_completed and atl_fta_state == 0) then
            atl_fta_state = 1;
            return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. У меня есть для вас работа. Сейчас все наши бригады заняты, поэтому я прошу вас помочь с обслуживанием Солиса. Приходите туда и свяжитесь со мной по телефону, я дам вам инструкции". ]];
        elseif (atl_fta_state == 2) then
            atl_fta_state = 3;
            psub("fta_deb");
            return [[Майкл Райт протягивает вам руку: "Только благодаря вам, мы все еще здесь. Я с радостью сообщу Моро, что я за возвращение вам Левиафана". ]];
        else
            psub("generic");
            return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. Чем могу быть полезен?" ]];
        end;        
    end;
    phr = {
        {tag="lfc_warning"};
        {always=true, "Мне пора", [["До встречи", -- Майкл Райт возвращается к своим делам. ]], code [[ back(); ]]};
        {tag="iof_learr_dead"};
        {"Мне очень жаль.", [[Майкл Райт кивает: "Утерянного не вернуть. Мы сделали выводы и постараемся не допустить опасных инцидентов в будущем". ]], code [[psub("generic");]]};
        {"Я чуть не погиб там!", [[Майкл Райт отворачивается от вас и произносит: "Приходите позже, я занят"]], code [[ atl_rep_wright = atl_rep_wright - 1; back(); ]]};
        {tag="iof_learr_suit"};
        {"Я сделал, что должен был. ", [[Майкл Райт кивает: "И все же, не каждому пришла бы в голову идея облачить навьяра в скафандр".]], code [[psub("generic");]]};
        {tag="iof_learr"};
        {"Рад, что никто не пострадал. ", [[Майкл Райт кивает. ]], code [[ psub("generic"); ]]};
        {tag="fta_deb"};
        {"[Пожать руку]Только я все еще не знаю, куда мне следует плыть", [[Майкл Райт кивает: "Мы сделаем все возможное, чтобы помочь вам. Светлова сказала мне, что вы помогаете ей в решении каких-то проблем с навьярами. По ее мнению, это может помочь вам в поисках". ]], code [[ psub('generic'); ]]};
        {"Просто верните мне Левиафан", [[Майкл Райт с сожалением произносит: "Не все так просто. Нужно, чтобы согласие дали еще Моро, Даркстар и Светлова". ]], code [[ psub('generic'); ]]};
        {tag="ask_more"};
        {tag="on_drake", false, "Расскажите об Уильяме. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.drake_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.drake_asked = 2;
                return [[Майкл Райт отвечает: "Я познакомился с вашим отцом во время нашей учебы в университете. Он никогда не относился серьезно к учебе, но уже тогда он умел собирать вокруг себя людей. Создание Вестхейвен Трансоушен было его идеей. Я помню, как мы с Моро первое время очень сомневались, стоит ли ввязываться в подобную авантюру. Дрейк активно развивал компанию, пока она существовала. Наверное, любой другой на месте Дрейка отправил бы меня лечиться, услышав мое предложение создать подводный корабль. Уильям тогда внимательно выслушал меня, задал пару вопросов и выделил деньги на проект". ]];
            end;
        end};
        {tag="on_jack", false, "Расскажите о своем сыне. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.jack_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.jack_asked = 2;
                if (atl_jack_in_party) then
                    return [[Майкл Райт отвечает: "Мой сын, Джек, остался на поверхности вместе с моей женой, Элис. Я оставил им дом и немаленькое состояние, в надежде, что они справятся сами. Жаль, что все так получилось. Элис умерла, а Джек потратил лучшие годы на безуспешные попытки найти меня. Спасибо, что взяли моего сына с собой". ]];
                else
                    psub("son");
                    return [[Майкл Райт отвечает: "Мой сын, Джек, остался на поверхности вместе с моей женой, Элис. Я оставил им дом и немаленькое состояние, так что надеюсь, что у них все хорошо". ]];
                end;
            end;
        end};
        {tag="on_black", false, "Расскажите об Адриане Блэке. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.drake_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.drake_asked = 2;
                return [[Майкл райт отвечает: "Адриан -- университетский друг вашего отца. Он всегда уравновешивал Дрейка во многих отношениях. Там где Дрейк готов был пойти на риск, Блэк призывал к осторожности. Там где Дрейк соглашался на уступки, Блэк стоял до последнего. К слову, мою идею с субмариной Адриан не одобрил. К счастью, ваш отец все же позволил мне этим заняться". ]];
            end;
        end};
        {tag="on_darkstar", false, "Расскажите о Винсенте Даркстаре ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.darkstar_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.darkstar_asked = 2;
                return [[Майкл Райт отвечает: "Я почти ничего о нем не знаю. Впрочем не думаю, что кто-то на станции может сказать о нем что-то. Параноидальный тип. Я вообще не понимаю, как он согласился сюда пеерехать. Тогда он мне целый допрос устроил - чуть ли не в каждую линию на чертеже тыкал и спрашивал для чего это нужно. Думаю, мне стоит гордиться, что Атлантида прошла его проверку". ]];
            end;
        end};
        {tag="on_svetlova", false, "Расскажите о Екатерине Светловой. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.svetlova_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.svetlova_asked = 2;
                return [[Майкл Райт отвечает: "Екатерина присоединилась к нам достаточно поздно -- уже после испытаний Надежды. Странно, что ей не пришла в голову идея построить Атлантиду. Впрочем, ее мало интересует техническая сторона вопроса -- она здесь чтобы изучать навьяров и не скрывает это". ]];
            end;
        end};
        {tag="on_moreau", false, "Расскажите о Фредерике Моро. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.moreau_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.moreau_asked = 2;
                return [[Майкл Райт отвечает: "Фредерик с нами с самого начала. Хотя его влияние может показаться незначительным -- многие даже на станции не знали его, пока он не занял пост управляющего -- он все же делал важное дело. Благодаря ему мы смогли завершить многие проекты вовремя, ведь за все поставки материалов отвечал именно он. С управлением станцией он так же справляется неплохо, хотя здесь все гораздо проще, чем было на поверхности". ]];
            end;
        end};
        {tag="on_wright", false, "Расскажите о себе. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.wright_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.wright_asked = 2;
                if (atl_jack_in_party) then
                    return [[Майкл Райт отвечает: "Родился я в Лондоне. Окончил один из местных университетов, получив специальность инженера-кораблестроителя. Вместе с вашим отцом, Фредериком Моро и Адрианом Блэком мы основали Вестхейвен Трансоушен. Поначалу моя работа была далеко не идеальной -- мы купили несколько старых кораблей и привели их в порядок. Мы довольно быстро заработали хорошую репутацию. Дела шли на подъем и, наконец, у нас появились собственные верфи. К этому времени я уже имел глупость жениться. Я спроектировал несколько судов для компании. Лучшим была Огненная Стрела -- быстроходный комфортабельный пароход, вмещающий больше двух сотен пассажиров. Ну и наконец мы построили Надежду. Сказать, что мы удивилсь, когда на первых же испытаниях мы встретили навьяров -- все равно, что ничего не сказать. К сожалению, встреча не прошла бескровно -- наши люди просто вышли поговорить, показать себя. А эти рыбни закидали несчастных супругов Барнз копьями! Блэк тогда не дал мне пустить торпеду в этих уродов, я до сих пор зол на него за это, хотя у мом понимаю, что он был прав. Да и не было бы никакой Атлантиды, убей я тогда тех навьяров. Несколько месяцев мы обсуждали, что делать дальше. Потом мы с Сильвией придумали Атлантиду и переселились сюда", - Райт вздыхает, - "В своем увлечении я позабыл обо всем. Я оставил свою жену, Элис, и сына, Джека, на поверхности. Если честно, я скорее жалею, что женился, чем что оставил их там. Это не делает мою ошибку меньше". ]];
                else
                    return [[Майкл Райт отвечает: "Родился я в Лондоне. Окончил один из местных университетов, получив специальность инженера-кораблестроителя. Вместе с вашим отцом, Фредериком Моро и Адрианом Блэком мы основали Вестхейвен Трансоушен. Поначалу моя работа была далеко не идеальной -- мы купили несколько старых кораблей и привели их в порядок. Мы довольно быстро заработали хорошую репутацию. Дела шли на подъем и, наконец, у нас появились собственные верфи. К этому времени я уже имел глупость жениться. Я спроектировал несколько судов для компании. Лучшим была Огненная Стрела -- быстроходный комфортабельный пароход, вмещающий больше двух сотен пассажиров. Ну и наконец мы построили Надежду. Сказать, что мы удивилсь, когда на первых же испытаниях мы встретили навьяров -- все равно, что ничего не сказать. К сожалению, встреча не прошла бескровно -- наши люди просто вышли поговорить, показать себя. А эти рыбни закидали несчастных супругов Барнз копьями! Блэк тогда не дал мне пустить торпеду в этих уродов, я до сих пор зол на него за это, хотя у мом понимаю, что он был прав. Да и не было бы никакой Атлантиды, убей я тогда тех навьяров. Несколько месяцев мы обсуждали, что делать дальше. Потом мы с Сильвией придумали Атлантиду и переселились сюда". ]];
                end;
            end;
        end};
        {tag="on_leroy", false, "Что вы думаете о Мишеле Леруа? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.leroy_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.leroy_asked = 2;
                return [[Майкл Райт отвечает: "Мишель Леруа уже давно создает проблемы на Атлантиде -- он первым начал активно поднимать вопрос возвращения на поверхность. Не думаю, что вам стоит на него обращать внимание". ]];
            end;
        end};
        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.jones_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.jones_asked = 2;
                return [[Майкл Райт отвечает: "Джонс, кажется, не в восторге, что наше пребывание на Атлантиде затянулось. К счастью, в отличие от Леруа, он не пытается всех убедить в своей правоте. Если вас интересует, мог ли он саботировать Игнис, то я не считаю это вероятным". ]];
            end;
        end};
        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.goldman_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.goldman_asked = 2;
                return [[Майкл Райт отвечает: "Леонард -- способный работник. К сожалению, в последнее время он перенял идеи Леруа. Не стоит говорить, как это сказалось на его работе. Надеюсь, он возьмется за ум". ]];
            end;
        end};
        {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.atlantis_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.atlantis_asked = 2;
                return [[Майкл Райт отвечает: "Идея построить постоянную подводную станцию пришла мне в голову через некоторое время после завершения Надежды. Думаю, что не встреть мы тогда навьяров, Дрейк не позволил бы мне заниматься этим. Но его явно заинтересовала возможность постоянного пребывания вблизи этих рыбней. Конечно, если бы не Сильвия, я никогда не смог бы сделать станцию автономной -- я долго думал, как обеспечить нас всем необходимым здесь: едой, электричеством, воздухом, инструментами. Еду и воздух мы получаем в секции Аэрис. Электричество получаем сжигая топливо нескольких видов - растения, выращиваемые в Аэрисе и уголь, выменянный у навьяров. С инструментами дале обстоят сложнее всего. Но тут нас снова выручают навьяры, с готовностью предлагая нам металл, который они не умеют обрабатывать". ]];
            end;
        end};
        {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.navjiarr_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.navjiarr_asked = 2;
                return [[Майкл Райт отвечает: "Они меня мало волнуют. Хотя станция существует во многом благодаря сотрудничеству с ними, я предпочитаю поменьше общаться с ними. У меня все еще стоят перед глазами проткнутые кораллловыми копьями тела Ребекки и Нила". ]];
            end;
        end};
        {tag="on_learr", false, "Что вы думаете о Леарр? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.learr_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                if (atl_iof_learr_dead) then
                    char_michael_wright.learr_asked = 3;
                    return [[Майкл Райт отвечает: "Леарр часто бывала здесь. Рассматривала все. Было приятно с ней общаться. Ее гибель -- большая утрата для всех нас". ]];
                else
                    char_michael_wright.learr_asked = 2;
                    return [[Майкл Райт отвечает: "Она часто бывает здесь. Рассматривает все, изучает. Это не может меня не радовать". ]];
                end;
            end;
        end};
        {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.ryveerr_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.ryveerr_asked = 2;
                return [[Майкл Райт отвечает: "Не думаю, что смогу много о нем сказать. Большую часть времени он проводит в Окулусе. Если вы хотите узнать о Ривеерре больше, советую поспрашивать там". ]];
            end;
        end};
        {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре ", function()
            if (atl_rep_wright < 0) then
                char_michael_wright.aikerjarr_asked = 1;
                return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
            else
                char_michael_wright.aikerjarr_asked = 2;
                return [[Майкл Райт отвечает: "Не думаю, что могу что-то о нем сказать. Я видел его один раз, при встрече и не могу сказать, что впечатление было благоприятным. Слишком заносчивый он". ]];
            end;
        end};
        {always=true, "Вернемся к делу.", [[Майкл Райт кивает: "Хорошо".]], code [[ pret(); ]]};
        {tag="generic"};
        {tag="nih_fixed", false, "Я нашел утечку", [[Майкл Райт кивает: "Спасибо, я отправлю туда человека, чтобы он все поправил. Пока у меня больше нет для вас заданий". ]], code [[ atl_nih_state = 3; atl_rep_wright = atl_rep_wright + 1; ]]};
        {tag="sabotage", false, "Даркстар считает, что пожар начался из-за саботажа", function(s)
            atl_rep_wright = atl_rep_wright - 1;
            local part1 = [[Майкл Райт недовольно ворчит: "Пожалуйста, не лезьте в это дело. За безопасность станции отвечает Винсент Даркстар и лучше будет, если он будет заниматься этим делом]];
            if (not atl_jack_in_party) then
                atl_rep_darkstar = atl_rep_darkstar - 1;
                return part1 .. [[Я доложу Даркстару о вашем неповиновении". ]];
            else 
                return part1 .. [[". ]];
            end;
        end};
        {tag="ignis_what", false, "Из-за чего начался пожар в Игнисе?", [[Майкл Райт отвечает: "Короткое замыкание. Рядом, к сожалению, никого не оказалось и потушить возгорание вовремя не удалось. Огонь быстро распространился по всей секции, ну а дальше вы все знаете". ]]};
        {always=true, "У меня есть несколько вопросов.", [[Майкл Райт отвечает: "Задавайте, посмотрим чем смогу помочь".]], code [[ psub('ask_more'); ]]};
        {always=true, "Мне пора", function(s)
            if (atl_nih_state == 0 and atl_jack_in_party) then
                atl_nih_state = 3;
            end;
            if (atl_nih_state == 0 and not atl_jack_in_party) then
                atl_nih_init();
                pr([["Кстати, у меня есть для вас небольшое задание. У нас где-то утечка воздуха. Ничего критичного. Просто прогуляйтесь по станции и если обнаружите, где это - сообщите мне. До встречи", -- Майкл Райт возвращается к своим делам. ]]);
            else
                pr([["До встречи", -- Майкл Райт возвращается к своим делам. ]]);
            end;
        end, code [[ back(); ]]};
        {tag="son"};
        {"Мать Джека умерла, а сам он прозябает в своем доме ничего не делая. ", [[Майкл Райт вздыхает: "Жаль, что все так вышло. Спасибо, что честно сказали мне. Наверное..."]], code[[pret();]]};
        {"Мать Джека умерла, но с ним все в порядке. Он все еще живет в вашем доме. ", [[Майкл Райт вздыхает: "Элис...". ]], code[[pret();]]};
        {"У них все хорошо. ", [[Майкл Райт кивает: "Рад это слышать". ]], code[[pret();]]}
    };
};


char_anna_atlantis_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Анна Рэдклифф";
	disp = "Анна Рэдклифф";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
        
        --[[
            anna_asked = 0;
            walter_asked = 0;
            atlantis_asked = 0;
            drake_asked = 0;
        ]]
        poff("on_anna", "on_walter", "on_atlantis", "on_drake", "ask_more");
        if (rel_anna  < 0) then
            if (char_anna.anna_asked == 0) then
                pon("on_anna");
                pon("ask_more");
            end;
            if (char_anna.walter_asked == 0) then
                pon("on_walter");
                pon("ask_more");
            end;
            if (char_anna.atlantis_asked == 0) then
                pon("on_atlantis");
                pon("ask_more");
            end;
            if (char_anna.drake_asked == 0) then
                pon("on_drake");
                pon("ask_more");
            end;
        else
            if (char_anna.anna_asked < 2) then
                pon("on_anna");
                pon("ask_more");
            end;
            if (char_anna.walter_asked < 2) then
                pon("on_walter");
                pon("ask_more");
            end;
            if (char_anna.atlantis_asked < 2) then
                pon("on_atlantis");
                pon("ask_more");
            end;
            if (char_anna.drake_asked < 2) then
                pon("on_drake");
                pon("ask_more");
            end;
        end;
	
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[Перед вами стоит девушка лет двадцати-пяти--тридцати. Каштановые волосы ниспадают на плечи. Зеленые глаза внимательно следят за движениями навьяра, с которым она разговаривает. Заметив вас, она просит навьяра подождать и обращается к вам: "Приветствую. Вы, должно быть господин Дрейк? Мое имя Анна Рэдклифф". ]];
		else
			psub("generic");
			return [[Анна Рэдклифф разговаривает с навьяром, стоящим рядом. Заметив вас, она просит его подождать и обращается к вам: "Приветствую, вы что-то хотели?" ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Да, я Дэвид Дрейк. Рад знакомству", [[Анна Рэдклифф улыбается и спрашивает: "Вы что-то хотели?" ]], code = [[ psub('generic'); ]]};
        {tag="ask_more"};
        {tag="on_walter", "Расскажите об Уолтере. ", function(s)
            if (rel_anna < 0) then
                char_anna.walter_asked = 1;
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
            else
                char_anna.walter_asked = 2;
                return [[Анна Рэдклифф отвечает: "Уолтер -- мой старший брат. Он заботится обо мне с тех пор, как мама с папой покинули нас. Хотя моя жизнь сильно изменилась, когда Уолтер забрал меня с собой на Атлантиду, я не жалею об этом". ]];
            end;
        end};
        {tag="on_atlantis", "Что вы думаете об Атлантиде?", function(s)
            if (rel_anna < 0) then
                char_anna.atlantis_asked = 1;
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
            else
                char_anna.atlantis_asked = 2;
                return [[Анна Рэдклифф отвечает: "Последние десять лет я живу здесь, на Атлантиде. Я хорошо помню, как расстроена я была, приехав сюда. Конечно, я не думала, что мы все проведем здесь лет десять. Мне казалось, что уже через полгода-год мы вернемся на поверхность, но намерения вашего отца сильно отличались от этого. Потом Екатерина и Сильвия познакомили меня с Телнеарром и Хетеарром -- двумя навьярами, которые первыми жили на станции. Потом Хетеарр вернулся домой, а вместо него на станцию прибыл Ривеерр. А затем покинул станцию и Телнеарр. Его заменила Леарр". ]];
            end;
        end};
        {tag="on_drake", "Расскажите об Уильяме Дрейке. ", function(s)
            if (rel_anna < 0) then
                char_anna.drake_asked = 1;
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
            else
                char_anna.drake_asked = 2;
                return [[Анна Рэдклифф отвечает: "Хотя Дрейк -- руководитель Атлантиды, он проводит больше времени здесь, в Окулусе, чем в своем кабинете в Доминусе. Сейчас он в экспедиции -- они с Блэком отправились на поиски отдаленных навьярских поселений". ]];
            end;
        end};
        {tag="on_black", "Расскажите об Адриане Блэке. ", function(s)
            if rel_anna < 0 then
                char_anna.black_asked = 1;
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
            else
                char_anna.black_asked = 2;
                return [[Анна Рэдклифф пожимает плечами: "Он никогда мне не нравился. Остальные говорят, что он хорошо справляется с управлением станцией и вообще многое сделал для нас, но мне не нравится его холодность и неискренность".]];
            end;
        end};
        {always=true, "Вернемся к делу.", [[Анна Рэдклифф кивает: "Хорошо".]], code [[ pret(); ]]};
		{tag="generic"};
        {tag="on_anna", "Расскажите о себе. ", function(s)
            if (rel_anna < 0) then
                char_anna.anna_asked = 1;
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
            else
                char_anna.anna_asked = 2;
                return [[Анна Рэдклифф грустно вздыхает: "Мне почти нечего рассказывать. Я с молодости живу здесь, на Атлантиде. Когда Уолтер сказал, что мы будем жить здесь, я сперва расстроилась -- тогда это казалось мне невероятно скучным -- жить вдалеке от цивилизации, среди людей, которые старше меня на двадцать с лишним лет. На самом деле все оказалось не столь плохо -- здесь есть навьяры. Когда они заняты -- я сижу в библиотеке, с Мари, или смотрю фильмы в Игнисе". ]];
            end;
        end};
		{tag="sabotage", "Вы знаете, что пожар в Игнисе - следствие саботажа?", function(s)
			atl_lfc_panic = atl_lfc_panic + 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
			rel_walter = rel_walter - 1;
			rel_anna = rel_anna - 1;
			return [[Анна удивленно смотрит на вас: "Зачем вы это говорите? Кому может прийти в голову подобное?" ]];
		end};
		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[Анна отрицательно качает головой: "Мне почти ничего неизвестно. Поговорите с Даркстаром или Райтом. Или спросите моего брата, Уолтера. Я думаю он в курсе". ]]};
        {always=true, "У меня есть несколько вопросов.", [[Анна отвечает: "Да, я слушаю".]], code [[ psub('ask_more'); ]]};
		{always=true, "Я пойду", [[Анна прощается с вами: "До встречи". ]], code [[ back(); ]]};
	};
};

char_learr_atlantis_dlg = dlg {
	var {
		state = 0;
        lfc_dialog = false;    
        sabotage_explained = false;
	};
	nam = "Леарр";
	disp = "Леарр";
	entered = function(s)
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
            s.lfc_dialog = true;
            pon('sabotage', 'ignis_what');
        elseif (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
        end;    
    
		if (s.state == 0) then
			if (char_learr_atlantis.offended) then
				psub("offended");
				return [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Прриветсствую, монсстрр. Мы говоррить-будем?" ]];
			else
				psub("pre_iof");
				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я прриветсствую тебя-he'vji'a'rr". ]];
			end;
		elseif (s.state == 1) then
			s.state = 2;
			psub("after_iof");
			if (atl_iof_learr_suit) then
				return [[При виде вас, плавники Леарр меняют цвет на ярко-зеленый. Она плавно опускает руки вниз и слегка наклоняется вперед. Выпрямившись, она произносит: "Я благодарю тебя. Мне твоя-идея-понравилась". ]];
			else
				return [[При виде вас, плавники Леарр меняют цвет на ярко-зеленый. Она плавно опускает руки вниз и слегка наклоняется вперед. Выпрямившись, она произносит: "Я благодарю тебя". ]];
			end;
		else
            if (rel_learr < 0) then
                if (char_learr.on_books == 0) then pon("on_books") end;
            else
                if (char_learr.on_books < 2) then pon("on_books") end;
            end;
            
            poff('iyh1', 'iyh4', 'iyh5');
            if (atl_iyh_state == 1) then
                pon('iyh1');
            elseif (atl_iyh_state == 2 and ArrayUtils.indexOf(pl.party, 'learr') == 0) then
                pon('iyh2');
			elseif (atl_iyh_state == 4) then
				pon("iyh4");
			elseif (atl_iyh_state == 5) then
				pon("iyh5");
			end;
			psub("generic");
			if (rel_learr > 0) then
				return [[Леарр поворачивается к вам, плавники ее принимают сине-зеленый оттенок, а она говорит: "Я рада-видеть тебя". ]];
			else
				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я приветствую тебя-he'vji'a'rr". ]];
			end;
		end;
	end;
	phr = {
		{tag='offended'};
		{"Монстр?", [[Леарр молча кивает. Оттенок головных плавников на мгновение сменяется на желтый, но затем снова становится фиолетовым: "Ты так-назвал меня. Мы будем-дальше-монстрами-называть друг-друга?" ]], code [[ psub('offended_yes_no') ]]};
		{tag='offended_yes_no'};
		{"Не думаю", [[Леарр кивает, ее плавники медленно теряют цвет. Она говорит: "Я слушаю тебя. Ты говори". ]], code [[ 
            char_learr_atlantis_dlg.state = 1;
            walk('atl_iof_intro'); 
        ]]};
		{"От этого суть не изменится, чудище", [[Леарр скалится, показывая блестящие острые зубки: "Ты убиррайся, пока я тебя не ссъела". ]], code [[ 
			char_learr_atlantis_dlg.state = 1;
			walk('atl_iof_intro'); 
		]]};
		{tag='pre_iof'};
		{"He'vji'a'rr?", [[Леарр кивает: "Мы так-наззываем пришшедшших-сс-поверхноссти-васс". ]]};
		{"Я хотел кое-что спросить", [["Ты говорри", - просит Леарр. ]], code [[ 
			char_learr_atlantis_dlg.state = 1;
			walk('atl_iof_intro'); 
		]]};
		{tag="after_iof"};
		{"Рад, что смог помочь", [[Леарр кивает, все еще находясь в явном возбуждении: "Ты говоррить-пришшел? Ты говорри". ]], code [[ psub("generic"); ]]};
		{"У меня не было выбора", [[Леарр непонимающе смотрит на вас, однако говорит: "Я благодаррю тебя. Ты говорри".
		]], code [[ rel_learr = rel_learr - 1; psub("generic"); ]]};
		{tag="generic"};
		{tag="iyh1", "Расскажи о вашем конфликте с Дипатреанотром.", [[Леарр начинает рассказывать, активно жестикулируя: "Рреликвия нессколько-дней-наззад-изз-нашшего-хррама-прропала. Na'vji'a'yhe'dyp'atre'anot'rr вззяли нашшу-рреликвию! Они потом-в-наш-город-пришли и требовали-вернуть их-реликвию! Мы не-брали ее и это-сказали им!" - Леарр недовольно топает и шипит, - "Они нам-не-верят! Они украли нашу-вещь и не-верят нам!" ]], code [[ atl_iyh_learr_spoken = true; ]]};
        {tag="iyh2", "Я отправляюсь в храм Дипатреанотра. Мне не помешает твоя помощь.", [[Плавники Леарр принимают фиолетовый оттенок: "He'vji'a'rr нельзя туда!"]], code [[ psub("join_me"); ]]};      
		{tag="iyh4", "Здесь неподалеку есть старый навьярский храм. Я прошу разрешения посетить его.", [[Леарр задумчиво произносит: "He'vji'a'rr нельзя-туда... Я место-не-знаю".^Немного постояв в задумчивости, Леарр восклицает: "Мы-вместе туда-пойдем! Ривеерр это-не-одобрит, но я с-ним-поговорю". ]], code [[ psub("iyh_agree"); ]]};
        {tag="sabotage", false, "Ты знаешь, что пожар начался из-за саботажа?", [[Леарр непонимающе крутит головой: "Я что-ты-говоришь-не-понимаю. Что саботаж?" ]], code [[ poff("ignis_what");psub("sabotage_explain"); ]]};
        {tag="ignis_what", false, "Ты знаешь, почему начался пожар в Игнисе?", [[Леарр неуверенно пожимает плечами: "Я ты-лучше-знаешь-думаю. Ты расскажешь?"]], code [[ psub("sabotage_reason"); ]]};
        {tag="books", false, "[Показать на книгу]Ты читаешь наши книги?", function(s)
            if (rel_learr < 0) then
                char_learr.on_books = 1;
                return [[Леарр неохотно отвечает: "Я иногда-читаю". Она явно не хочет говорить с вами об этом сейчас. ]];
            else
                char_learr.on_books = 2;
                psub("more_on_books");
                return [[Леарр отвечает: "Я иногда-читаю". Она опускает глаза на книгу, потом смотрит на вас. Немного подумав, она отвечает, как-бы нехотя: "Я не-умею-ваш-язык-читать. Я пытаюсь-учусь. Мари помогает". ]];
            end;
        end};
		{"Я пойду", [[Плавники Леарр медленно теряют цвет и она прощается с вами: "Ты воззврращщайсся". ]], code [[back();]]};
        {tag="join_me"};
        {"Я не собираюсь входить внутрь, но мне нужно осмотреть его окрестности.", [[Цвет плавников Леарр меняется на оранжевый и затем на желтый. Она соглашается: "Я с-тобой-пойду. Я давно-в-Ираафаанотре-не-была". ]], code [[
            lifeon("char_learr");
            remove("char_learr_atlantis", where("char_learr_atlantis"));
            table.insert(pl.party, 'learr');
            pret();
        ]]};
        {"Для этого ты мне и нужна.", [[Цвет плавников Леарр меняет цвет на синий. Она соглашается: "Я согласна. Я с-тобой-пойду". ]], code [[
            lifeon("char_learr");
            remove("char_learr_atlantis", where("char_learr_atlantis"));
            table.insert(pl.party, 'learr');
            pret();
        ]]};
        {tag="sabotage_explain"};
        {"Кто-то из работников станции устроил пожар.", [[Леарр непонимающе смотрит на вас: "Я зачем-не-понимаю". ]], code [[char_learr_atlantis_dlg.sabotage_explained = true; pon("explanation2", "avoid");]]};
        {tag="explanation2", false, "Он сделал это специально с какой-то собственной целью.", [[Леарр все еще не понимая переспрашивает: "Зачем?"]]};
        {"Не думаю, что есть смысл об этом еще говорить.", function(s)
            if (char_learr_atlantis_dlg.sabotage_explained) then
                return [[Леарр кивает: "Я благодарю-за-объяснение тебя". ]];
            else
                return [[Леарр кивает. ]];
            end;
        end};
        {tag="sabotage_reason"};
        {"Это был саботаж.", [[Леарр непонимающе крутит головой: "Я что-ты-говорришшь-не-понимаю. Что ссаботажж?" ]], code [[ poff("sabotage"); psub("sabotage_explain"); ]]};
        {"Я не знаю. Но хотел бы знать", [[Леарр разочарованно вздыхает: "Ты ессли-уззнаешшь-рассскажжи". ]], code [[psub("generic");]]};
        {tag="more_on_books"};
        {"Я могу помочь?", [[Леарр кивает: "Я думаю-ты-дрругим-делом-ззанят. Я не-хчочу-мешшать". ]], code[[ char_learr.on_books = 3; pret(); ]]};
        {"Давно ты этим занимаешься?", [[Леарр кивает: "Я с-ссамого-пррибытия-вашши-книги-учуссь-читать. Я надеюссь-вссе-пойму ссо-врременем". ]]};
        {"Как у тебя успехи?", [[Леарр смущенно отвечает: "Я ещще-многое-не-понимаю. Но я ссо-врременем-пойму-надеюссь". ]]};
        {"Давай поговорим о другом.", [[Леарр кивает: "Ты говорри". ]], code [[pret();]]};
        {tag="legend2", empty=code [[back();]]};
        {"Значит, вы не брали реликвию?", [[Леарр недовольно шипит: "Ты тожже-мне-не-верришшь?! Ухходи!"]]};
        {"У тебя есть идеи, куда могла пропасть их реликвия?", [[Леарр отрицательно качает головой: "Нет". ]]};
		{tag="iyh_agree"};
		{"Я согласен. Только так мы докажем Дипатреанотру, что вы ни при чем.", [[Леарр отвечает: "Ты сообщщи, когда готов-будешшь. Мы поззжже-поговоррим". ]], code [[ 
			lifeon("char_learr");
            remove("char_learr_atlantis", where("char_learr_atlantis"));         
			table.insert(pl.party, 'learr');
			atl_iyh_state = 6; 
			back(); 
		]]};
		{"Лучше я отправлюсь один.", [[Леарр недовольно шипит: "Не взздумай! Ты ссебе, мне и Ry'vee'rr-у ххужже ссделаешшь". ]]};
	};
};

char_aikerjarr_dlg = dlg {
	var {
		state = 0;
        lfc_dialog = false;      
	};
	nam = "Аикерьярр";
	dsc = function(s)
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
            s.lfc_dialog = true;
            pon('sabotage', 'ignis_what');
        elseif (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
        end;
        if (s.state == 0) then
            psub("first_meeting");
            return [[Перед вами стоит высокий стройный навьяр. Серебристая чешуя сверкает в свете электрических ламп. Неприязненный взгляд его зеленых глаз направлен на вас. Существо одето в темно-зеленые облегающие штаны и куртку из водорослей. В правой руке навьяр держит острозаточенное коралловое копье. ]];
		elseif (s.state == 1) then
			psub("generic");
		
            poff('iyh1', 'iyh2', 'iyh4', 'iyh5');
            if (atl_iyh_state == 1) then
                pon('iyh1');
            elseif (atl_iyh_state == 2 and not atl_iyh2_aikeryarr_spoken) then
                pon('iyh2');
			elseif (atl_iyh_state == 4) then
				pon("iyh4");
			elseif (atl_iyh_state == 5) then
				pon("iyh5");
			end;
		end;
		return [[Аикерьярр презрительно смотрит на вас, не говоря ни слова. ]];
	end;
	phr = {
        {tag = "first_meeting"};
        {always = "true", "Ты Аикерьярр?", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2a"); ]]};
        {always = "true", "Добрый день.", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr vta'lyt'nn ty'yhe'he'vji'a'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2b"); ]]};
        {always = "true", "Приветствую.", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr vta'lyt'nn ty'yhe'he'vji'a'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2b"); ]]};
        {tag="first_meeting_2a"};
        {always = "true", "Нам нужно поговорить.", [[Навьяр надменно бросает: "I'rr vtre'za'nn he'vja'a'za'rr".]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_3a");]]};
        {tag="first_meeting_2b"};
        {always = "true", "Я тебя не понимаю", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[char_aikerjarr_dlg.state = 1; psub("first_meeting_2a");]]};
        {always = "true", "Кончай дурить, я знаю, что ты меня понимаешь", [[Навьяр скалит зубы: "Ты-ххевьярр так-ссо-мной-не-говорри". ]], code [[char_aikerjarr_dlg.state = 1; psub("first_meeting_3b");]]};
        {always = "true", "Я приду позже", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[ back(); ]]};
        {tag="first_meeting_3a"};
        {always = "true", "I'rr vtre'za'nn na'vja'za'rr. Нам все еще нужно поговорить. ", [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[ char_aikerjarr_dlg.state = 1; psub("generic"); ]]};
        {"Нам все еще нужно поговорить", [[Навьяр надменно бросает: "I'rr vtre'za'nn he'vja'a'za'rr".]], code [[ back(); ]]};
        {always = "true", "Я приду позже", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[ back(); ]]};
        {tag="first_meeting_3b"};
        {always= "true", "Значит, ты все-таки меня понимаешь. У меня есть вопросы.",  [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
        {always= "true", "Значит, ты все-таки меня понимаешь. Хватит тратить мое время.", [[Навьяр недовольно рычит: "Ты говорри". ]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
        {always= "true", "Значит, ты все-таки меня понимаешь, чертов рыбень. Теперь слушай и отвечай.", [[Навьяр стучит копьем об пол и отворачивается от вас. ]], code [[back();]]};
		{tag = "generic"};
        {tag = "sabotage", "Ты знаешь, что пожар начался из-за саботажа?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};
        {tag = "ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};
		{tag="iyh1", "Расскажи о вашем конфликте с Дипатреанотром.", [[Аикерьярр недовольно смотрит на вас:"He'vji'a'rr не-помочь".^Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говоррить yhe мы украссть реликвия-изз-ихх-ххррама", -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки, -- "Мы не-делали-этого-ссказзали им! Но они в-ответ-на-нашш-ххррам-напали и нашши-рреликвии-вззяли!" ]], code [[ atl_iyh_learr_spoken = true; ]]};
        {tag="iyh2", "Я собираюсь в храм Дипатреанотра", [[Аикерьярр пожимает плечами: "Ты туда-не-идешь. Ты спроси Ривеерра".]], code [[ atl_iyh2_aikeryarr_spoken = true; psub("on_iyh2"); ]]};      
        {tag="iyh4", "Неподалеку отсюда есть старый храм навьяров. Я прошу разрешения посетить его.", [[
            Аикерьярр кивает: "Я не-понимаю, hyd это связано с-текущей-ситуацией. Ты узнай e тогда-приходи"
        ]], code [[ back(); ]]};      
		{"Я вернусь позже", [[Аикерьярр отворачивается от вас, даже не удостоив ответом. ]], code [[back(); ]]};
	};
};

char_ryveerr_dlg = dlg {
	var {
		state = 0;
        lfc_dialog = false;
	};
	nam = "Ривеерр";
	disp = "Ривеерр";
	entered = function(s)
        poff("questions");   
        if (atl_rep_dyp < 0) then
            if (char_ryveerr.atlantis_asked == 0) then pon("on_atlantis", "questions"); end;
            if (char_ryveerr.learr_asked == 0) then pon("on_learr", "questions"); end;
            if (char_ryveerr.ryveerr_asked == 0) then pon("on_ryveerr", "questions"); end;
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked == 0) then pon("on_aikerjarr", "questions"); end;
        else
            if (char_ryveerr.atlantis_asked < 2) then pon("on_atlantis", "questions"); end;
            if (char_ryveerr.learr_asked < 2) then pon("on_learr", "questions"); end;
            if (atl_iof_learr_dead and char_ryveerr.learr_asked < 3) then pon("on_learr", "questions"); end;
            if (char_ryveerr.ryveerr_asked < 2) then pon("on_ryveerr", "questions"); end;
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked < 2) then pon("on_aikerjarr", "questions"); end;
        end;
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
            s.lfc_dialog = true;
            pon('sabotage', 'ignis_what');
        elseif (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
        end;
           
        if (s.state == 0) then
            s.state = 1;
            psub("first_meeting");
            return [[Перед вами стоит навьяр. Серо-зеленая чешуя, несколько более темная, чем у Леарр блестит в свете электрических ламп. Красно-оранжевые глаза внимательно смотрят на вас. Он одет в темно-зеленые облегающие шорты и куртку из водорослей. Навьяр приветствует вас: "Ривеерр-из-Дипатреанотра рад-видеть тебя". ]];
        elseif (atl_iof_completed and char_ryveerr.iof_reaction == 0) then
            if (atl_iof_learr_dead) then
                psub("iof_learr_dead");
                return [[Плавники Ривеерра окрашиваются синим. Он произносит: "Хевьяр-ты не-помог Леарр". ]];
            elseif (atl_iof_learr_suit) then
                psub("iof_learr_suit");
                return [[Ривеерр благодарит вас: "Дрейк-ты хорошо-придумал. Я рад, что Леарр-из-Ираафаанотра жива". ]];
            else
                psub("iof_learr");
                return [[Ривеерр сообщает: "Я рад, что никто-в-Игнисе-не-умер". ]];
            end;
        else
            psub("generic");
            if (s.state == 1) then
                poff('iyh1', 'iyh2');
                if (atl_iyh_state == 1) then
                    pon('iyh1');
                elseif (atl_iyh_state == 2 and not atl_iyh2_ryveerr_spoken) then
                    pon('iyh2');
                elseif (atl_iyh_state == 4) then
                    psub("situation");
                elseif (atl_iyh_state == 5) then
                    pon("legend");
                end;
            elseif (s.state == 2) then
                if (atl_iyh_state == 6) then
                    if (atl_iof_learr_dead) then
                        pon("take_aikerjarr");
                    else
                        pon("take_learr");
                    end;
                end;
                pon("legend2");
            end;
            return [[Ривеерр оборачивается к вам: "Ты говори". ]];
        end;      
	end;
	phr = {
        {tag="first_meeting"};
        {"Мое имя Дэвид Дрейк. Рад знакомству.", [[Плавники Ривеерра окрашиваются в зеленый: "Ты-Уильяма-сын"]], code[[psub("first_meeting_2");]]};
        {"Мое имя Дэвид Дрейк.", [[Плавники Ривеерра окрашиваются в зеленый: "Ты-Уильяма-сын"]], code[[psub("first_meeting_2");]]};
        {tag="first_meeting_2"};
        {"Да, все верно.", [[Ривеерр: "Я рад-помочь тебе. Ты говори"]], code [[psub("generic");]]};
        {"Я хотел кое-что спросить. ", [[Ривеерр: "Ты говори"]], code [[psub("generic");]]};
        {tag="iof_learr_dead"};
        {"Я сделал все, что мог.", [[Ривеерр кивает: "Мне жаль, что ты-помочь-Леарр-не-смог". Через некоторое время он приглашает: "Ты говори". ]], code [[ psub("generic"); ]]};
        {"Я пришел говорить о другом. ", [[Ривеерр отворачивается от вас. ]], code [[
            back();
        ]]};
        {tag="iof_learr_suit"};
        {"Я сделал то, что был должен.", [[Ривеерр кивает и приглашает вас: "Ты говори". ]], code [[psub("generic");]]};
        {tag="iof_learr"};
        {"Я тоже. ", [[Ривеерр кивает и приглашает вас: "Ты говори". ]], code [[psub("generic");]]};
		{tag="generic"};
		{tag="iyh1", false, "Расскажи о конфликте Ираафаанотра с Дипатреанотром.", [[Ривеерр рассказывает вам: "Na'vji'a'yhe'iraa'pha’anot’rr нашу-реликвию-украли. Мы тем-же-ответили им". ]], code [[ psub("more_on_relic"); ]]};
        {tag="iyh2", "Я собираюсь в храм Дипатреанотра.", [[Плавники на голове Ривеерра меняют цвет на сине-фиолетовый: "Ты туда-не-идешь".]], code [[ atl_iyh2_ryveerr_spoken = true; psub("on_iyh2"); ]]};      
        {tag="sabotage", [[Ты знаешь, что пожар начался из-за саботажа?]], function(s)
            if (atl_iof_learr_dead) then
                return [[Ривеерр недовольно отвечает: "Это-не-значимо. Значимо, что Леарр мертва". ]];
            else
                return [[Ривеерр спокойно отвечает: "Ты со-мной-про-это-не-говори. Это-ваши-дела. Я не-хочу-ими-заниматься". ]];
            end;
        end};
        {tag="ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", function(s)
            if (atl_iof_learr_dead) then
                return [[Ривеерр недовольно отвечает: "Это-не-значимо. Значимо, что Леарр мертва". ]];
            else
                return [[Ривеерр спокойно отвечает: "Ты со-мной-про-это-не-говори. Это-ваши-дела. Я не-хочу-ими-заниматься". ]];
            end;
        end};
        {always=true, "Я хочу кое-что спросить.", [[Ривеерр кивает: "Ты спрашивай". ]], code [[ psub("questions"); ]]};
        {always=true, "Я пойду.", [[Ривеерр прощается с вами: "Мы позже-поговорим". ]], code [[ back(); ]]};
        {tag="questions"};
        {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
            if (atl_rep_dyp < 0) then
                char_ryveerr.atlantis_asked = 1;
                return [[Ривеерр отвечает: "Хевьяры-с-Атлантиды уже-помогли-нам-немало. Я надеюсь-на-продолжение-плодотворного-сотрудничества".]];
            else
                char_ryveerr.atlantis_asked = 2;
                return [[Ривеерр отвечает: "Хевьяры-с-Атлантиды уже-помогли-нам-немало. Я надеюсь-на-продолжение-плодотворного-сотрудничества. Я продолжаю-доказывать-пользу-нашего-с-вами-хевьярами-общения и многие-в-Дипатреанотре уже-согласны-со-мной. Если план-Дрейка успешен-будет, то наша-благодарность будет-неизмерима. Хевьяры наследие-древних-ищут, как легенды гласят".]];
            end;
        end};
        {tag="on_aikerjarr", "Что ты думаешь об Аикерьярре?", function(s)
            if (atl_rep_dyp < 0) then
                char_ryveerr.aikerjarr_asked = 1;
                return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
            else
                char_ryveerr.aikerjarr_asked = 2;
                return [[Плавники Ривеерра окрашиваются фиолетовым и он отвечает: "Этот все-сделает-нас-из-себя-вывести. Я считаю-он-войны-хочет-с-Атлантидой. Я не-хочу-этого, но в-Дипатреанотре-некоторые хотят. Я не-знаю-что-получится". ]];
            end;
        end};
        {tag="on_ryveerr", "Расскажи о себе.", function(s)
            if (atl_rep_dyp < 0) then
                char_ryveerr.ryveerr_asked = 1;
                return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
            else
                char_ryveerr.ryveerr_asked = 2;
                return [[Плавники Ривеерра окрашиваются синим и он отвечает: "Я-Дипатреанотра-посол. Я желаю-с-хевьярами-долгого-и-плодотворного-сотрудничества. Мое-мнение большинство-в-Дипатреанотре-разделяют, поэтому я здесь". ]];
            end;
        end};
        {tag="on_learr", "Что ты думаешь о Леарр?", function(s)
            if (atl_rep_dyp < 0) then
                char_ryveerr.learr_asked = 1;
                return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
            else
                if (atl_iof_learr_dead) then
                    char_ryveerr.learr_asked = 3;
                    return [[Плавники Ривеерра окрашиваются голубым и он отвечает: "Я понимаю ее-гибель-насчастный-случай, но ситуацию-легче-не-делает. Дипатреанотр-мы одну-из-немногих-друзей-в-Ираафаанотре-потеряли". ]];
                else
                    char_ryveerr.learr_asked = 2;
                    return [[Плавники Ривеерра окрашиваются зеленым и он отвечает: "Леарр из Ираафаанотра. Мы часто-разногласия с-ними, но с-Леарр всегда-понимание-находим. Это с-Ираафаанотр-отношениям-помогает и хорошо-есть. Я что-она-на-Атлантиде-рад и друг-с-другом-и-с-вами-что-мы-можем общаться-постоянно. Это с-вами-нашим-отношениям-помогает и тоже-хорошо-есть".]];
                end;
            end;
        end};
        {always=true, "Давай поговорим о другом.", [[Ривеерр кивает: "Ты говори". ]], code [[ pret(); ]]};
		{tag="more_on_relic"};
		{"Тем же?", [[Ривеерр щелкает зубами: "Мы светодиск-из-их-храма-забрали. Мы вернем его, ysl они вернут нашу-реликвию". ]]};
		{"Вы уверены, что кража - их рук дело?", [[Ривеерр уверенно кивает: "Только-они могли сделать. Я расскажу", -- Ривеерр на небольшое время замолкает, собираясь с мыслями, после чего продолжает: "Na'vji'a'yhe'iraa'pha’anot’rr ночью-в-наш-храм-пришли и охранников-убили. Они реликвию-украли и в-свой-город-унесли". ]], code [[ psub("why"); ]]};
		{tag="why", empty=code [[ atl_iyh_ryveerr_spoken = true; psub("generic"); ]]};
		{"Вы уверены, что это они?", [[Ривеерр отвечает: "Другой-никто не-мог-сделать". ]]};
        {"Как убили охранников?", [[Ривеерр отвечает: "Их копьями-проткнули. Мы раны-видели". ]]};
		{tag="situation"};
		{"Мы знаем об одном древнем храме неподалеку отсюда.", [[Ривеерр пожимает плечами: "Я не-понимаю, hyd это поможет нам". ]], code [[ psub("cancel");]]};
		{always=true, "Я пойду.", [[Ривеерр прощается с вами: "Мы позже-поговорим". ]], code [[ back(); ]]};
		{tag="legend"};
		{"Мы знаем где ваша реликвия. Мы знаем об одном древнем храме, где живет затмевающий свет. [Кратко пеесказать легенду]", [[
			"Я знаю эту-легенду. Вы возможно-правы. В-храм вам-нельзя-идти. Это наше-священное-место. he'vji'a'rr не-место-там. Затмевающий-свет не-враг-нам. Его нельзя-тревожить".
		]], code [[ psub("legend_more")]]};
		{always=true, "Я пойду.", [[
			Ривеерр прощается с вами: "Мы позже-поговорим".
		]], code [[ back(); ]]};
		{tag="legend_more"};
		{"Вы могли бы сопровождать нас. ", [[
			"В-храм нельзя-вам".
		]], code [[ 
			char_ryveerr_dlg.state = 2;
		]]};
		{always=true, "Я вернусь позже", [[Ривеерр прощается с вами: "Мы поззжже-поговоррим". ]], code [[ back(); ]]};
		{tag="legend2"};
		{tag="take_learr", false, "Леарр согласилась сопровождать нас в храм. ", [[
			"Леарр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ей. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".
		]], code [[ atl_iyh_state = 6; back(); ]]};
		{tag="take_aikerjarr", false, "Аикерьярр согласился сопровождать нас в храм", [[
			"Аикерьярр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ему. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".
		]], code [[ atl_iyh_state = 6; back(); ]]};
		{always=true, "Я вернусь позже", [[Ривеерр прощается с вами: "Мы поззжже-поговоррим". ]], code [[ back(); ]]};
        {tag="on_iyh2"};
        {"Я не собираюсь внутрь храма, мне нужно лишь осмотреть окрестности.", [[Ривеерр кивает: "Я это-разрешу. Ты иди". ]], code [[ pret(); ]]};
        {tag="learr_comes", "Со мной отправится Леарр.", [[Ривеерр отвечает: "Ты туда-не-идешь. He'vji'a'rr нельзя-в-храм". ]]};
	};
};

char_evans_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Кристиан Эванс";
	disp = "Кристиан Эванс";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
		
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[Немолодой мужчина внимательно смотрит на вас через стекла старых очков. Он приветствует вас: "Добро пожаловать на нашу станцию. Я Кристиан Эванс, занимаюсь языком навьяров". ]];
		else
			psub("generic");
			return [[Кристиан Эванс приветствует вас: "Добрый день". ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Я Дэвид Дрейк, очень приятно", [[
			Кристиан улыбается и отвечает: "Очень рад вас видеть. У вас есть вопросы? Я слушаю". ]], };
		{tag="generic"};
        {"Что вы можете рассказать о Леарр?", function(s)
            if (iof_learr_dead) then
                return [[Кристиан отвечает: "Пусть покоится с миром. не думаю, что ее кто-то сможет заменить -- она одна такая была, наверное, среди всех навьяров". ]];
            else
                return [[Кристиан отвечает: "С ней приятно иметь дело. Мы многое узнали о навьярах только благодаря ее открытости и желанию общаться с нами. Хотя Ривеерр тоже довольно дружелюбен, он чрезмерно осторожен при общении с нами. Леарр и сама интересуется нами и нашими достижениями -- большую часть времени она проводит в библиотеке и в Игнисе, читая наши книги и газеты и просматривая наши фото- и видеоархивы". ]];
            end;
        end};
        {tag="on_aikerjarr", false, "Что вы можете сказать об Аикерьярре?", [[Кристиан чешет подбородок: "Не знаю, почему Ираафаанотр отправил на Атлантиду этого... Наверное, было бы проще, не будь на Атлантиде вообще никого из Ираафаанотра. И безопаснее для наших отношений тоже. Этот... Да он словно намеренно пытается вывести тут всех из себя".]]};
        {"Что вы можете сказать об Ривеерре?", [[Кристиан задумчиво: "Из жителей Дипатреанотра, Ривеерр, наверное, лучше всех относится к нам. При том, что он достаточно отстранен, чувствуется, что он готов вкладывать силы в улучшение отношений между нами всеми -- Дипатреанотром, Атлантидой и Ираафаанотром". ]]};
        {"Что вы можете сказать о навьярах?", [[Кристиан отвечает: "Поразительные существа. Конечно, мы первый раз сталкиваемся с подобным и толком не знаем как себя вести и как стоит их изучать, но, как мне кажется, мы многого достигли -- мы знаем их язык, имеет доступ к их текстам и общаемся с их представителями практически на равных. Вообще, мы поразительно легко наладили с ними контакт -- они не стали воспринимать нас ни как богов, ни как дьяволов, как это случается с племенами людей в далеких от цивилизации местах. Они однозначно не так просты, как кажется, но мы пока не знаем в чем причина этого".]]};
		{tag="sabotage", "Вы знаете, что пожар в Игнисе - результат саботажа?", function(s)
			atl_lfc_panic = atl_lfc_panic + 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
			return [[Кристиан недовольно ворчит: "Если это так, то надо не на каждом углу кричать, а предоставить сведения Даркстару или Моро. Они найдут, как решить проблему". ]];
		end};
		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[Кристиан пожимает плечами: "Об этом вам лучше узнать у Райта или Даркстара. Я мало что знаю". ]]};
		{always=true, "Я пойду", [[Кристиан прощается с вами: "До встречи". ]], code [[ back(); ]]};
	};
};

char_winterlight_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Сильвия Уинтерлайт";
	disp = "Сильвия Уинтерлайт";
	entered = function(s)
		if (atl_iyh_state == 4) then
			pon("legend");
		end;
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
		if (s.state == 0) then
			psub("first_meeting");
            s.state = 1;
			return [[Женщина лет тридцати-пяти--сорока с длинными темными волосами стоит, склонившись над картой и внимательно изучает ее. Увидев вас, она отвлекается от карты и проницательный взгляд ее серых глаз устремляется на вас. Она спрашивает: "Господин Дрейк? Я уже осведомлена о вашем прибытии, как видите. Мое имя Сильвия Уинтерлайт. Я химик и биолог на станции. По-крайней мере официально. На самом деле занимаюсь чем придется". ]];
		else
			psub("generic");
			return [[Сильвия отрывает взгляд от карты: "Приветствую, что вы хотели?" ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
        {"Рад знакомству. Я хотел бы кое-что спросить.", [[Сильвия улыбается и кивает: "Конечно, господин Дрейк, я слушаю". ]], code [[ psub("generic"); ]]};
		{"Рад знакомству. Я чем-то могу быть полезен?", [[Сильвия улыбается и отвечает: "Вам лучше поговорить с госпожой Светловой, у нее наверняка найдется поручение для вас". ]], code [[ psub("generic"); ]]};
		{tag="generic"};
        {"Расскажите об Атлантиде,", [[Сильвия вздыхает: "Боюсь, я тут могу долго рассказывать -- мы с господином Райтом многое придумывали вместе -- в частности системы подачи кислорода, я же помогала в разработке Аэриса. Аэрис вообще довольно значительное достижение -- мы сумели адаптировать некоторые виды растений с поверхности к условиям станции. Конечно, пришлось потрудиться -- очень много энергии уходит на освещение и обогрев секции, но и результат себя оправдывает -- думаю, нам быстро надоело бы питаться одними морепродуктами, а так у нас есть практически все, что может предложить поверхность. Ну, кроме мяса. Также мы выращиваем там несколько видов водорослей -- некоторые производят кислород, другие идут в пищу, третьи отправляются прямиком в печь".]]};
        {"Расскажите о себе.", [[Сильвия усмехается: "Не думаю, что тут есть что-то интересное, но слушайте -- я едва закончила университет и была в поисках работы, когда встретилась с госпожой Светловой. Уж не знаю, что привлекло ее во мне, но она предложила мне работу. Я сперва удивилась -- с чего транспортной компании нанимать таких видных ученых как она? Да и зачем там такие как я? Но после беседы с господином Дрейком, я загорелась идеей обустроить автономную подводную станцию. Тогда планы не были столь грандиозны -- мы не предполагали покидать поверхность, но благодаря нашим с господином Райтом успехам мы смогли достичь этого. Тогда же я впервые встретила живого навьяра. Нет, госпожа Светлова рассказывала мне про них и даже показывала фотографии и рисунки, но увидеть подобное вживую ни с чем не сравнимо. И еще более странно, когда такое существо спокойно так тебя приветствует на твоем языке". ]]};
        --[[{tag="legend", false, "Ты можешь рассказать мне навьярскую легенду о скате?", [ [Сильвия кажется заинтересованной: "У навьяров их много, какую конкретно вы хотите услышать?" ] ], code [ [ psub("which_legend"); ] ]};]]
        {tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", function(s)
            atl_lfc_panic = atl_lfc_panic + 1;
            atl_rep_darkstar = atl_rep_darkstar - 1;
            if (atl_lfc_panic <= 2) then
                return [[Сильвия Уинтерлайт пожимает плечами: "Не поверю, чтобы кто-то это мог сделать". ]];
            elseif (atl_lfc_panic == 3) then
                return [[Сильвия Уинтерлайт удивленно смотрит на вас: "Вы не первый кто так говорит. Но кто это мог сделать?" ]];
            end;
        end;};
        {tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[
            "Крайней мало. Вам лучше поговорить с Райтом или Даркстаром".
        ]]};
		{always=true, "Я пойду.", [[Сильвия молча кивает и возвращается к своим делам. ]], code [[ back(); ]]};
		{tag="which_legend"};
		--TODO добавить несколько легенд
		{"Что-нибудь связанное с храмами и реликвиями", [[
			Сильвия задуиывается: _"Храмы, реликвии и скаты... Да, есть кое-что", -- она откидивыет волосы назад и продолжает: "Согласно этой легенде, хранителей одного из святилищ навьяров был могучий затмевающий свет по имени Излучающий Тьму. Это было в те времена, когда навьяры и затмевающие свет были связаны узами дружбы. Излучающий тьму был мудрым хранителем - он не только принимал священные реликвии на сохранение, но и многое знал о них - об их предназначении и истинной ценности. Однажды Излучающий Тьму узнает о необычнайно ценной реликвии, хранящейся в одном из городов и скрывающей в себе древние знания навьяров. Узнает он и о том, что живущие навьяры не в силах прочитать. Тогда он прибыл в город, чтобы просить навьяров отдать ему реликвию на сохранение. Но навьяры отказывают ему. Вернувшись в святилище, Излучающий Тьму придумал план. Ночью он пробрался в город и выкрал реликвию. Когда наутро навьяры обнаружили пропажу, они направились к Излучающему Тьму с требованием вернуть им реликвию. На это могучий затмевающий свет спросил их: ,,Знаете ли вы, что скрывает этот предмет?''^ -- кстати, в некоторых переводах я встречала слово ,,светодиск'', как описание реликвии. 
			,,Знания наших предков'', -- ответили навьяры. Излучающий Тьму продолжил: ,,Можете ли вы прочитать его?''^
			,,Нет'', --сказали навьяры. Тогда Излучающий Тьму рассказал им легенду о храме в глубинах, которую он прочитал из данной реликвии(Нам, кстати, так и не довелось получить хоть какой-либо целостный текст этой легенды), и сказал им: ,,Можете приходить сюда когда захотите и я расскажу вам то, что вы захотите знать. Но только, если реликвия ваша остается у меня''. Навьяры поняли, что если заберут реликвию, то навсегда утратят древние знания и согласились". 
		]], code [[ psub("more_on_legend"); ]]};
		{tag="more_on_legend"};
		{"Светодиск?", [[
			"Мы плохо понимаем, для чего они служат. У Светловой один такой был. Блестящий диск - сантиметров 10 в диаметре. Правда вот как их ,,читать''... В привычном понимании, по крайней мере, мы не понимаем. Если рассматривать их под микроскопом - там весьма характерный рисунок проступает. Почему светодиск? Мы не знаем - это навьяры их так называют".
		]]};
		{"Что за легенда о храме в глубинах?", [[
			"Мы только приблизительно знаем о ней - она постоянно упоминается в контексте других легенд и у нас есть фрагменты, которые нам рассказывали навьяры. Когда-то давно навьяры построили храм где-то в ущелье, но по какой-то причине были вынуждены покинуть его". 
		]]};
		{"Спасибо, я пойду", [[
			"До встречи. Если захотите еще древних сказаний послушать - приходите".
		]], code [[ atl_iyh_state = 5; psub('back'); ]]};
	};
};

char_jack_wright_atlantis_dlg = dlg {
	var {
		state = 0;
        lfc_dialog = 0;
	};
	nam = 'char_jack_wright_atlantis_dlg';
	disp = "Джек Райт";
	entered = function(s)
        if (rel_jack < 0) then
            if (char_wright.on_learr == 0) then pon("on_learr"); end;
            if (char_wright.on_leviathan == 0) then pon("on_leviathan"); end;
            if (char_wright.on_jack == 0) then pon("on_jack"); end;
        else
            if (char_wright.on_learr < 2) then pon("on_learr"); end;
            if (char_wright.on_leviathan < 2) then pon("on_leviathan"); end;
            if (char_wright.on_jack < 2) then pon("on_jack"); end;
        end;
    
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
            s.lfc_dialog = true;
            pon('sabotage', 'ignis_what');
        elseif (atl_lfc_state ~= 1) then
            poff('sabotage', 'ignis_what');
        end;

		if (s.state == 0) then
			psub("business_or_no");
			return [[Джек отворачивается от Леарр, и обращается к вам: "Привет, ты по делу или просто так?" ]];
        elseif (atl_iof_completed and char_wright.iof_reaction == 0) then
            if (atl_iof_learr_suit) then
                psub("iof_learr_suit");
                return [[Джек откладывает книгу и встает с койки и обращается к вам: "Добрый день. Отличная идея, заставить Леарр надеть скафандр. Не знаю, как она справилась бы без него". ]];
            else
                psub("iof_learr");
                return [[Джек откладывает книгу и встает с койки и обращается к вам: "Добрый день. Рад тебя видеть. Не знаешь, как дела у Леарр?" ]];
            end;
        else
            psub("generic");
            return [[Джек откладывает книгу и встает с койки и обращается к вам: "Добрый день. Тебе что-то нужно?"]];
		end;
	end;
	phr = {
        {tag="iof_learr_suit"};
        {"Я рад, что все хорошо закончилось и никто не пострадал. ", [[Джек кивает: "У тебя есть какие-то вопросы?"]], code [[ psub("generic");]]};
        {tag="iof_learr"};
        {"Леарр в порядке, благодаря твоей помощи. ", [[Джек кивает: "Рад это слышать. У тебя есть какие-то вопросы?"]], code [[ psub("generic");]]};
        {"Я еще не говорил с ней. ", [[Джек кивает: "Надеюсь, с ней все хорошо. Тебе что-то нужно?"]], code [[ psub("generic"); ]]};
		{tag = "business_or_no"};
		{"Как тебе станция?", [[Джек не скрывая восхищения восклицает: "Невероятно! Трудно поверить в возможность такого -- полностью автономное подводное поселение. Я никогда на сомневался в таланте отца, но это выше всех моих ожиданий". ]]};
		{always = "true", "Я пришел поговорить с Леарр. ", function(s)
			if (char_learr_atlantis.offended) then
				return [[Джек ухмыльнулся: "Удачи, я подожду в главном зале", -- с этими словами, Джек выходит из зала. ]];
			else
				return [["Надеюсь, я вам не помешаю? В любом случае, я подожду в главном зале", -- с этими словами, Джек выходит из зала. ]];
			end;
		end, code [[ 
			remove('char_jack_wright_atlantis', 'atl_ignis_hall_a');
			back(); 
		]]};
        {tag="generic"};
        {tag="sabotage", "Ты знаешь, что пожар начался из-за саботажа?", [[Джек кивает: "Да, Даркстар сказал мне это. Он просил меня никому не говорить об этом и не вмешиваться в расследование. Я думаю, все подозреваемые, которых он назвал так или иначе связаны. Не случайно, все трое выступают в пользу закрытия станции. Надеюсь, Даркстар сообщит о результах расследования". ]], code [[poff("ignis_what");]]};
        {tag="ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", [[Джек кивает: "Да, Даркстар сказал, что на станции саботажник. Он назвал нескольких подозреваемых, но просил никому не говорить. Он с тобой говорил об этом?"]], code [[poff("sabotage");psub("ignis");]]};
        {always=true, "Я хочу кое-что спросить.", [[Джек вопросительно смотрит на вас: "Я слушаю". ]], code [[ psub("more_questions"); ]]};
        {always=true, "Я пойду.", [[Джек прощается с вами: "До встречи", -- после  чего возвращается к своему занятию. ]]};
        {tag = "more_questions"};
        {tag="on_learr", "Что ты думаешь о Леарр?", function()
            if (rel_jack < 0) then
                char_wright.on_learr = 1;
                return [[Джек отказывается отвечать: "Не хочу это обсуждать".]];
            else
                char_wright.on_learr = 2;
                return [[Джек отвечает: "Я не так много с ней общался, однако, она производит приятное впечатление. Там в Игнисе она спрашивала меня про Атлантиду и Левиафан достаточно интересные вещи. Мне кажется, из нее бы вышел неплохой инженер".]];
            end;
        end};
        {tag="on_leviathan", "Как впечатления от Левиафана?", function()
            if (rel_jack < 0) then
                char_wright.on_leviathan = 1;
                return [[Джек отвечает: "Левиафан, без сомнения, превосходный корабль. Жаль, что ему не нашлось лучшего капитана". ]];
            else
                char_wright.on_leviathan = 2;
                return [[Джек не скрывает своего восхищения: "Никогда не видел ничего подобного. Неудивительно, что отец оставил жизнь на поверхности в пользу возможности создавать подобное здесь. Пока мы были в пути, я подробно изучил субмарину. Многие решения до сих пор кажутся мне невероятными - например, использование электричества в качестве движущей силы или наличие звуковой пушки. Я уже успел обсудить с отцом детали диагностических цепей. Это совершенно непостижимо, чтобы машина сама сообщала, что с ней что-то не так. И все это в одном месте". ]];
            end;
        end};
        {tag="on_jack", "Чем ты занимался все это время?", function()
            if (rel_jack < 0) then
                return [[Джек отказывается отвечать: "Не хочу это обсуждать".]];
            else
                return [[Джек отвечает: "Да, в общем-то, ничем. Отец оставил нам с матерью достаточно денег, чтобы мы могли ни в чем не нуждаться. Мать оплатила мое образование в том же университете, где учился отец. Получив диплом с отличием, я просто поставил его на полку. Не нашел дела по душе, да и необходимости не было. Позже, когда мать умерла, я вообще практически прекратил связи с внешним миром. Думаю, что хоть я и бросил идею найти отца, я все-таки продолжал надеяться -- практически все время я посвящал чтению газет со всех уголков света, в поисках известий о случившемся с Вестхейвен Трансоушен. Впрочем, как только первоначальный ажиотаж спал, никто толком и не писал о случившемся. "]];
            end;
        end};
        {"Вернемся к делу", [[Джек молча кивает. ]], code [[ pret(); ]]};
        {tag = "ignis"};
        {"Да.", [[Джек кивает: "Тогда ты и без меня все знаешь. Я думаю, все трое подозреваемых замешаны, но не хочу лезть в это дело". ]], code [[ pret(); ]]};
        {"Нет.", [[Джек на мгновение задумался. Потом снова заговорил: "Я не должен тебе этого говорить, наверное. Но все же. Даркстар подозревает Голдмана, Леруа и Джонса -- они все трое, вроде как, достаточно знают об устройстве станции и, опять же, все трое активно выступают за закрытие станции и возвращение на поверхность. От себя скажу, что не удивлюсь, если все трое в сговоре, но не буду судить поспешно". ]], code [[ pret(); ]]};
	};
};

char_legrand_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Мари Легран";
	disp = "Мари Легран";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
		
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[
				Перед вами, склонившись над каким-то журналом сидит женщина лет сорока--сорока-пяти. Длинные темные волосы убраны в хвост. На носу очки в тяжелой оправе. Не обращая внимания на вас, она продолжает водить пальцем по строчкам, периодически делая какие-то пометки.
			]];
		else
			psub("generic");
			return [[
				Не обращая внимания на вас, Мари Легран продолжает водить пальцем по строчкам, периодически делая какие-то пометки.
			]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Извините?", [[
			Женщина поднимает голову и отрывается от работы. Она выпрямляется и улыбаясь приветствует вас: "Добро пожаловать в библиотеку Атлантиды. Я Мари Легран"
		]], code [[psub("first_meeting_2"); ]]};
		{tag="first_meeting_2"};
		{"Я Дэвид Дрейк, рад знакомству", [[
			Она кивает и спрашивает вас: "Как вы нашли Левиафан?"
		]], code [[psub("first_meeting_3"); ]]};
		{tag="first_meeting_3"};
		{"Это долгая история", [[
			Мари Легран кивает: "Ладно, потом как-нибудь, если торопитесь"
		]], [[ psub("generic") ]]};
		{"Я нашел тайник отца со старыми схемами. Пришлось побегать, чтобы восстановить субмарину. Я чудом собрал все необходимое", [[
			Мари Легран удивленно смотрит на вас: "Удивительно. Скорее всего Уильям хотел, чтобы вы нашли Левиафан. Жаль, что вы прибыли слишком поздно. Когда он узнал про этот древний город, он собрал несколько помощников и отправился на Надежде на его поиски".
		]], code [[ pon("father_more");psub("generic"); ]]};
		{tag="generic"};
		{tag="father_more", false, "Кто отправился вместе с моим отцом?", [[
			"Немногие. Они вообще хотел отправиться вдвоем с Блэком, но Блэк уговорил Уильяма взять Джона Брауна и Дэмина Пина".
		]], code [[psub("more_people");]]};
		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе начался из-за саботажа?", function(s)
			atl_lfc_panic = atl_lfc_panic + 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
			if (atl_lfc_panic <= 2) then
				return [[
					Мари Легран удивленно смотрит на вас: "Откуда вы знаете? Кому такое в голову придти может?"
				]];
			elseif (atl_lfc_panic == 3) then
				return [[
					Мари Легран удивленно смотрит на вас: "Вы понимаете, что говорите? Кому такое в голову придти может?"
				]];
			end;
		end};
		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[
			"Поговорите лучше с Даркстаром или Райтом".
		]]};
		{always=true, "Я пойду", [[
			"Приходите еще"
		]], code [[ back(); ]]};
		{tag="more_people"};
		{"Расскажите больше об Адриане Блэке", [[
		]]};
		{"Расскажите больше о Джоне Брауне", [[
		]]};
		{"Расскажите больше о Дэмине Пине", [[
			
		]]};
		{"Давайте о другом поговорим", [[
			"Хорошо"
		]], code [[pret();]]};
	};
};

char_radcliffe_atlantis_dlg = dlg {
	var {
		state = 0;
		lfc_dialog = false;
	};
	nam = "Уолтер Рэдклифф";
	disp = "Уолтер Рэдклифф";
	entered = function(s)
        poff("on_anna", "on_walter", "on_atlantis", "on_drake", "on_black", "on_join", "talk");
        if (rel_walter < 0) then
            pon("talk");
        else
            if (char_walter.on_anna < 2) then
                pon("on_anna");
                pon("talk");
            end;
            if (char_walter.on_black < 2) then
                pon("on_black");
                pon("talk");
            end;
            if (char_walter.on_walter < 2) then
                pon("on_walter");
                pon("talk");
            end;
            if (char_walter.on_atlantis < 2) then
                pon("on_atlantis");
                pon("talk");
            end;
            if (char_walter.on_drake < 2) then
                pon("on_drake");
                pon("talk");
            end;
            if (char_walter.on_join < 2) then
                pon("on_join");
                pon("talk");
            end;
        end;
    
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
	
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[
				Перед вами стоит человек лет сорока--сорока-пяти, одетый в рабочий халат. Как только вы входите, он протягивает вам руку: "Добро пожаловать, господин Дрейк. Я - Уолтер Рэдклифф, инженер".
			]];
		else
			psub("generic");
			return [[
				Уолтер Рэдклифф кивает вам: "Добрый день".
			]];
		end;
	end;
	phr = {
        {tag="questions"};
        {tag="on_black", "Что ты можешь сказать о Блэке?", function(s)
            char_walter.on_black = 2;
            return [[Уолтер пожимает плечами: "Что я могу сказать про него? Его не очень здесь любят, однако он, поверьте, вполне искренне радеет за благополучие нашей миссии". ]];
        end};
        {tag="on_walter", "Расскажи о себе.", function(s)
            char_walter.on_walter = 2;
            return [[]];
        end};
        {tag="on_anna", "Расскажи о своей сестре, Анне.", function(s)
            char_walter.on_anna = 2;
            if (ArrayUtils.indexOf(pl.party, 'anna') ~= 0) then
                return [[Уолтер вздыхает: "Будь у меня выбор тогда, я ни за что не взял бы ее на Атлантиду. И жалел бы сейчас об этом. Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. Я все еще не уверен, что взять ее на Левиафан было хорошей идеей -- Бог знает, с чем мы столкнемся в наших странствиях, но она очень этого хотела". ]];
            else
                return [[Уолтер вздыхает: "Будь у меня выбор тогда, я ни за что не взял бы ее на Атлантиду. И жалел бы сейчас об этом. Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. То, что она осталась на станции успокаивает меня, хотя она так рвалась в эту экспедицию вместе с нами". ]];
            end;
        end};
        {tag="on_drake", "Что ты можешь сказать о Дрейке?", function(s)
            char_walter.on_drake = 2;
            return [[Уолтер отвечает: "Не думаю, что скажу про него больше чем кто-то еще. Послушайте Райта, Моро, быть может Даркстара, хотя черт знает, что у этого типа на уме. Они скажут вам все и даже больше. "]];
        end};
        {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
            char_walter.on_atlantis = 2;
            return [[Уолтер отвечает: "Думаю только Райт и Уинтерлайт в полной мере осознают, насколько большим достижением для нас, для всего человечества, является постройка этой станции. Тем не менее, они, отчего-то, не спешат поделиться своими знаниями с другими. Не думаю, что сегодняшнее общество сможет по достоинству оценить новые возможности, даруемые этими технологиями. Да и что станет с навьярами? Вспомните Новый Свет, посмотрите на другие наши колонии -- хотите ли вы этого для Леарр и других?"]];
        end};
        {tag="quit", always=true, "Поговорим в другой раз. ", [[Уолтер кивает: "Хорошо".]], code [[pret();]]};
		{tag = "first_meeting"};
		{"[Пожать руку]Рад знакомству", [[
			"Мы с Майклом вместе работали над Левиафаном. Многие решения в вашей субмарине - мои. Если вы не против, я хотел бы продолжить путешествие вместе с вами - во-первых - вам пригодится мой опыт, а во-вторых - я хочу увидеть Левиафан в деле". 
		]], code [[
			rel_walter = rel_walter + 1;
			psub("leviathan");
		]]};
		{"Рад знакомству", [[
			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".
		]], code [[
			psub("generic");
		]]};
		{"[Промолчать]", [[
			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".
		]], code [[
			rel_walter = rel_walter - 1;
			psub("generic");
		]]};
		{tag = "leviathan"};
		{"Интересно, и что вы можете рассказать о Левиафане?", [[
			Уолтер снимает очки, убирая их в нагрудный карман: "Левиафан строился как Надежда - для дальних путешествий и максимальной автономности. После успеха предыдущих субмарин, Райт решил сделать Левиафан заметно больше предыдущих кораблей. Сверхмощная батарея обеспечивает субмарину энергией более месяца при максимальных оборотах двигателей. Также есть паровой двигатель - он используется не только для движения, но и генерирует электричество. До Левиафана мы не экспериментировали с этим".
		]]};
		{"Вы знаете, куда отправился мой отец отсюда?", [[
			Уолтер отрицательно качает головой: "Не больше, чем остальные на станции". 
		]]};
		{"Буду рад, если вы присоединитесь к нам", [[
			"Отлично. Но вы ведь, еще поговорить хотите?"
		]], code [[ psub("generic");]]};
		{"Я не думаю, что вы поможете", [[
			"Очень жаль. Впрочем, у вас есть время подумать. Насколько я знаю, Даркстар и Моро собираются держать вас здесь какое-то время".
		]], code [[ psub("generic");]]};
		{tag = "generic"};
        {tag="questions", always=true, "У меня есть несколько вопросов. ", function(s)
            if (rel_anna < 0) then
                return [[Уолтер отрицательно качает головой: "Не сейчас, я занят". ]];
            else
                psub("questions");
                return [[Уолтер кивает: "Слушаю". ]];
            end;
        end};      
		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе - результат саботажа?", [[
			"Безусловно. Системы энергоснабжения проектировал я и абсолютно уверен в их безопасности и надежности. Судя по тому, что произошло - кто-то весьма грамотный ,,доработал'' систему энергоснабжения Игниса. Я не думаю, что это мог быть один человек... Хотя если он делал это несколько дней - вполне вероятно. Как это сделать, кроме нас с Райтом знают только трое: Мишель Леруа, Чарльз Джонс и Мари Легран. И еще кое-что. Даркстар просил меня ни с кем про это не разговаривать, поэтому надеюсь на ваше понимание. Отдельно попрошу - не говорить на эту тему с моей сестрой".
		]], code [[
			rel_walter = rel_walter + 1;
		]]};
		{tag="ignis_what", false, "Вы, как инженер, можете рассказать, что произошло в Игнисе?", [[
			"Пожар. Вам что-то еще известно?"
		]]};
		{"Я пойду", [[
			"До встречи", - Уолтер отворачивается от вас и возвращается к своим делам.
		]], code [[ back();]]};
	};
};

char_page_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Фрэнсис Пейдж";
	disp = "Фрэнсис Пейдж";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
	
		if (s.state == 0 ) then
			s.state = 1;
			psub("first_meeting");
			return [[Перед вами стоит мужчина лет пятидесяти с густой седой бородой. Он бросает на вас быстрый взгляд и здоровается, продолжая осмотр Наутилуса: "Добро пожаловать на Атлантиду. Я Фрэнсис Пейдж. Я занимаюсь обслуживанием субмарин". ]];
		else
			psub("generic");
			return [[Перед вами стоит Фрэнсис Пейдж. не отрываясь от осмотра Наутилуса он говорит: "Вы вернулись". ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Дэвид Дрейк, рад знакомству", [[Фрэнсис на секунду отвлекается и внимательно смотрит на вас: "Да, я замечаю сходство с Уильямом". ]], code [[ psub("first_meeting_2"); ]]};
		{tag="first_meeting_2"};
		{"Вы хорошо знали отца?", [[Фрэнсис кивает: "Я уважаю его, как, думаю, все на этой станции. Пожертвовать всем ради призрачной мечты - только великий человек мог пойти на такое. Он отправился на поиски легендарного города древних навьяров. К сожалению, я не смог отправиться с ним - я нужен на станции. Я знаю что вы здесь из-за него и я надеюсь, что вы не оставите вашу идею найти Уильяма и доведете свое дело до конца". ]], code [[ psub("generic"); ]]};
		{"У меня к вам несколько вопросов", [["Слушаю". ]], code [[ psub("generic"); ]]};
		{tag="generic"};
		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе - следствие саботажа?", function(s)
			atl_lfc_panic = atl_lfc_panic + 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
			return [[Фрэнсис от удивления роняет карандаш, но быстро собирается и отвечает: "Оставьте это Даркстару. Если саботаж имел место быть - Винсент найдет виновного. Я передам ему ваши слова". ]]
		end;};
		{tag="ignis_what", false, "Что произошло в Игнисе?", [[Фрэнсис пожимает плечами: "Меня там не было. Не берусь говорить".]]};
        {"Что вы можете рассказать об Атлантиде?", [[Фрэнсис пожимает плечами: "Если честно, вам лучше расспросить кого-нибудь из управляющих, а лучше всего - Майкла Райта. Все что я могу сказать -- я до сих пор поражаюсь успеху этого невероятного проекта". ]]};
        {"Что вы можете рассказать о Наутилусе?", [[Френсис кивает: "Когда мы создавали Наутилус, я уже работал в Вестхейвен Трансоушен. Атлантида тогда существовала, но была далеко от того, что вы видите. Мы тогда просто строили вторую Надежду. Нам не нужна была высокая автономность, но мы хотели большую маневренность и мощность -- собственно на этом мы и сконцентрировались. Получилось то, что получилось -- рабочая лошадка, которой мы пользуемся по сей день". ]]};
        {"Что вы можете рассказать об Энтерпрайзе?", [[Френсис кивает: "Энтерпрайз мы начали когда захотели судно побольше. Опыта и знаний нам хватило только на пропорциональное увеличение размеров и немного более мощный двигатель. райт наверное сказал бы, что получилось из рук вон плохо, но на мой взгляд -- Энтерпрайз вполне неплох, да и с честью служит нам до сих пор". ]]};
        {"Что вы можете рассказать о Надежде?", [[Фрэнсис кивает: "Надежда была первой субмариной, построенной нами. Я в этом участия не принимал, так что многие конструктивные решения меня удивляют. Впрочем, более поздние субмарины спроектированы гораздо грамотнее, да и после переоборудования многое удалось решить". ]]};
        {"Что вы можете рассказать о Левиафане?", [[Френсис отвечает: "С первого взгляда ясно, что Левиафан не имеет практически ничего общего с Надеждой, Наутилосом и даже Энтерпрайзом. Интересно, что Левиафан строился с оглядкой на высокую автономность -- так же, как и Надежда. За это конечно пришлось многим поплатиться -- Левиафан большой и неповоротливый в сравнении с Надеждой". ]]};
		{always=true, "Я пойду", [[Фрэнсис Пейдж прощается с вами: "Увидимся позже". ]], code [[ back(); ]]};
	};
};

char_leroy_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Мишель Леруа";
	disp = "Мишель Леруа";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
	
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[Перед вами стоит склонившийся над чертежом мужчина лет пятидесяти, одетый в старый коричневый костюм. Кудрявые рыжие волосы торчат во все стороны, недлинная рыжая бородка, напротив, аккуратно острижена. В кармане его пиджака лежат очки. Темные глаза сосредоточенно утавились на лежащий перед ним чертеж. ]];
		else
			psub("generic");
			return [[Мишель Леруа стоит перед вами, склонившись над чертежом. ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Добрый день. Я Дэвид Дрейк", [[Человек отрывается от чертежа, чтобы поздороваться с вами. Он протягивает вам руку и произносит: "Мишель Леруа. Инженер". ]], code [[ psub('first_meeting_2'); ]]};
		{tag="first_meeting_2"};
		{"[Пожать руку]Рад знакомству", [[Вы пожимаете руку Мишеля, и он спрашивает вас: "Что вы хотели?" ]], code [[ psub('generic'); ]]};
		{"Рад знакомству", [[Мишель кладет руку обратно на стол и спрашивает: "Что вы хотели?" ]], code [[ psub('generic'); ]]};
		{tag="generic"};
		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе начался из-за саботажа?", [[Мишель удивленно переспрашивает: "Кто вам это сказал? не думаю, что здесь есть люди настолько не ценящие свою жизнь". ]], code [[ atl_lfc_leroy_spoken = 1; ]]};
		{tag="ignis_what", false,"Что вы можете сказать о произошедшем в Игнисе?", [[
			Мишель уверенно отвечает: "Короткое замыкание. К сожалению, пленки и другие материалы, хранимые в Игнисе достаточно горючи". ]]};
        {"Почему вы считаете, что станцию необходимо закрыть?", [[Мишель начинает объяснять, активно жестикулируя: "Вы недавно здесь, и для вас это долэно быть гораздо более очевидно, чем для многих из нас. Легко представить, к чему здесь может привести самая мелкая поломка". ]]};
		{always=true, "Я пойду", [[Мишель возвращается к чертежу. ]], code [[ back(); ]]};
	};
};

char_goldman_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Леонард Голдман";
	disp = "Леонард Голдман";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
		
		if (have(item_goldmans_clock)) then
			pon('show_clock');
		end;
		
		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[Перед вами на койке лежит человек лет пятидесяти с густыми светлые волосы. Лицо украшают пышные золотистые усы. Мужчина приветствует вас: "Добро пожаловать на Атлантиду. Я Леонард Голдман. Занимаюсь электросистемами станции". ]];
		else
			psub("generic");
			return [[Леонард Голдман вопросительно смотрит на вас: "Что вы хотели?" ]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"Я Дэвид Дрейк. Рад знакомству. ", [[Леонард кивает, но ничего не говорит. ]], code [[ psub("generic"); ]]};
		{tag="generic"};
		{tag="show_clock", false, "[Показать часы]Это ваше?", [[Голдман протягивает руку, чтобы взять часы и удивленно спрашивает: "Мои. Где вы их взяли?" ]], code [[ atl_lfc_goldman_known = true; psub("give_clock"); ]]};
		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", [[Вы видите удивление и страх на лице Голдмана. Он неуверенно спрашивает: "С чего вы взяли?" ]], code [[ psub("sabotage2"); atl_lfc_leroy_spoken = 1; ]]};
		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[Голдман пожимает плечами: "Не больше чем вы". ]]};
        {"Почему вы считаете, что станцию стоит закрыть?", [[Голдман объясняет: "Мы уже десять лет здесь. Не видели ни солнца, ни неба, ни травы. Только металлический потолок и километры воды над головой. Мне кажется, что пора бы уже закончить этот эксперимент. В чем-то я согласен с Джонсом -- станция стареет, оборудование выходит из строя. Долго ли до того, как мы потеряем наши субмарины, а вместе с ними и вообще возможность вернуться наверх?"]]};
		{"Я пойду", [[Голдман кивает: "Поговорим позже". ]], code [[ back(); ]]};
		{tag="sabotage2"};
		{"Даркстар сказал", [[Леонард Голдман пожимает плачеми: "Даркстар мог и ошибиться -- он же параноик. А я в это не поверю". ]]};
		{"Это очевидно", [[Леонард Голдман недовольно предупреждает вас: "Будете дальше распускать подобные слухи - я доложу Даркстару". ]]};
		{"Эээ... Я пошутил", [[Леонард Голдман недовольно восклицает: "Вы вообще нормальный?!"]], code [[ back(); ]]};
		{tag="give_clock"};
		{"[Отдать часы]Нашел", [[Леонард Голдман кивает: "Благодарю. Это часы моего деда, они очень важны для меня". ]], code [[ remove("item_goldmans_clock"); pret(); ]]};
		{"[Убрать часы]Не так быстро. Что вы делали в Солисе?", [[Ваш запрос похоже застал Леонарда врасплох. Заикаясь, он спрашивает: "С ч-чего вы вз-взяли?" ]], code [[ psub("give_clock_2");]]};
		{tag="give_clock_2"};
		{"Эти часы я подобрал на месте саботажа. Теперь вы не отвертитесь.", [[Леонард поднимается и садится. Тяжело вздохнув он сознается: "Хорошо, я все скажу. Только если обещаете, что меня больше не будут держать на этой станции". ]], code [[ psub('promise'); ]]};
		{tag="promise"};
		{always = true, "Я сделаю все, что в моих силах.", [[Леонард Голдман вздыхает и начинает сбивчиво рассказывать: "Это все Мишель придумал. У меня бы мозгов не хватило. Он и в Игнисе пожар устроил. Солис он тоже хотел взорвать сам, но Даркстар, кажется подозревает его. Поэтому он упросил меня это сделать... И зачем я согласился?!"
		]], code [[ atl_lfc_saboteur_known = true; psub("leroy");]]};
		{always = true, "Я ничего не обещаю.",[[Леонард Голдман дрожащим голосом отвечает: "Тогда я ничего не скажу". ]], code [[ psub("threaten"); ]]};
		{tag = "threaten"};
		{always = true, "Тогда пусть Даркстар с вами разбирается", [[Леонард Голдман вздыхает и начинает сбивчиво рассказывать: "Это все Мишель придумал. У меня бы мозгов не хватило. Он и в Игнисе пожар устроил. Солис он тоже хотел взорвать сам, но Даркстар, кажется подозревает его. Поэтому он упросил меня это сделать... И зачем я согласился?!" ]], code [[ atl_lfc_saboteur_known = true; psub("leroy");]]};
		{"[Отдать часы]Черт с тобой, забирай свои часы.", [[Голдман крайне удивлен: "Вот так просто?" ]], code [[ remove("item_goldmans_clock"); psub("tired_of_you"); ]]};
		{"[Уйти]", code = [[ back(); ]]};
		{tag = "tired_of_you"};
		{"Даю вам последний шанс рассказать все, что знаете.", [[леонард Голдман отказывается отвечать: "Я назвал свои условия". ]], code [[ psub('promise'); ]]};
		{"[Уйти]", code = [[ back(); ]]};
		{tag = "leroy"};
		{"И что вы еще намереваетесь сломать?", [[Леонард Голдман пожимает плечами. Испуганно глядя на вас, он отвечает: "Не знаю. Мишель хотел сломать станцию... Так чтобы никто не пострадал. Все бы просто вернулись на поверхность и дело с концом". ]]};
		{"Я пойду", [[Леонард Голдман кивает: "Помни, что ты обещал". ]], code = [[ back(); ]]};
	};
};

char_jones_dlg = dlg {
	var {
		state = 0;
		lfc_dialog = false;
	};
	nam = "Чарльз Джонс";
	disp = "Чарльз Джонс";
	entered = function(s)
		if (atl_lfc_state ~= 1) then
			poff('sabotage', 'ignis_what');
		end;
		
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
			s.lfc_dialog = true;
			pon('sabotage', 'ignis_what');
		end;
		
        if (char_jones.on_atlantis == 0) then
            pon("on_atlantis");
        end;

		if (s.state == 0) then
			s.state = 1;
			psub("first_meeting");
			return [[на койке перед вами сидит немолодой человек, одетый в простой серый костюм. Его седые волосы коротко острижены. Подбородок гладко выбрит. Лицо изрыто глубокими морщинами. В руках он вертит карандаш, задумчиво разглядывая его. ^При виде вас он встает и приветствует вас: "Добрый день, меня зовут Чарли. Чарли Джонс". ]];
		else
			psub("generic");
			return [[Чарльз Джонс приветствует вас, отвлекаясь от своего занятия: "Добрый день". ]];
		end;
	end;
	phr = {
		{"Я Дэвид Дрейк. Рад знакомству", [[Чарльз тяжело вздыхает: "Взаимно". ]], code [[ psub("generic"); ]]};
		{tag="sabotage", false, "Вы знаете, что причиной пожара был саботаж?", function(s)
			atl_lfc_panic = atl_lfc_panic + 1;
			atl_rep_darkstar = atl_rep_darkstar - 1;
			if (atl_lfc_panic == 1) then
				return [[Чарльз отрицательно качает головой: "Но зачем? Дайте немного времени и Атлантида сама развалится". ]];
			elseif (atl_lfc_panic == 2) then
				return [[Чарльз отрицательно качает головой: "Это не более чем слухи. Не поверю, чтобы кто-то мог намеренно это сделать". ]];
			elseif (atl_lfc_panic == 3) then
				return [[Чарльз задумчиво: "Слишком многие об этом говорят, но я не верю в эти байки. Станция просто рушится от возраста, вот и все". ]];
			end;
		end};
		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [["Думаю да. Короткое замыкание -- станция старая, провода старые. Где-то нарушилась изоляция. Дальше будет еще хуже -- я постоянно об этом говорю, пора бросить эту груду металлолома и вернуться к людям, на поверхность". ]]};
        {tag="on_atlantis", false, "Вы считаете, что станцию необходимо закрыть?", [[Чарльз кивает: "Даже вы понимаете, хотя лишь несколько дней провели здесь. Станция старая, разваливается на глазах. Нас слишком мало, чтобы своевременно устранять возрастающее число неполадок". ]], code [[ char_jones.on_atlantis = 1; psub("on_leaving");]]};
		{always=true, "Я пойду", [[
			"До встречи".
		]], code [[ back(); ]]};
        {tag="on_leaving"};
        {tag="Да. соглашусь с вами. ", [[Чарли понимающе кивает. ]], code [[ pret(); ]]};
        {tag="Но ведь станция в отличном состоянии. ", [[Чарли вздыхает: "Просто, вы еще не пробыли здесь достаточно и многого не видели". ]], code [[ pret(); ]]};
	};
};

atl_lev_radcliffe_dlg = room {
	nam = "Уолтер Рэдклифф";
	dsc = [[
		В доке Левиафана вы встречаете Уолтера Рэдклиффа. Завидев вас он говорит: "Дрейк, какая встреча. Я только что поместил на Левиафан два скафандра, которые вам выделили Моро с Райтом. Хорошо, что я вас встретил. Я хотел бы присоединиться к экипажу Левиафана и предложить вам свою помощь в поисках Уильяма".
	]];
	phr = {
		{"Как к этому отнесутся на Атлантиде?", [[
			"Я уже обговорил это с Моро и Райтом. Они не против моего решения, тем более, что они не меньше вас заинтересованы в успехе вашей экспедиции".
		]]};
		{"Благодарю, добро пожаловать на борт", [[
			"Отлично, благодарю. У меня есть еще одна просьба. Я хотел бы, чтобы моя сестра отправилась вместе с нами. Она знает язык навьяров и может оказаться крайне полезна во множестве ситуаций, кроме того - так она остается под моим присмотром".
		]], code [[
			lifeon("char_radcliffe");
			table.insert(pl.party, 'radcliffe');
			psub("sister");
		]]};
		{tag="sister"};
		{"Я не думаю, что ей место на Левиафане - экспедиция может быть опасна", function(s)
			if (ArrayUtils.indexOf(pl.party, 'learr') ~= 0) then
				walk(atl_lev_first_sail);
				return [[
					"Вы правы, Анне будет безопаснее остаться на Атлантиде. Я знаю, что с вами отправляется Леарр, которая достаточно хорошо знает наш язык, так что я надеюсь, что мы справимся без помощи моей сестры. Я скоро прибуду" - с этими словами он выходит из дока.
				]];
			else
				return [[
					"Я хотел бы, чтобы Анна отправилась с нами - я лично позабочусь о ее безопасности, а вам понадобится человек, долгое время посвятивший изучению культуры навьяров".
				]];
			end;
		end};
		{"Хорошо, ее помощь нам не помешает", [[
			"Отлично, мы скоро будем готовы" - с этим словами он выходит из дока.
		]], [[
			lifeon("char_anna");
			table.insert(pl.party, 'anna');
			walk(atl_lev_first_sail);
		]]};
	};
};