API tools faq
paste
Shadowcat

TDU2 Helper 0.2.3.9

Shadowcat
Jun 5th, 2011
255
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
AutoIt 54.60 KB | None | 0 0
raw download clone embed print report
  1. #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
  2. #AutoIt3Wrapper_Icon=logo-paul.ico
  3. #AutoIt3Wrapper_Outfile=C:\TDU2 Helper.exe
  4. #AutoIt3Wrapper_Compression=4
  5. #AutoIt3Wrapper_Res_Comment=Created by Gendel Vladimir  aka Shadowcat [NG]
  6. #AutoIt3Wrapper_Res_Description=Test Drive Unlimited 2 Helper
  7. #AutoIt3Wrapper_Res_Fileversion=0.2.3.9
  8. #AutoIt3Wrapper_Res_Language=1049
  9. #AutoIt3Wrapper_Res_Icon_Add=lo go.ico
  10. #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
  11.  
  12. #include <InclFunc.au3>
  13. #include <GUIConstantsEx.au3>
  14. #include <EditConstants.au3>
  15. #include <ButtonConstants.au3>
  16. #include <Text.au3>
  17. ;#include <Text_Lite.au3>
  18.  
  19.  
  20. ; Основное окно
  21. $mainwindow = GUICreate("TDU2 Helper v0.2.3.9", 280, 265)
  22. GUICtrlSetColor(-1, 0xffffff)
  23. GUISetBkColor(0xffFFFF)
  24. $Icon = GUICtrlCreateIcon("", 0, 10, 10, 255, 82)
  25. GUICtrlSetImage($Icon, @ScriptFullPath, 201)
  26. $1button = GUICtrlCreateButton("Просмотр по маркам", 10, 110, 260, 25)
  27. GUICtrlSetTip(-1, "Просмотр автомобилей по маркам")
  28. $2button = GUICtrlCreateButton("Просмотр по категориям", 10, 140, 260, 25)
  29. GUICtrlSetTip(-1, "Просмотр автомобилей по категориям")
  30. $3button = GUICtrlCreateButton("Тесты машин", 10, 170, 260, 25)
  31. $helpbutton = GUICtrlCreateButton("Помощь по игре", 10, 200, 260, 25)
  32. $4button = GUICtrlCreateButton("О программе", 10, 230, 260, 25)
  33. GUICtrlSetTip(-1, "О программе")
  34. GUISwitch($mainwindow)
  35. GUISetState(@SW_SHOW)
  36. ; Основной цикл
  37. While 1
  38.     $msg = GUIGetMsg()
  39.     Select
  40.         Case $msg = $1button
  41.             GUISetState(@SW_DISABLE, $mainwindow)
  42.             ;Окно Просмотра по маркам
  43.             $secondwindow = GUICreate("Просмотр автомобилей по маркам", 346, 362, -1, -1, -1, 0x00000080, $mainwindow)
  44.             GUISetBkColor(0xFFFFFF)
  45.             $ac_car = GUICtrlCreateButton("AC", 8, 8, 105, 25)
  46.             $ar_car = GUICtrlCreateButton("Alfa Romeo", 8, 40, 105, 25)
  47.             $aa_car = GUICtrlCreateButton("Ariel Atom", 8, 72, 105, 25)
  48.             $as_car = GUICtrlCreateButton("Ascari", 8, 104, 105, 25)
  49.             $am_car = GUICtrlCreateButton("Aston Martin", 8, 136, 105, 25)
  50.             $au_car = GUICtrlCreateButton("Audi", 8, 168, 105, 25)
  51.             $bu_car = GUICtrlCreateButton("Bugatti", 8, 200, 105, 25)
  52.             $bug_car = GUICtrlCreateButton("Buggy", 8, 232, 105, 25)
  53.             $cat_car = GUICtrlCreateButton("Caterham", 8, 264, 105, 25)
  54.             $ch_car = GUICtrlCreateButton("Chevrolet", 8, 296, 105, 25)
  55.             $ci_car = GUICtrlCreateButton("Citroen", 8, 328, 105, 25)
  56.             $d_car = GUICtrlCreateButton("Dodge", 120, 8, 105, 25)
  57.             $f_car = GUICtrlCreateButton("Ferrari", 120, 40, 105, 25)
  58.             $fo_car = GUICtrlCreateButton("Ford", 120, 72, 105, 25)
  59.             $gi_car = GUICtrlCreateButton("Ginetta", 120, 104, 105, 25)
  60.             $gu_car = GUICtrlCreateButton("Gumpert", 120, 136, 105, 25)
  61.             $h_car = GUICtrlCreateButton("HUMMER", 120, 168, 105, 25)
  62.             $j_car = GUICtrlCreateButton("Jaguar", 120, 200, 105, 25)
  63.             $k_car = GUICtrlCreateButton("Koenigsegg", 120, 232, 105, 25)
  64.             $l_car = GUICtrlCreateButton("Lancia", 120, 264, 105, 25)
  65.             $la_car = GUICtrlCreateButton("Land-Rover", 120, 296, 105, 25)
  66.             $lo_car = GUICtrlCreateButton("Lotus", 120, 328, 105, 25)
  67.             $mb_car = GUICtrlCreateButton("Mercedes-Benz", 232, 8, 105, 25)
  68.             $m_car = GUICtrlCreateButton("McLaren", 232, 40, 105, 25)
  69.             $n_car = GUICtrlCreateButton("Nissan", 232, 72, 105, 25)
  70.             $p_car = GUICtrlCreateButton("Pagani", 232, 104, 105, 25)
  71.             $r_car = GUICtrlCreateButton("RUF", 232, 136, 105, 25)
  72.             $sh_car = GUICtrlCreateButton("Shelby", 232, 168, 105, 25)
  73.             $sp_car = GUICtrlCreateButton("Spyker", 232, 200, 105, 25)
  74.             $s_car = GUICtrlCreateButton("Subaru", 232, 232, 105, 25)
  75.             $t_car = GUICtrlCreateButton("TVR", 232, 264, 105, 25)
  76.             $v_car = GUICtrlCreateButton("Volkswagen", 232, 296, 105, 25)
  77.             $w_car = GUICtrlCreateButton("WIESMANN", 232, 328, 105, 25)
  78.             GUISetState(@SW_SHOW, $secondwindow)
  79.             While 1
  80.                 $1msg = GUIGetMsg()
  81.                 Select
  82.                     Case $1msg = $ac_car
  83.                         _ACC427()
  84.  
  85.                     Case $1msg = $ar_car
  86.                         GUISetState(@SW_DISABLE, $secondwindow)
  87.                         $ar_cars = GUICreate("Alfa Romeo", 210, 138, -1, -1, -1, 0x00000080, $secondwindow)
  88.                         GUISetBkColor(0xFFFFFF)
  89.                         $ar_car1 = GUICtrlCreateButton("Alfa Romeo 8C Competizione", 8, 8, 193, 25)
  90.                         $ar_car2 = GUICtrlCreateButton("Alfa Romeo 8C Spider", 8, 40, 193, 25)
  91.                         $ar_car3 = GUICtrlCreateButton("Alfa Romeo Brera Italia Independent", 8, 72, 193, 25)
  92.                         $ar_car4 = GUICtrlCreateButton("Alfa Romeo MiTo Quadrifoglia verde", 8, 104, 193, 25)
  93.                         GUISetState(@SW_SHOW, $ar_cars)
  94.                         While 1
  95.                             $ar_carmesg = GUIGetMsg()
  96.                             Select
  97.                                 Case $ar_carmesg = $ar_car1
  98.                                     _AR8CC()
  99.                                 Case $ar_carmesg = $ar_car2
  100.                                     _AR8CS()
  101.                                 Case $ar_carmesg = $ar_car3
  102.                                     _ARBII()
  103.                                 Case $ar_carmesg = $ar_car4
  104.                                     _ARMQV()
  105.                                 Case $ar_carmesg = -3
  106.                                     GUISetState(@SW_ENABLE, $secondwindow)
  107.                                     GUIDelete($ar_cars)
  108.                                     ExitLoop
  109.                             EndSelect
  110.                         WEnd
  111.  
  112.                     Case $1msg = $aa_car
  113.                         GUISetState(@SW_DISABLE, $secondwindow)
  114.                         $aa_cars = GUICreate("Ariel Atom", 178, 74, -1, -1, -1, 0x00000080, $secondwindow)
  115.                         GUISetBkColor(0xFFFFFF)
  116.                         $aa_car1 = GUICtrlCreateButton("Ariel Atom 300 Supercharged", 8, 8, 161, 25)
  117.                         $aa_car2 = GUICtrlCreateButton("Ariel Atom 500 V8", 8, 40, 161, 25)
  118.                         GUISetState(@SW_SHOW, $aa_cars)
  119.                         While 1
  120.                             $aa_carmesg = GUIGetMsg()
  121.                             Select
  122.                                 Case $aa_carmesg = $aa_car1
  123.                                     _AA3()
  124.                                 Case $aa_carmesg = $aa_car2
  125.                                     _AA5()
  126.                                 Case $aa_carmesg = -3
  127.                                     GUISetState(@SW_ENABLE, $secondwindow)
  128.                                     GUIDelete($aa_cars)
  129.                                     ExitLoop
  130.                             EndSelect
  131.                         WEnd
  132.  
  133.                     Case $1msg = $as_car
  134.                         _AA10()
  135.  
  136.                     Case $1msg = $am_car
  137.                         GUISetState(@SW_DISABLE, $secondwindow)
  138.                         $AM_cars = GUICreate("Aston Martin", 258, 266, -1, -1, -1, 0x00000080, $secondwindow)
  139.                         GUISetBkColor(0xFFFFFF)
  140.                         $AM1 = GUICtrlCreateButton("Aston Martin V8 Vantage", 8, 8, 241, 25)
  141.                         $AM2 = GUICtrlCreateButton("Aston Martin V12 Vantage", 8, 40, 241, 25)
  142.                         $AM3 = GUICtrlCreateButton("Aston Martin V12 Vantage Carbon Black Edition", 8, 72, 241, 25)
  143.                         $AM4 = GUICtrlCreateButton("Aston Martin DB9 Coupe", 8, 104, 241, 25)
  144.                         $AM5 = GUICtrlCreateButton("Aston Martin DB9 Volante", 8, 136, 241, 25)
  145.                         $AM6 = GUICtrlCreateButton("Aston Martin DBS Carbon Black Edition", 8, 168, 241, 25)
  146.                         $AM7 = GUICtrlCreateButton("Aston Martin DBS Coupe", 8, 200, 241, 25)
  147.                         $AM8 = GUICtrlCreateButton("Aston Martin One-77", 8, 232, 241, 25)
  148.                         GUISetState(@SW_SHOW, $AM_cars)
  149.                         While 1
  150.                             $AMmsg = GUIGetMsg()
  151.                             Select
  152.                                 Case $AMmsg = $AM1
  153.                                     _AMV8V()
  154.                                 Case $AMmsg = $AM2
  155.                                     _AMV12V()
  156.                                 Case $AMmsg = $AM3
  157.                                     _AMV12VCBE()
  158.                                 Case $AMmsg = $AM4
  159.                                     _AMDB9C()
  160.                                 Case $AMmsg = $AM5
  161.                                     _AMDB9V()
  162.                                 Case $AMmsg = $AM6
  163.                                     _AMDBSCBE()
  164.                                 Case $AMmsg = $AM7
  165.                                     _AMDBSC()
  166.                                 Case $AMmsg = $AM8
  167.                                     _AMO77()
  168.                                 Case $AMmsg = -3
  169.                                     GUISetState(@SW_ENABLE, $secondwindow)
  170.                                     GUIDelete($AM_cars)
  171.                                     ;Exit
  172.                                     ExitLoop
  173.                             EndSelect
  174.                         WEnd
  175.  
  176.                     Case $1msg = $au_car
  177.                         GUISetState(@SW_DISABLE, $secondwindow)
  178.                         $au_cars = GUICreate("Audi", 490, 202, -1, -1, -1, 0x00000080, $secondwindow)
  179.                         GUISetBkColor(0xFFFFFF)
  180.                         $au_car1 = GUICtrlCreateButton("Audi Q7 V12 TDI quattro", 8, 8, 233, 25)
  181.                         $au_car2 = GUICtrlCreateButton("Audi Q7 V12 TDI quattro - TDU2 Inuit Edition", 8, 40, 233, 25)
  182.                         $au_car3 = GUICtrlCreateButton("Audi R8 Coupe 5.2 FSI quattro", 8, 72, 233, 25)
  183.                         $au_car4 = GUICtrlCreateButton("Audi R8 Quattro R Tronic", 8, 104, 233, 25)
  184.                         $au_car5 = GUICtrlCreateButton("Audi R8 Spyder 5.2 FSI quattro", 8, 136, 233, 25)
  185.                         $au_car6 = GUICtrlCreateButton("Audi RS5 Coupe", 8, 168, 233, 25)
  186.                         $au_car7 = GUICtrlCreateButton("Audi RS6 Avant", 248, 8, 233, 25)
  187.                         $au_car8 = GUICtrlCreateButton("Audi S3", 248, 40, 233, 25)
  188.                         $au_car9 = GUICtrlCreateButton("Audi S5 Coupe", 248, 72, 233, 25)
  189.                         $au_car10 = GUICtrlCreateButton("Audi TT RS Roadster", 248, 104, 233, 25)
  190.                         $au_car11 = GUICtrlCreateButton("Audi TTS Coupe", 248, 136, 233, 25)
  191.                         GUISetState(@SW_SHOW, $au_cars)
  192.                         While 1
  193.                             $au_carmesg = GUIGetMsg()
  194.                             Select
  195.                                 Case $au_carmesg = $au_car1
  196.                                     _AQ7V12TDIQ()
  197.                                 Case $au_carmesg = $au_car2
  198.                                     _AQ7V12TDIQIE()
  199.                                 Case $au_carmesg = $au_car3
  200.                                     _AR852()
  201.                                 Case $au_carmesg = $au_car4
  202.                                     _AR8QRT()
  203.                                 Case $au_carmesg = $au_car5
  204.                                     _AR8SQ()
  205.                                 Case $au_carmesg = $au_car6
  206.                                     _ARS5C()
  207.                                 Case $au_carmesg = $au_car7
  208.                                     _ARS6A()
  209.                                 Case $au_carmesg = $au_car8
  210.                                     _AS3()
  211.                                 Case $au_carmesg = $au_car9
  212.                                     _AS5C()
  213.                                 Case $au_carmesg = $au_car10
  214.                                     _ATTRSR()
  215.                                 Case $au_carmesg = $au_car11
  216.                                     _ATTSC()
  217.                                 Case $au_carmesg = -3
  218.                                     GUISetState(@SW_ENABLE, $secondwindow)
  219.                                     GUIDelete($au_cars)
  220.                                     ExitLoop
  221.                             EndSelect
  222.                         WEnd
  223.  
  224.                     Case $1msg = $bu_car
  225.                         GUISetState(@SW_DISABLE, $secondwindow)
  226.                         $bu_cars = GUICreate("Bugatti", 242, 170, -1, -1, -1, 0x00000080, $secondwindow)
  227.                         GUISetBkColor(0xFFFFFF)
  228.                         $bu_car1 = GUICtrlCreateButton("Bugatti Veyron 16.4", 8, 8, 225, 25)
  229.                         $bu_car2 = GUICtrlCreateButton("Bugatti Veyron 16.4 Grand Sport", 8, 40, 225, 25)
  230.                         $bu_car3 = GUICtrlCreateButton("Bugatti Veyron 16.4 Grand Sport Sang Bleu", 8, 72, 225, 25)
  231.                         $bu_car4 = GUICtrlCreateButton("Bugatti Veyron Centenaire", 8, 104, 225, 25)
  232.                         $bu_car5 = GUICtrlCreateButton("Bugatti Veyron Super Sport", 8, 136, 225, 25)
  233.                         GUISetState(@SW_SHOW, $bu_cars)
  234.                         While 1
  235.                             $bu_carmesg = GUIGetMsg()
  236.                             Select
  237.                                 Case $bu_carmesg = $bu_car1
  238.                                     _BV16()
  239.                                 Case $bu_carmesg = $bu_car2
  240.                                     _BV16GS()
  241.                                 Case $bu_carmesg = $bu_car3
  242.                                     _BV16GSSB()
  243.                                 Case $bu_carmesg = $bu_car4
  244.                                     _BV16C()
  245.                                 Case $bu_carmesg = $bu_car5
  246.                                     _BV16SS()
  247.                                 Case $bu_carmesg = -3
  248.                                     GUISetState(@SW_ENABLE, $secondwindow)
  249.                                     GUIDelete($bu_cars)
  250.                                     ExitLoop
  251.                             EndSelect
  252.                         WEnd
  253.  
  254.                     Case $1msg = $bug_car
  255.                         _BV8()
  256.  
  257.                     Case $1msg = $cat_car
  258.                         GUISetState(@SW_DISABLE, $secondwindow)
  259.                         $cat_cars = GUICreate("Caterham", 194, 74, -1, -1, -1, 0x00000080, $secondwindow)
  260.                         GUISetBkColor(0xFFFFFF)
  261.                         $cat_car1 = GUICtrlCreateButton("Caterham CSR 260", 8, 8, 177, 25)
  262.                         $cat_car2 = GUICtrlCreateButton("Caterham Superlight R500", 8, 40, 177, 25)
  263.                         GUISetState(@SW_SHOW, $cat_cars)
  264.                         While 1
  265.                             $cat_carmesg = GUIGetMsg()
  266.                             Select
  267.                                 Case $cat_carmesg = $cat_car1
  268.                                     _CCSR260()
  269.                                 Case $cat_carmesg = $cat_car2
  270.                                     _CSR500()
  271.                                 Case $cat_carmesg = -3
  272.                                     GUISetState(@SW_ENABLE, $secondwindow)
  273.                                     GUIDelete($cat_cars)
  274.                                     ExitLoop
  275.                             EndSelect
  276.                         WEnd
  277.  
  278.                     Case $1msg = $ch_car
  279.                         GUISetState(@SW_DISABLE, $secondwindow)
  280.                         $ch_cars = GUICreate("Chevrolet", 226, 170, -1, -1, -1, 0x00000080, $secondwindow)
  281.                         GUISetBkColor(0xFFFFFF)
  282.                         $ch_car1 = GUICtrlCreateButton("Chevrolet Camaro 1LT", 8, 8, 209, 25)
  283.                         $ch_car2 = GUICtrlCreateButton("Chevrolet Camaro 2SS", 8, 40, 209, 25)
  284.                         $ch_car3 = GUICtrlCreateButton("Chevrolet Camaro Synergy Special Edition", 8, 72, 209, 25)
  285.                         $ch_car4 = GUICtrlCreateButton("Chevrolet Corvette C1 1957", 8, 104, 209, 25)
  286.                         $ch_car5 = GUICtrlCreateButton("Chevrolet Corvette ZR1", 8, 136, 209, 25)
  287.                         GUISetState(@SW_SHOW, $ch_cars)
  288.                         While 1
  289.                             $ch_carmesg = GUIGetMsg()
  290.                             Select
  291.                                 Case $ch_carmesg = $ch_car1
  292.                                     _CC1LT()
  293.                                 Case $ch_carmesg = $ch_car2
  294.                                     _CC2SS()
  295.                                 Case $ch_carmesg = $ch_car3
  296.                                     _CCSSE()
  297.                                 Case $ch_carmesg = $ch_car4
  298.                                     _CCC1()
  299.                                 Case $ch_carmesg = $ch_car5
  300.                                     _errbox()
  301.                                 Case $ch_carmesg = -3
  302.                                     GUISetState(@SW_ENABLE, $secondwindow)
  303.                                     GUIDelete($ch_cars)
  304.                                     ExitLoop
  305.                             EndSelect
  306.                         WEnd
  307.  
  308.                     Case $1msg = $ci_car
  309.                         _C2CV()
  310.  
  311.                     Case $1msg = $d_car
  312.                         GUISetState(@SW_DISABLE, $secondwindow)
  313.                         $d_cars = GUICreate("Dodge", 178, 138, -1, -1, -1, 0x00000080, $secondwindow)
  314.                         GUISetBkColor(0xFFFFFF)
  315.                         $d_car1 = GUICtrlCreateButton("Dodge Charger RT", 8, 8, 161, 25)
  316.                         $d_car2 = GUICtrlCreateButton("Dodge Charger SRT8", 8, 40, 161, 25)
  317.                         $d_car3 = GUICtrlCreateButton("Dodge Viper SRT10", 8, 72, 161, 25)
  318.                         $d_car4 = GUICtrlCreateButton("Dodge Viper SRT10 ACR", 8, 104, 161, 25)
  319.                         GUISetState(@SW_SHOW, $d_cars)
  320.                         While 1
  321.                             $d_carmesg = GUIGetMsg()
  322.                             Select
  323.                                 Case $d_carmesg = $d_car1
  324.                                     _DCRT()
  325.                                 Case $d_carmesg = $d_car2
  326.                                     _DCSRT8()
  327.                                 Case $d_carmesg = $d_car3
  328.                                     _DVSRT10()
  329.                                 Case $d_carmesg = $d_car4
  330.                                     _errbox()
  331.                                 Case $d_carmesg = -3
  332.                                     GUISetState(@SW_ENABLE, $secondwindow)
  333.                                     GUIDelete($d_cars)
  334.                                     ExitLoop
  335.                             EndSelect
  336.                         WEnd
  337.  
  338.                     Case $1msg = $f_car
  339.                         ; Ferrari
  340.                         GUISetState(@SW_DISABLE, $secondwindow)
  341.                         $Ferrari_cars = GUICreate("Ferrari", 410, 234, -1, -1, -1, 0x00000080, $secondwindow)
  342.                         GUISetBkColor(0xFFFFFF)
  343.                         $Ferrari1 = GUICtrlCreateButton("Ferrari 308 GTS Quattrovalvole", 8, 8, 193, 25)
  344.                         $Ferrari2 = GUICtrlCreateButton("Ferrari F430 Scuderia", 8, 40, 193, 25)
  345.                         $Ferrari3 = GUICtrlCreateButton("Ferrari 430 Scuderia Spider 16M", 8, 72, 193, 25)
  346.                         $Ferrari4 = GUICtrlCreateButton("Ferrari 458 Italia", 8, 104, 193, 25)
  347.                         $Ferrari5 = GUICtrlCreateButton("Ferrari 599 GTB Fiorano", 8, 136, 193, 25)
  348.                         $Ferrari6 = GUICtrlCreateButton("Ferrari 599 GTB Fiorano China Edition", 8, 168, 193, 25)
  349.                         $Ferrari7 = GUICtrlCreateButton("Ferrari 599 GTO", 8, 200, 193, 25)
  350.                         $Ferrari8 = GUICtrlCreateButton("Ferrari 612 Scaglietti ", 208, 8, 193, 25)
  351.                         $Ferrari9 = GUICtrlCreateButton("Ferrari 612 Sessanta", 208, 40, 193, 25)
  352.                         $Ferrari10 = GUICtrlCreateButton("Ferrari California", 208, 72, 193, 25)
  353.                         $Ferrari11 = GUICtrlCreateButton("Ferrari Dino 246 GTS", 208, 104, 193, 25)
  354.                         $Ferrari12 = GUICtrlCreateButton("Ferrari Enzo", 208, 136, 193, 25)
  355.                         $Ferrari13 = GUICtrlCreateButton("Ferrari FXX “Evoluzione”", 208, 168, 193, 25)
  356.                         $Ferrari14 = GUICtrlCreateButton("Ferrari 599XX", 208, 200, 193, 25)
  357.                         GUISetState(@SW_SHOW, $Ferrari_cars)
  358.                         While 1
  359.                             $fmsg = GUIGetMsg()
  360.                             Select
  361.                                 Case $fmsg = $Ferrari1
  362.                                     _F308GTDQ()
  363.                                 Case $fmsg = $Ferrari2
  364.                                     _FF430()
  365.                                 Case $fmsg = $Ferrari3
  366.                                     _FF430S()
  367.                                 Case $fmsg = $Ferrari4
  368.                                     _F458()
  369.                                 Case $fmsg = $Ferrari5
  370.                                     _F599GTB()
  371.                                 Case $fmsg = $Ferrari6
  372.                                     _F599GTBFCE()
  373.                                 Case $fmsg = $Ferrari7
  374.                                     _F599()
  375.                                 Case $fmsg = $Ferrari8
  376.                                     _F612S()
  377.                                 Case $fmsg = $Ferrari9
  378.                                     _F612SE()
  379.                                 Case $fmsg = $Ferrari10
  380.                                     _FC()
  381.                                 Case $fmsg = $Ferrari11
  382.                                     _FD246GTS()
  383.                                 Case $fmsg = $Ferrari12
  384.                                     _FE()
  385.                                 Case $fmsg = $Ferrari13
  386.                                     _FFXXE()
  387.                                 Case $fmsg = $Ferrari14
  388.                                     _errbox()
  389.                                 Case $fmsg = -3
  390.                                     GUISetState(@SW_ENABLE, $secondwindow)
  391.                                     GUIDelete($Ferrari_cars)
  392.                                     ;Exit
  393.                                     ExitLoop
  394.                             EndSelect
  395.                         WEnd
  396.  
  397.                     Case $1msg = $fo_car
  398.                         GUISetState(@SW_DISABLE, $secondwindow)
  399.                         $fo_cars = GUICreate("Ford", 178, 138, -1, -1, -1, 0x00000080, $secondwindow)
  400.                         GUISetBkColor(0xFFFFFF)
  401.                         $fo_car1 = GUICtrlCreateButton("Ford GT", 8, 8, 161, 25)
  402.                         $fo_car2 = GUICtrlCreateButton("Ford Mustang Fastback 302 CID", 8, 40, 161, 25)
  403.                         $fo_car3 = GUICtrlCreateButton("Ford Mustang GT", 8, 72, 161, 25)
  404.                         $fo_car4 = GUICtrlCreateButton("Ford Mustang Shelby GT500", 8, 104, 161, 25)
  405.                         GUISetState(@SW_SHOW, $fo_cars)
  406.                         While 1
  407.                             $fo_carmesg = GUIGetMsg()
  408.                             Select
  409.                                 Case $fo_carmesg = $fo_car1
  410.                                     _FGT()
  411.                                 Case $fo_carmesg = $fo_car2
  412.                                     _FMF302CID()
  413.                                 Case $fo_carmesg = $fo_car3
  414.                                     _FMGT()
  415.                                 Case $fo_carmesg = $fo_car4
  416.                                     _FMSGT500()
  417.                                 Case $fo_carmesg = -3
  418.                                     GUISetState(@SW_ENABLE, $secondwindow)
  419.                                     GUIDelete($fo_cars)
  420.                                     ExitLoop
  421.                             EndSelect
  422.                         WEnd
  423.  
  424.                     Case $1msg = $gi_car
  425.                         _GF400()
  426.  
  427.                     Case $1msg = $gu_car
  428.                         _GAS()
  429.  
  430.                     Case $1msg = $h_car
  431.                         _HH3()
  432.  
  433.                     Case $1msg = $j_car
  434.                         GUISetState(@SW_DISABLE, $secondwindow)
  435.                         $j_cars = GUICreate("Jaguar", 242, 138, -1, -1, -1, 0x00000080, $secondwindow)
  436.                         GUISetBkColor(0xFFFFFF)
  437.                         $j_car1 = GUICtrlCreateButton("Jaguar D-type", 8, 8, 225, 25)
  438.                         $j_car2 = GUICtrlCreateButton("Jaguar E-Type Coupe", 8, 40, 225, 25)
  439.                         $j_car3 = GUICtrlCreateButton("Jaguar XKR", 8, 72, 225, 25)
  440.                         $j_car4 = GUICtrlCreateButton("Jaguar XKR Speed Pack and Black Pack", 8, 104, 225, 25)
  441.                         GUISetState(@SW_SHOW, $j_cars)
  442.                         While 1
  443.                             $j_carmesg = GUIGetMsg()
  444.                             Select
  445.                                 Case $j_carmesg = $j_car1
  446.                                     _JDT()
  447.                                 Case $j_carmesg = $j_car2
  448.                                     _JET()
  449.                                 Case $j_carmesg = $j_car3
  450.                                     _JXKR()
  451.                                 Case $j_carmesg = $j_car4
  452.                                     _JXKRSP()
  453.                                 Case $j_carmesg = -3
  454.                                     GUISetState(@SW_ENABLE, $secondwindow)
  455.                                     GUIDelete($j_cars)
  456.                                     ExitLoop
  457.                             EndSelect
  458.                         WEnd
  459.  
  460.                     Case $1msg = $k_car
  461.                         ;
  462.                         GUISetState(@SW_DISABLE, $secondwindow)
  463.                     Case $1msg = $l_car
  464.                         _LDIE()
  465.  
  466.                     Case $1msg = $la_car
  467.                         _LRRRSHSE()
  468.  
  469.                     Case $1msg = $lo_car
  470.                         ;
  471.                         GUISetState(@SW_DISABLE, $secondwindow)
  472.                     Case $1msg = $mb_car
  473.                         ; Mercedes-Benz
  474.                         GUISetState(@SW_DISABLE, $secondwindow)
  475.                         $MB_cars = GUICreate("Mercedes-Benz", 234, 266, -1, -1, -1, 0x00000080, $secondwindow)
  476.                         GUISetBkColor(0xFFFFFF)
  477.                         $MB1 = GUICtrlCreateButton("Mercedes-Benz 300 SL Gullwing", 8, 8, 217, 25)
  478.                         $MB2 = GUICtrlCreateButton("Mercedes-Benz SLK 55 AMG", 8, 40, 217, 25)
  479.                         $MB3 = GUICtrlCreateButton("Mercedes-Benz CLK 63 AMG Black Series", 8, 72, 217, 25)
  480.                         $MB4 = GUICtrlCreateButton("Mercedes-Benz ML 63 AMG", 8, 104, 217, 25)
  481.                         $MB5 = GUICtrlCreateButton("Mercedes-Benz McLaren Roadster", 8, 136, 217, 25)
  482.                         $MB6 = GUICtrlCreateButton("Mercedes-Benz SLR McLaren Stirling Moss", 8, 168, 217, 25)
  483.                         $MB7 = GUICtrlCreateButton("Mercedes-Benz SLS AMG", 8, 200, 217, 25)
  484.                         $MB8 = GUICtrlCreateButton("Mercedes-Benz SL 65 AMG Black Series", 8, 232, 217, 25)
  485.                         GUISetState(@SW_SHOW, $MB_cars)
  486.                         While 1
  487.                             $MB_MSG = GUIGetMsg()
  488.                             Select
  489.                                 Case $MB_MSG = $MB1
  490.                                 Case $MB_MSG = $MB2
  491.                                 Case $MB_MSG = $MB3
  492.                                 Case $MB_MSG = $MB4
  493.                                 Case $MB_MSG = $MB5
  494.                                 Case $MB_MSG = $MB6
  495.                                 Case $MB_MSG = $MB7
  496.                                 Case $MB_MSG = $MB8
  497.                                     _errbox()
  498.                                 Case $MB_MSG = -3
  499.                                     GUISetState(@SW_ENABLE, $secondwindow)
  500.                                     GUIDelete($MB_cars)
  501.                                     ExitLoop
  502.                             EndSelect
  503.                         WEnd
  504.  
  505.                     Case $1msg = $m_car
  506.                         ;
  507.                         GUISetState(@SW_DISABLE, $secondwindow)
  508.                     Case $1msg = $n_car
  509.                         ;
  510.                         GUISetState(@SW_DISABLE, $secondwindow)
  511.                     Case $1msg = $p_car
  512.                         ;
  513.                         GUISetState(@SW_DISABLE, $secondwindow)
  514.                     Case $1msg = $r_car
  515.                         ;
  516.                         GUISetState(@SW_DISABLE, $secondwindow)
  517.  
  518.                     Case $1msg = $sh_car
  519.                         _SD()
  520.  
  521.                     Case $1msg = $sp_car
  522.                         ;
  523.                         GUISetState(@SW_DISABLE, $secondwindow)
  524.  
  525.                     Case $1msg = $s_car
  526.                         _SIWRXSTI()
  527.  
  528.                     Case $1msg = $t_car
  529.                         _TVRS()
  530.  
  531.                     Case $1msg = $v_car
  532.                         ;
  533.                         GUISetState(@SW_DISABLE, $secondwindow)
  534.  
  535.                     Case $1msg = $w_car
  536.                         _WRMF3()
  537.  
  538.                     Case $1msg = -3
  539.                         GUISetState(@SW_ENABLE, $mainwindow)
  540.                         GUIDelete($secondwindow)
  541.                         ;Exit
  542.                         ExitLoop
  543.                 EndSelect
  544.             WEnd
  545.  
  546.         Case $msg = $2button
  547.             GUISetState(@SW_DISABLE, $mainwindow)
  548.             ; Окно Просмотра по категориям
  549.             $thirdwindow = GUICreate("Просмотр автомобилей по категориям", 250, 289, -1, -1, -1, 0x00000080, $mainwindow)
  550.             GUISetBkColor(0xffFFFF)
  551.             $23button = GUICtrlCreateButton("A1", 8, 8, 113, 33)
  552.             $24button = GUICtrlCreateButton("A2", 8, 48, 113, 33)
  553.             $25button = GUICtrlCreateButton("A3", 8, 88, 113, 33)
  554.             $26button = GUICtrlCreateButton("A4", 8, 128, 113, 33)
  555.             $27button = GUICtrlCreateButton("A5", 8, 168, 113, 33)
  556.             $28button = GUICtrlCreateButton("A6", 8, 208, 113, 33)
  557.             $29button = GUICtrlCreateButton("A7", 8, 248, 113, 33)
  558.             $30button = GUICtrlCreateButton("B2", 128, 8, 113, 33)
  559.             $31button = GUICtrlCreateButton("B3", 128, 48, 113, 33)
  560.             $32button = GUICtrlCreateButton("B4", 128, 88, 113, 33)
  561.             $33button = GUICtrlCreateButton("C2", 128, 128, 113, 33)
  562.             $34button = GUICtrlCreateButton("C3", 128, 168, 113, 33)
  563.             $35button = GUICtrlCreateButton("C4", 128, 208, 113, 33)
  564.             GUISetState(@SW_SHOW, $thirdwindow)
  565.             While 1
  566.                 $2msg = GUIGetMsg()
  567.                 Select
  568.                     Case $2msg = $23button
  569.                         GUISetState(@SW_HIDE, $thirdwindow)
  570.                         ; Окно Категории А1
  571.                         $A1window = GUICreate("Категория A1:", 458, 265, -1, -1, -1, 0x00000080, $thirdwindow)
  572.                         GUISetBkColor(0xffFFFF)
  573.                         $A1_1 = GUICtrlCreateButton("Ariel Atom 300 Supercharged", 8, 8, 217, 25)
  574.                         $A1_2 = GUICtrlCreateButton("Ariel Atom 500 V8", 8, 40, 217, 25)
  575.                         $A1_3 = GUICtrlCreateButton("Ascari A10", 8, 72, 217, 25)
  576.                         $A1_4 = GUICtrlCreateButton("Aston Martin One-77", 8, 104, 217, 25)
  577.                         $A1_5 = GUICtrlCreateButton("Bugatti Veyron 16.4", 8, 136, 217, 25)
  578.                         $A1_6 = GUICtrlCreateButton("Bugatti Veyron 16.4 Grand Sport", 8, 168, 217, 25)
  579.                         $A1_7 = GUICtrlCreateButton("Ferrari 599 GTO", 8, 200, 217, 25)
  580.                         $A1_8 = GUICtrlCreateButton("Ferrari Enzo", 8, 232, 217, 25)
  581.                         $A1_9 = GUICtrlCreateButton("Koenigsegg CCXR Edition", 232, 8, 217, 25)
  582.                         $A1_10 = GUICtrlCreateButton("McLaren MP4-12C", 232, 40, 217, 25)
  583.                         $A1_11 = GUICtrlCreateButton("Mercedes-Benz SLR McLaren Stirling Moss", 232, 72, 217, 25)
  584.                         $A1_12 = GUICtrlCreateButton("Pagani Zonda Cinque", 232, 104, 217, 25)
  585.                         $A1_13 = GUICtrlCreateButton("Pagani Zonda F", 232, 136, 217, 25)
  586.                         $A1_14 = GUICtrlCreateButton("Pagani Zonda F Roadster", 232, 168, 217, 25)
  587.                         $A1_15 = GUICtrlCreateButton("RUF RT 12", 232, 200, 217, 25)
  588.                         GUISetState(@SW_SHOW, $A1window)
  589.                         While 1
  590.                             $3msg = GUIGetMsg()
  591.                             Select
  592.                                 Case $3msg = $A1_1
  593.                                     ; Ariel Atom 300 Supercharged
  594.                                     _AA3()
  595.  
  596.                                 Case $3msg = $A1_2
  597.                                     ; Ariel Atom 500 V8
  598.                                     _AA5()
  599.  
  600.                                 Case $3msg = $A1_3
  601.                                     ; Ascari A10
  602.                                     _AA10()
  603.  
  604.                                 Case $3msg = $A1_4
  605.                                     ; Aston Martin One-77
  606.                                     _AMO77()
  607.  
  608.                                 Case $3msg = $A1_5
  609.                                     ; Bugatti Veyron 16.4
  610.                                     _BV16()
  611.  
  612.                                 Case $3msg = $A1_6
  613.                                     ; Bugatti Veyron 16.4 Grand Sport
  614.                                     _BV16GS()
  615.  
  616.                                 Case $3msg = $A1_7
  617.                                     ; Ferrari 599 GTO
  618.                                     _F599()
  619.  
  620.                                 Case $3msg = $A1_8
  621.                                     ; Ferrari Enzo
  622.                                     _FE()
  623.  
  624.                                 Case $3msg = $A1_9
  625.                                     ; Koenigsegg CCXR Edition
  626.                                     _KCCXR()
  627.  
  628.                                 Case $3msg = $A1_10
  629.                                     ; McLaren MP4-12C
  630.                                     _MLMP4()
  631.  
  632.                                 Case $3msg = $A1_11
  633.                                     ; Mercedes-Benz SLR McLaren Stirling Moss
  634.                                     _MBMLSM()
  635.  
  636.                                 Case $3msg = $A1_12
  637.                                     ; Pagani Zonda Cinque
  638.                                     _PZC()
  639.  
  640.                                 Case $3msg = $A1_13
  641.                                     ; Pagani Zonda F
  642.                                     _PZF()
  643.  
  644.                                 Case $3msg = $A1_14
  645.                                     ; Pagani Zonda F Roadster
  646.                                     _PZFR()
  647.  
  648.                                 Case $3msg = $A1_15
  649.                                     ; RUF RT 12
  650.                                     _RRT12()
  651.  
  652.                                 Case $3msg = -3
  653.                                     GUISetState(@SW_SHOW, $thirdwindow)
  654.                                     GUIDelete($A1window)
  655.                                     ;Exit
  656.                                     ExitLoop
  657.                             EndSelect
  658.                         WEnd
  659.  
  660.                     Case $2msg = $24button
  661.                         GUISetState(@SW_HIDE, $thirdwindow)
  662.                         $A2window = GUICreate("Категория A2:", 473, 298, -1, -1, -1, 0x00000080, $thirdwindow)
  663.                         GUISetBkColor(0xffFFFF)
  664.                         $A2_1 = GUICtrlCreateButton("Ascari KZ1 R Limited Edition", 8, 8, 225, 25)
  665.                         $A2_2 = GUICtrlCreateButton("Aston Martin V12 Vantage", 8, 40, 225, 25)
  666.                         $A2_3 = GUICtrlCreateButton("Audi R8 5.2 FSI Coupe", 8, 72, 225, 25)
  667.                         $A2_4 = GUICtrlCreateButton("Dodge Viper SRT10", 8, 104, 225, 25)
  668.                         $A2_5 = GUICtrlCreateButton("Ferrari 458 Italia", 8, 136, 225, 25)
  669.                         $A2_6 = GUICtrlCreateButton("Ferrari 599 GTB Fiorano", 8, 168, 225, 25)
  670.                         $A2_7 = GUICtrlCreateButton("Ferrari F430 Scuderia", 8, 200, 225, 25)
  671.                         $A2_8 = GUICtrlCreateButton("Ferrari F430 Scuderia Spider 16M", 8, 232, 225, 25)
  672.                         $A2_9 = GUICtrlCreateButton("Ford GT", 8, 264, 225, 25)
  673.                         $A2_10 = GUICtrlCreateButton("Ginetta F400", 240, 8, 225, 25)
  674.                         $A2_11 = GUICtrlCreateButton("Mercedes-Benz SLR McLaren Roadster 722s", 240, 40, 225, 25)
  675.                         $A2_12 = GUICtrlCreateButton("Mercedes-Benz SLS AMG", 240, 72, 225, 25)
  676.                         $A2_13 = GUICtrlCreateButton("Nissan GT-R", 240, 104, 225, 25)
  677.                         $A2_14 = GUICtrlCreateButton("Pagani Zonda C12S Roadster", 240, 136, 225, 25)
  678.                         $A2_15 = GUICtrlCreateButton("RUF RGT", 240, 168, 225, 25)
  679.                         $A2_16 = GUICtrlCreateButton("RUF RTurbo", 240, 200, 225, 25)
  680.                         $A2_17 = GUICtrlCreateButton("Spyker C12 Zagato", 240, 232, 225, 25)
  681.                         $A2_18 = GUICtrlCreateButton("TVR Sagaris", 240, 264, 225, 25)
  682.                         GUISetState(@SW_SHOW, $A2window)
  683.                         While 1
  684.                             $a2carsmsg = GUIGetMsg()
  685.                             Select
  686.                                 Case $a2carsmsg = $A2_1
  687.                                     ; Ascari KZ1 R Limited Edition
  688.                                     _AKZ1()
  689.  
  690.                                 Case $a2carsmsg = $A2_2
  691.                                     ; Aston Martin V12 Vantage
  692.                                     _AMV12V()
  693.  
  694.                                 Case $a2carsmsg = $A2_3
  695.                                     ; Audi R8 5.2 FSI Coupe
  696.                                     _AR852()
  697.  
  698.                                 Case $a2carsmsg = $A2_4
  699.                                     ; Dodge Viper SRT10
  700.                                     _DVSRT10()
  701.  
  702.                                 Case $a2carsmsg = $A2_5
  703.                                     ; Ferrari 458 Italia
  704.                                     _F458()
  705.  
  706.                                 Case $a2carsmsg = $A2_6
  707.                                     ; Ferrari 599 GTB Fiorano
  708.                                     _F599GTB()
  709.  
  710.                                 Case $a2carsmsg = $A2_7
  711.                                     ; Ferrari F430 Scuderia
  712.                                     _FF430()
  713.  
  714.                                 Case $a2carsmsg = $A2_8
  715.                                     ; Ferrari F430 Scuderia Spider 16M
  716.                                     _FF430S()
  717.  
  718.                                 Case $a2carsmsg = $A2_9
  719.                                     ; Ford GT
  720.                                     _FGT()
  721.  
  722.                                 Case $a2carsmsg = $A2_10
  723.                                     ; Ginetta F400
  724.                                     _GF400()
  725.  
  726.                                 Case $a2carsmsg = $A2_11
  727.                                     ; Mercedes-Benz SLR McLaren Roadster 722s
  728.                                     _MBSLRMLR722()
  729.  
  730.                                 Case $a2carsmsg = $A2_12
  731.                                     ; Mercedes-Benz SLS AMG
  732.                                     _MBSLSAMG()
  733.  
  734.                                 Case $a2carsmsg = $A2_13
  735.                                     ; Nissan GT-R
  736.                                     _NGTR()
  737.  
  738.                                 Case $a2carsmsg = $A2_14
  739.                                     ; Pagani Zonda C12S Roadster
  740.                                     _PZC12SR()
  741.  
  742.                                 Case $a2carsmsg = $A2_15
  743.                                     ; RUF RGT
  744.                                     _RRGT()
  745.  
  746.                                 Case $a2carsmsg = $A2_16
  747.                                     ; RUF Rturbo
  748.                                     _RRT()
  749.  
  750.                                 Case $a2carsmsg = $A2_17
  751.                                     ; Spyker C12 Zagato
  752.                                     _SC12Z()
  753.  
  754.                                 Case $a2carsmsg = $A2_18
  755.                                     ; TVR Sagaris
  756.                                     _TVRS()
  757.  
  758.                                 Case $a2carsmsg = -3
  759.                                     GUISetState(@SW_SHOW, $thirdwindow)
  760.                                     GUIDelete($A2window)
  761.                                     ExitLoop
  762.                             EndSelect
  763.                         WEnd
  764.  
  765.                     Case $2msg = $25button
  766.                         GUISetState(@SW_HIDE, $thirdwindow)
  767.                         $A3window = GUICreate("Категория A3:", 226, 298, -1, -1, -1, 0x00000080, $thirdwindow)
  768.                         GUISetBkColor(0xffFFFF)
  769.                         $A3_1 = GUICtrlCreateButton("Alfa Romeo 8C Competizione", 8, 8, 209, 25)
  770.                         $A3_2 = GUICtrlCreateButton("Alfa Romeo 8C Spider", 8, 40, 209, 25)
  771.                         $A3_3 = GUICtrlCreateButton("Aston Martin DBS Coupe", 8, 72, 209, 25)
  772.                         $A3_4 = GUICtrlCreateButton("Caterham CSR 260", 8, 104, 209, 25)
  773.                         $A3_5 = GUICtrlCreateButton("Ferrari 612 Scaglietti", 8, 136, 209, 25)
  774.                         $A3_6 = GUICtrlCreateButton("Ferrari California", 8, 168, 209, 25)
  775.                         $A3_7 = GUICtrlCreateButton("Mercedes-Benz CLK 63 AMG Black Series", 8, 200, 209, 25)
  776.                         $A3_8 = GUICtrlCreateButton("RUF RK Spyder", 8, 232, 209, 25)
  777.                         $A3_9 = GUICtrlCreateButton("Spyker C8 Aileron", 8, 264, 209, 25)
  778.                         GUISetState(@SW_SHOW, $A3window)
  779.                         While 1
  780.                             $a3carmsg = GUIGetMsg()
  781.                             Select
  782.                                 Case $a3carmsg = $A3_1
  783.                                     ; Alfa Romeo 8C Competizione
  784.                                     _AR8CC()
  785.                                 Case $a3carmsg = $A3_2
  786.                                     ; Alfa Romeo 8C Spider
  787.                                     _AR8CS()
  788.                                 Case $a3carmsg = $A3_3
  789.                                     ; Aston Martin DBS Coupe
  790.                                     _AMDBSC()
  791.                                 Case $a3carmsg = $A3_4
  792.                                     ; Caterham CSR 260
  793.                                     _CCSR260()
  794.                                 Case $a3carmsg = $A3_5
  795.                                     ; Ferrari 612 Scaglietti
  796.                                     _F612S()
  797.                                 Case $a3carmsg = $A3_6
  798.                                     ; Ferrari California
  799.                                     _FC()
  800.                                 Case $a3carmsg = $A3_7
  801.                                     ; Mercedes-Benz CLK 63 AMG Black Series
  802.                                     _MBCLK63AMGBS()
  803.                                 Case $a3carmsg = $A3_8
  804.                                     ; RUF RK Spyder
  805.                                     _RRKS()
  806.                                 Case $a3carmsg = $A3_9
  807.                                     ; Spyker C8 Aileron
  808.                                     _SC8A()
  809.                                 Case $a3carmsg = -3
  810.                                     GUISetState(@SW_SHOW, $thirdwindow)
  811.                                     GUIDelete($A3window)
  812.                                     ExitLoop
  813.                             EndSelect
  814.                         WEnd
  815.  
  816.  
  817.                     Case $2msg = $26button
  818.                         GUISetState(@SW_HIDE, $thirdwindow)
  819.                         $A4window = GUICreate("Категория A4:", 187, 202, -1, -1, -1, 0x00000080, $thirdwindow)
  820.                         GUISetBkColor(0xffFFFF)
  821.                         $A4_1 = GUICtrlCreateButton("Aston Martin DB9 Coupe", 8, 8, 169, 25)
  822.                         $A4_2 = GUICtrlCreateButton("Aston Martin DB9 Volante", 8, 40, 169, 25)
  823.                         $A4_3 = GUICtrlCreateButton("Aston Martin V8 Vantage", 8, 72, 169, 25)
  824.                         $A4_4 = GUICtrlCreateButton("Audi RS6 Avant", 8, 104, 169, 25)
  825.                         $A4_5 = GUICtrlCreateButton("Chevrolet Camaro 2SS", 8, 136, 169, 25)
  826.                         $A4_6 = GUICtrlCreateButton("Jaguar XKR", 8, 168, 169, 25)
  827.                         GUISetState(@SW_SHOW, $A4window)
  828.                         While 1
  829.                             $a4carmsg = GUIGetMsg()
  830.                             Select
  831.                                 Case $a4carmsg = $A4_1
  832.                                     ; Aston Martin DB9 Coupe
  833.                                     _AMDB9C()
  834.                                 Case $a4carmsg = $A4_2
  835.                                     ; Aston Martin DB9 Volante
  836.                                     _AMDB9V()
  837.                                 Case $a4carmsg = $A4_3
  838.                                     ; Aston Martin V8 Vantage
  839.                                     _AMV8V()
  840.                                 Case $a4carmsg = $A4_4
  841.                                     ; Audi RS6 Avant
  842.                                     _ARS6A()
  843.                                 Case $a4carmsg = $A4_5
  844.                                     ; Chevrolet Camaro 2SS
  845.                                     _CC2SS()
  846.                                 Case $a4carmsg = $A4_6
  847.                                     ; Jaguar XKR
  848.                                     _JXKR()
  849.                                 Case $a4carmsg = -3
  850.                                     GUISetState(@SW_SHOW, $thirdwindow)
  851.                                     GUIDelete($A4window)
  852.                                     ExitLoop
  853.                             EndSelect
  854.                         WEnd
  855.  
  856.                     Case $2msg = $27button
  857.                         GUISetState(@SW_HIDE, $thirdwindow)
  858.                         $A5window = GUICreate("Категория A5:", 170, 202, -1, -1, -1, 0x00000080, $thirdwindow)
  859.                         GUISetBkColor(0xffFFFF)
  860.                         $A5_1 = GUICtrlCreateButton("Audi S5 Coupe", 8, 8, 153, 25)
  861.                         $A5_2 = GUICtrlCreateButton("Audi TT-RS Roadster", 8, 40, 153, 25)
  862.                         $A5_3 = GUICtrlCreateButton("Dodge Charger SRT8", 8, 72, 153, 25)
  863.                         $A5_4 = GUICtrlCreateButton("Ford Mustang GT", 8, 104, 153, 25)
  864.                         $A5_5 = GUICtrlCreateButton("Lotus Evora", 8, 136, 153, 25)
  865.                         $A5_6 = GUICtrlCreateButton("Mercedes-Benz SLK 55 AMG", 8, 168, 153, 25)
  866.                         GUISetState(@SW_SHOW, $A5window)
  867.                         While 1
  868.                             $a5carmsg = GUIGetMsg()
  869.                             Select
  870.                                 Case $a5carmsg = $A5_1
  871.                                     ; Audi S5 Coupe
  872.                                     _AS5C()
  873.                                 Case $a5carmsg = $A5_2
  874.                                     ; Audi TT-RS Roadster
  875.                                     _ATTRSR()
  876.                                 Case $a5carmsg = $A5_3
  877.                                     ; Dodge Charger SRT8
  878.                                     _DCSRT8()
  879.                                 Case $a5carmsg = $A5_4
  880.                                     ; Ford Mustang GT
  881.                                     _FMGT()
  882.                                 Case $a5carmsg = $A5_5
  883.                                     ; Lotus Evora
  884.                                     _LE()
  885.                                 Case $a5carmsg = $A5_6
  886.                                     ; Mercedes-Benz SLK 55 AMG
  887.                                     _MBSLK55AMG()
  888.                                 Case $a5carmsg = -3
  889.                                     GUISetState(@SW_SHOW, $thirdwindow)
  890.                                     GUIDelete($A5window)
  891.                                     ExitLoop
  892.                             EndSelect
  893.                         WEnd
  894.  
  895.                     Case $2msg = $28button
  896.                         GUISetState(@SW_HIDE, $thirdwindow)
  897.                         $A6window = GUICreate("Категория A6:", 162, 170, -1, -1, -1, 0x00000080, $thirdwindow)
  898.                         GUISetBkColor(0xffFFFF)
  899.                         $A6_1 = GUICtrlCreateButton("Audi S3", 8, 8, 145, 25)
  900.                         $A6_2 = GUICtrlCreateButton("Audi TTS Coupe", 8, 40, 145, 25)
  901.                         $A6_3 = GUICtrlCreateButton("Chevrolet Camaro 1LT", 8, 72, 145, 25)
  902.                         $A6_4 = GUICtrlCreateButton("Nissan 370Z", 8, 104, 145, 25)
  903.                         $A6_5 = GUICtrlCreateButton("Subaru Impreza WRX STI", 8, 136, 145, 25)
  904.                         GUISetState(@SW_SHOW, $A6window)
  905.                         While 1
  906.                             $a6carmsg = GUIGetMsg()
  907.                             Select
  908.                                 Case $a6carmsg = $A6_1
  909.                                     ; Audi S3
  910.                                     _AS3()
  911.                                 Case $a6carmsg = $A6_2
  912.                                     ; Audi TTS Coupe
  913.                                     _ATTSC()
  914.                                 Case $a6carmsg = $A6_3
  915.                                     ; Chevrolet Camaro 1LT
  916.                                     _CC1LT()
  917.                                 Case $a6carmsg = $A6_4
  918.                                     ; Nissan 370Z
  919.                                     _N370Z()
  920.                                 Case $a6carmsg = $A6_5
  921.                                     ; Subaru Impreza WRX STI
  922.                                     _SIWRXSTI()
  923.                                 Case $a6carmsg = -3
  924.                                     GUISetState(@SW_SHOW, $thirdwindow)
  925.                                     GUIDelete($A6window)
  926.                                     ExitLoop
  927.                             EndSelect
  928.                         WEnd
  929.  
  930.                     Case $2msg = $29button
  931.                         GUISetState(@SW_HIDE, $thirdwindow)
  932.                         $A7window = GUICreate("Категория A7:", 210, 106, -1, -1, -1, 0x00000080, $thirdwindow)
  933.                         GUISetBkColor(0xffFFFF)
  934.                         $A7_1 = GUICtrlCreateButton("Alfa Romeo Brera Italia Independent", 8, 8, 193, 25)
  935.                         $A7_2 = GUICtrlCreateButton("Alfa Romeo MiTo Quadrifoglio Verde", 8, 40, 193, 25)
  936.                         $A7_3 = GUICtrlCreateButton("Volkswagen Golf GTI", 8, 72, 193, 25)
  937.                         GUISetState(@SW_SHOW, $A7window)
  938.                         While 1
  939.                             $a7carmsg = GUIGetMsg()
  940.                             Select
  941.                                 Case $a7carmsg = $A7_1
  942.                                     ; Alfa Romeo Brera Italia Independent
  943.                                     _ARBII()
  944.                                 Case $a7carmsg = $A7_2
  945.                                     ; Alfa Romeo MiTo Quadrifoglio Verde
  946.                                     _ARMQV()
  947.                                 Case $a7carmsg = $A7_3
  948.                                     ; Volkswagen Golf GTI
  949.                                     _VGGTI()
  950.                                 Case $a7carmsg = -3
  951.                                     GUISetState(@SW_SHOW, $thirdwindow)
  952.                                     GUIDelete($A7window)
  953.                                     ExitLoop
  954.                             EndSelect
  955.                         WEnd
  956.  
  957.                     Case $2msg = $30button
  958.                         GUISetState(@SW_HIDE, $thirdwindow)
  959.                         $B2window = GUICreate("Категория B2:", 178, 50, -1, -1, -1, 0x00000080, $thirdwindow)
  960.                         GUISetBkColor(0xffFFFF)
  961.                         $B2_1 = GUICtrlCreateButton("Buggy V8", 8, 8, 161, 33)
  962.                         GUISetState(@SW_SHOW, $B2window)
  963.                         While 1
  964.                             $B2carmsg = GUIGetMsg()
  965.                             Select
  966.                                 Case $B2carmsg = $B2_1
  967.                                     ; Buggy V8
  968.                                     _BV8()
  969.                                 Case $B2carmsg = -3
  970.                                     GUISetState(@SW_SHOW, $thirdwindow)
  971.                                     GUIDelete($B2window)
  972.                                     ExitLoop
  973.                             EndSelect
  974.                         WEnd
  975.  
  976.                     Case $2msg = $31button
  977.                         GUISetState(@SW_HIDE, $thirdwindow)
  978.                         $B3window = GUICreate("Категория B3:", 170, 106, -1, -1, -1, 0x00000080, $thirdwindow)
  979.                         GUISetBkColor(0xffFFFF)
  980.                         $B3_1 = GUICtrlCreateButton("Audi Q7 V12 TDI Quattro", 8, 8, 153, 25)
  981.                         $B3_2 = GUICtrlCreateButton("Mercedes-Benz ML 63 AMG", 8, 40, 153, 25)
  982.                         $B3_3 = GUICtrlCreateButton("Spyker D8 Peking-to-Paris", 8, 72, 153, 25)
  983.                         GUISetState(@SW_SHOW, $B3window)
  984.                         While 1
  985.                             $B3carmsg = GUIGetMsg()
  986.                             Select
  987.                                 Case $B3carmsg = $B3_1
  988.                                     ; Audi Q7 V12 TDI Quattro
  989.                                     _AQ7V12TDIQ()
  990.                                 Case $B3carmsg = $B3_2
  991.                                     ; Mercedes-Benz ML 63 AMG
  992.                                     _MBML63AMG()
  993.                                 Case $B3carmsg = $B3_3
  994.                                     ; Spyker D8 Peking-to-Paris
  995.                                     _SD8PTP()
  996.                                 Case $B3carmsg = -3
  997.                                     GUISetState(@SW_SHOW, $thirdwindow)
  998.                                     GUIDelete($B3window)
  999.                                     ExitLoop
  1000.                             EndSelect
  1001.                         WEnd
  1002.  
  1003.                     Case $2msg = $32button
  1004.                         GUISetState(@SW_HIDE, $thirdwindow)
  1005.                         $B4window = GUICreate("Категория B4:", 202, 106, -1, -1, -1, 0x00000080, $thirdwindow)
  1006.                         GUISetBkColor(0xffFFFF)
  1007.                         $B4_1 = GUICtrlCreateButton("Hummer H3", 8, 8, 185, 25)
  1008.                         $B4_2 = GUICtrlCreateButton("Land Rover Range Rover Sport HSE", 8, 40, 185, 25)
  1009.                         $B4_3 = GUICtrlCreateButton("Volkswagen Touareg V10 TDI", 8, 72, 185, 25)
  1010.                         GUISetState(@SW_SHOW, $B4window)
  1011.                         While 1
  1012.                             $B4carmsg = GUIGetMsg()
  1013.                             Select
  1014.                                 Case $B4carmsg = $B4_1
  1015.                                     ; Hummer H3
  1016.                                     _HH3()
  1017.                                 Case $B4carmsg = $B4_2
  1018.                                     ; Land Rover Range Rover Sport HSE
  1019.                                     _LRRRSHSE()
  1020.                                 Case $B4carmsg = $B4_3
  1021.                                     ; Volkswagen Touareg V10 TDI
  1022.                                     _VTV10TDI()
  1023.                                 Case $B4carmsg = -3
  1024.                                     GUISetState(@SW_SHOW, $thirdwindow)
  1025.                                     GUIDelete($B4window)
  1026.                                     ExitLoop
  1027.                             EndSelect
  1028.                         WEnd
  1029.  
  1030.                     Case $2msg = $33button
  1031.                         GUISetState(@SW_HIDE, $thirdwindow)
  1032.                         $C2window = GUICreate("Категория C2:", 172, 80, -1, -1, -1, 0x00000080, $thirdwindow)
  1033.                         GUISetBkColor(0xffFFFF)
  1034.                         $C2_1 = GUICtrlCreateButton("AC Cobra 427", 8, 8, 153, 25)
  1035.                         $C2_2 = GUICtrlCreateButton("Shelby Daytona", 8, 40, 153, 25)
  1036.                         GUISetState(@SW_SHOW, $C2window)
  1037.                         While 1
  1038.                             $C2carmsg = GUIGetMsg()
  1039.                             Select
  1040.                                 Case $C2carmsg = $C2_1
  1041.                                     ; AC Cobra 427
  1042.                                     _ACC427()
  1043.                                 Case $C2carmsg = $C2_2
  1044.                                     ; Shelby Daytona
  1045.                                     _SD()
  1046.                                 Case $C2carmsg = -3
  1047.                                     GUISetState(@SW_SHOW, $thirdwindow)
  1048.                                     GUIDelete($C2window)
  1049.                                     ExitLoop
  1050.                             EndSelect
  1051.                         WEnd
  1052.  
  1053.                     Case $2msg = $34button
  1054.                         GUISetState(@SW_HIDE, $thirdwindow)
  1055.                         $C3window = GUICreate("Категория C3:", 186, 202, -1, -1, -1, 0x00000080, $thirdwindow)
  1056.                         GUISetBkColor(0xffFFFF)
  1057.                         $C3_1 = GUICtrlCreateButton("Ferrari 308 GTS Quattrovalvole", 8, 8, 169, 25)
  1058.                         $C3_2 = GUICtrlCreateButton("Ferrari Dino 246 GTS", 8, 40, 169, 25)
  1059.                         $C3_3 = GUICtrlCreateButton("Chevrolet Corvette C1 1957", 8, 72, 169, 25)
  1060.                         $C3_4 = GUICtrlCreateButton("Jaguar D-Type", 8, 104, 169, 25)
  1061.                         $C3_5 = GUICtrlCreateButton("Jaguar E-Type", 8, 136, 169, 25)
  1062.                         $C3_6 = GUICtrlCreateButton("Mercedes-Benz 300 SL GullWing", 8, 168, 169, 25)
  1063.                         GUISetState(@SW_SHOW, $C3window)
  1064.                         While 1
  1065.                             $C3carmsg = GUIGetMsg()
  1066.                             Select
  1067.                                 Case $C3carmsg = $C3_1
  1068.                                     ; Ferrari 308 GTS Quattrovalvole
  1069.                                     _F308GTDQ()
  1070.                                 Case $C3carmsg = $C3_2
  1071.                                     ; Ferrari Dino 246 GTS
  1072.                                     _FD246GTS()
  1073.                                 Case $C3carmsg = $C3_3
  1074.                                     ; Chevrolet Corvette C1 1957
  1075.                                     _CCC1()
  1076.                                 Case $C3carmsg = $C3_4
  1077.                                     ; Jaguar D-Type
  1078.                                     _JDT()
  1079.                                 Case $C3carmsg = $C3_5
  1080.                                     ; Jaguar E-Type
  1081.                                     _JET()
  1082.                                 Case $C3carmsg = $C3_6
  1083.                                     ; Mercedes-Benz 300 SL GullWing
  1084.                                     _MB300SLG()
  1085.                                 Case $C3carmsg = -3
  1086.                                     GUISetState(@SW_SHOW, $thirdwindow)
  1087.                                     GUIDelete($C3window)
  1088.                                     ExitLoop
  1089.                             EndSelect
  1090.                         WEnd
  1091.  
  1092.                     Case $2msg = $35button
  1093.                         GUISetState(@SW_HIDE, $thirdwindow)
  1094.                         $C4window = GUICreate("Категория C4:", 194, 170, -1, -1, -1, 0x00000080, $thirdwindow)
  1095.                         GUISetBkColor(0xffFFFF)
  1096.                         $C4_1 = GUICtrlCreateButton("1967 Citroen 2 CV", 8, 8, 177, 25)
  1097.                         $C4_2 = GUICtrlCreateButton("Ford Mustang Fastback 302 CID", 8, 40, 177, 25)
  1098.                         $C4_3 = GUICtrlCreateButton("Lancia Delta Integrale Evoluzione", 8, 72, 177, 25)
  1099.                         $C4_4 = GUICtrlCreateButton("Lotus Esprit S3", 8, 104, 177, 25)
  1100.                         $C4_5 = GUICtrlCreateButton("Volkswagen Beetle", 8, 136, 177, 25)
  1101.                         GUISetState(@SW_SHOW, $C4window)
  1102.                         While 1
  1103.                             $C4carmsg = GUIGetMsg()
  1104.                             Select
  1105.                                 Case $C4carmsg = $C4_1
  1106.                                     ; 1967 Citroen 2 CV
  1107.                                     _C2CV()
  1108.                                 Case $C4carmsg = $C4_2
  1109.                                     ; Ford Mustang Fastback 302 CID
  1110.                                     _FMF302CID()
  1111.                                 Case $C4carmsg = $C4_3
  1112.                                     ; Lancia Delta Integrale Evoluzione
  1113.                                     _LDIE()
  1114.                                 Case $C4carmsg = $C4_4
  1115.                                     ; Lotus Esprit S3
  1116.                                     _LES3()
  1117.                                 Case $C4carmsg = $C4_5
  1118.                                     ; Volkswagen Beetle
  1119.                                     _VB()
  1120.                                 Case $C4carmsg = -3
  1121.                                     GUISetState(@SW_SHOW, $thirdwindow)
  1122.                                     GUIDelete($C4window)
  1123.                                     ExitLoop
  1124.                             EndSelect
  1125.                         WEnd
  1126.  
  1127.                     Case $2msg = -3
  1128.                         GUISetState(@SW_ENABLE, $mainwindow)
  1129.                         GUIDelete($thirdwindow)
  1130.                         ;Exit
  1131.                         ExitLoop
  1132.                 EndSelect
  1133.             WEnd
  1134.  
  1135.         Case $msg = $3button
  1136.             GUISetState(@SW_DISABLE, $mainwindow)
  1137.             ; Тесты машин категорий: A1 A2 A3 A4 A5 A6 A7 B2 B3 B4 C2 C3 C4
  1138.             $Form1 = GUICreate("Тесты машин", 250, 289, -1, -1, -1, 0x00000080, $mainwindow)
  1139.             GUISetBkColor(0xffFFFF)
  1140.             $A21 = GUICtrlCreateButton("A1", 8, 8, 113, 33)
  1141.             $A22 = GUICtrlCreateButton("A2", 8, 48, 113, 33)
  1142.             $A23 = GUICtrlCreateButton("A3", 8, 88, 113, 33)
  1143.             $A24 = GUICtrlCreateButton("A4", 8, 128, 113, 33)
  1144.             $A25 = GUICtrlCreateButton("A5", 8, 168, 113, 33)
  1145.             $A26 = GUICtrlCreateButton("A6", 8, 208, 113, 33)
  1146.             $A27 = GUICtrlCreateButton("A7", 8, 248, 113, 33)
  1147.             $B22 = GUICtrlCreateButton("B2", 128, 8, 113, 33)
  1148.             $B23 = GUICtrlCreateButton("B3", 128, 48, 113, 33)
  1149.             $B24 = GUICtrlCreateButton("B4", 128, 88, 113, 33)
  1150.             $C22 = GUICtrlCreateButton("C2", 128, 128, 113, 33)
  1151.             $C23 = GUICtrlCreateButton("C3", 128, 168, 113, 33)
  1152.             $C24 = GUICtrlCreateButton("C4", 128, 208, 113, 33)
  1153.             GUISetState(@SW_SHOW, $Form1)
  1154.             While 1
  1155.                 $4msg = GUIGetMsg()
  1156.                 Select
  1157.                     Case $4msg = $A21
  1158.                         GUISetState(@SW_HIDE, $Form1)
  1159.                         $a1p21 = GUICreate("Тест машин категории A1", 424, 403, -1, -1, -1, 0x00000080, $Form1)
  1160.                         GUICtrlCreateEdit($TestA1 & @CRLF & $TestA1p2 & @CRLF & $TestA1p3 & @CRLF & $TestA1p4, 1, 1, 422, 401)
  1161.                         GUISetState(@SW_SHOW, $a1p21)
  1162.                         While 1
  1163.                             $5msg = GUIGetMsg()
  1164.                             Select
  1165.                                 Case $5msg = -3
  1166.                                     GUISetState(@SW_SHOW, $Form1)
  1167.                                     GUIDelete($a1p21)
  1168.                                     ;Exit
  1169.                                     ExitLoop
  1170.                             EndSelect
  1171.                         WEnd
  1172.  
  1173.                     Case $4msg = $A22
  1174.                         GUISetState(@SW_HIDE, $Form1)
  1175.                         $a2p21 = GUICreate("Тест машин категории A2", 424, 402, -1, -1, -1, 0x00000080, $Form1)
  1176.                         GUICtrlCreateEdit($TestA2 & @CRLF & $TestA2p2 & @CRLF & $TestA2p3 & @CRLF & $TestA2p4, 1, 1, 422, 400)
  1177.                         GUISetState(@SW_SHOW, $a2p21)
  1178.                         While 1
  1179.                             $6msg = GUIGetMsg()
  1180.                             Select
  1181.                                 Case $6msg = -3
  1182.                                     GUISetState(@SW_SHOW, $Form1)
  1183.                                     GUIDelete($a2p21)
  1184.                                     ;Exit
  1185.                                     ExitLoop
  1186.                             EndSelect
  1187.                         WEnd
  1188.  
  1189.                     Case $4msg = $A23
  1190.                         $a3p21 = GUICreate("Тест машин категории A3", 412, 402, -1, -1, -1, 0x00000080, $Form1)
  1191.                         GUICtrlCreateEdit($TestA3 & @CRLF & $TestA3p2, 1, 1, 410, 400)
  1192.                         GUISetState(@SW_SHOW, $a3p21)
  1193.                         While 1
  1194.                             $7msg = GUIGetMsg()
  1195.                             Select
  1196.                                 Case $7msg = -3
  1197.                                     GUIDelete($a3p21)
  1198.                                     ;Exit
  1199.                                     ExitLoop
  1200.                             EndSelect
  1201.                         WEnd
  1202.  
  1203.                     Case $4msg = $A24
  1204.                         $a4p21 = GUICreate("Тест машин категории A4", 377, 402, -1, -1, -1, 0x00000080, $Form1)
  1205.                         GUICtrlCreateEdit($TestA4 & @CRLF & $TestA4p2, 1, 1, 375, 400)
  1206.                         GUISetState(@SW_SHOW, $a4p21)
  1207.                         While 1
  1208.                             $8msg = GUIGetMsg()
  1209.                             Select
  1210.                                 Case $8msg = -3
  1211.                                     GUIDelete($a4p21)
  1212.                                     ;Exit
  1213.                                     ExitLoop
  1214.                             EndSelect
  1215.                         WEnd
  1216.  
  1217.                     Case $4msg = $A25
  1218.                         $a5p21 = GUICreate("Тест машин категории A5", 424, 402, -1, -1, -1, 0x00000080, $Form1)
  1219.                         GUICtrlCreateEdit($TestA5 & @CRLF & $TestA5p2, 1, 1, 422, 400)
  1220.                         GUISetState(@SW_SHOW)
  1221.                         While 1
  1222.                             $9msg = GUIGetMsg()
  1223.                             Select
  1224.                                 Case $9msg = -3
  1225.                                     GUIDelete($a5p21)
  1226.                                     ;Exit
  1227.                                     ExitLoop
  1228.                             EndSelect
  1229.                         WEnd
  1230.  
  1231.                     Case $4msg = $A26
  1232.                         $a6p21 = GUICreate("Тест машин категории A6", 427, 357, -1, -1, -1, 0x00000080, $Form1)
  1233.                         GUICtrlCreateEdit($TestA6, 1, 1, 425, 355)
  1234.                         GUISetState(@SW_SHOW)
  1235.                         While 1
  1236.                             $10msg = GUIGetMsg()
  1237.                             Select
  1238.                                 Case $10msg = -3
  1239.                                     GUIDelete($a6p21)
  1240.                                     ;Exit
  1241.                                     ExitLoop
  1242.                             EndSelect
  1243.                         WEnd
  1244.  
  1245.                     Case $4msg = $A27
  1246.                         $a7p21 = GUICreate("Тест машин категории A7", 417, 357, -1, -1, -1, 0x00000080, $Form1)
  1247.                         GUICtrlCreateEdit($TestA7, 1, 1, 415, 355)
  1248.                         GUISetState(@SW_SHOW)
  1249.                         While 1
  1250.                             $11msg = GUIGetMsg()
  1251.                             Select
  1252.                                 Case $11msg = -3
  1253.                                     GUIDelete($a7p21)
  1254.                                     ;Exit
  1255.                                     ExitLoop
  1256.                             EndSelect
  1257.                         WEnd
  1258.  
  1259.                     Case $4msg = $B22
  1260.                         $b2p21 = GUICreate("Тест машин категории B2", 387, 167, -1, -1, -1, 0x00000080, $Form1)
  1261.                         GUICtrlCreateEdit($TestB2, 1, 1, 385, 165)
  1262.                         GUISetState(@SW_SHOW)
  1263.                         While 1
  1264.                             $12msg = GUIGetMsg()
  1265.                             Select
  1266.                                 Case $12msg = -3
  1267.                                     GUIDelete($b2p21)
  1268.                                     ;Exit
  1269.                                     ExitLoop
  1270.                             EndSelect
  1271.                         WEnd
  1272.  
  1273.                     Case $4msg = $B23
  1274.                         $b3p21 = GUICreate("Тест машин категории B3", 422, 372, -1, -1, -1, 0x00000080, $Form1)
  1275.                         GUICtrlCreateEdit($TestB3, 1, 1, 420, 370)
  1276.                         GUISetState(@SW_SHOW)
  1277.                         While 1
  1278.                             $13msg = GUIGetMsg()
  1279.                             Select
  1280.                                 Case $13msg = -3
  1281.                                     GUIDelete($b3p21)
  1282.                                     ;Exit
  1283.                                     ExitLoop
  1284.                             EndSelect
  1285.                         WEnd
  1286.  
  1287.  
  1288.                     Case $4msg = $B24
  1289.                         $b4p21 = GUICreate("Тест машин категории B4", 424, 377, -1, -1, -1, 0x00000080, $Form1)
  1290.                         GUICtrlCreateEdit($TestB4, 1, 1, 422, 375)
  1291.                         GUISetState(@SW_SHOW)
  1292.                         While 1
  1293.                             $14msg = GUIGetMsg()
  1294.                             Select
  1295.                                 Case $14msg = -3
  1296.                                     GUIDelete($b4p21)
  1297.                                     ;Exit
  1298.                                     ExitLoop
  1299.                             EndSelect
  1300.                         WEnd
  1301.  
  1302.  
  1303.                     Case $4msg = $C22
  1304.                         $c2p21 = GUICreate("Тест машин категории C2", 392, 397, -1, -1, -1, 0x00000080, $Form1)
  1305.                         GUICtrlCreateEdit($TestC2, 1, 1, 390, 395)
  1306.                         GUISetState(@SW_SHOW)
  1307.                         While 1
  1308.                             $15msg = GUIGetMsg()
  1309.                             Select
  1310.                                 Case $15msg = -3
  1311.                                     GUIDelete($c2p21)
  1312.                                     ;Exit
  1313.                                     ExitLoop
  1314.                             EndSelect
  1315.                         WEnd
  1316.  
  1317.                     Case $4msg = $C23
  1318.                         ; Категория С3
  1319.                         $c3p21 = GUICreate("Тест машин категории C3", 750, 417, -1, -1, -1, 0x00000080, $Form1)
  1320.                         GUICtrlCreateEdit($TestC3, 1, 1, 385, 415)
  1321.                         GUICtrlCreateEdit($TestC3p2, 388, 1, 360, 415)
  1322.                         GUISetState(@SW_SHOW, $c3p21)
  1323.                         While 1
  1324.                             $16msg = GUIGetMsg()
  1325.                             Select
  1326.                                 Case $16msg = -3
  1327.                                     GUIDelete($c3p21)
  1328.                                     ;Exit
  1329.                                     ExitLoop
  1330.                             EndSelect
  1331.                         WEnd
  1332.  
  1333.                     Case $4msg = $C24
  1334.                         ; Категория С4
  1335.                         $c4p21 = GUICreate("Тест машин категории C4", 500, 400, -1, -1, -1, 0x00000080, $Form1)
  1336.                         GUICtrlCreateEdit($TestC4, 1, 1, 490, 390)
  1337.                         GUISetState(@SW_SHOW, $c4p21)
  1338.                         While 1
  1339.                             $17msg = GUIGetMsg()
  1340.                             Select
  1341.                                 Case $17msg = -3
  1342.                                     GUIDelete($c4p21)
  1343.                                     ;Exit
  1344.                                     ExitLoop
  1345.                             EndSelect
  1346.                         WEnd
  1347.  
  1348.                     Case $4msg = -3
  1349.                         GUISetState(@SW_ENABLE, $mainwindow)
  1350.                         GUIDelete($Form1)
  1351.                         ;Exit
  1352.                         ExitLoop
  1353.                 EndSelect
  1354.             WEnd
  1355.  
  1356.         Case $msg = $helpbutton
  1357.             GUISetState(@SW_DISABLE, $mainwindow)
  1358.             $helpwindow = GUICreate("Помощь по игре", 186, 130, -1, -1, -1, 0x00000080, $mainwindow)
  1359.             GUISetBkColor(0xffFFFF)
  1360.             $faq1 = GUICtrlCreateButton("Общие вопросы", 8, 8, 169, 33)
  1361.             $faq2 = GUICtrlCreateButton("Настройка управления", 8, 48, 169, 33)
  1362.             $faq3 = GUICtrlCreateButton("Остальные машины", 8, 88, 169, 33)
  1363.             GUISwitch($helpwindow)
  1364.             GUISetState(@SW_SHOW, $helpwindow)
  1365.             While 1
  1366.                 $18msg = GUIGetMsg()
  1367.                 Select
  1368.                     Case $18msg = $faq1
  1369.                         GUISetState(@SW_DISABLE, $helpwindow)
  1370.                         $faq11 = GUICreate("Настройки управления", 419, 470, -1, -1, -1, 0x00000080, $helpwindow)
  1371.                         GUISetBkColor(0xffFFFF)
  1372.                         GUICtrlCreateEdit($Text2 & @CRLF & $Text3, 1, 1, 417, 470)
  1373.                         GUISwitch($faq11)
  1374.                         GUISetState(@SW_SHOW, $faq11)
  1375.                         While 1
  1376.                             $19msg = GUIGetMsg()
  1377.                             Select
  1378.                                 Case $19msg = -3
  1379.                                     GUISetState(@SW_ENABLE, $helpwindow)
  1380.                                     GUIDelete($faq11)
  1381.                                     ;Exit
  1382.                                     ExitLoop
  1383.                             EndSelect
  1384.                         WEnd
  1385.  
  1386.                     Case $18msg = $faq2
  1387.                         GUISetState(@SW_DISABLE, $helpwindow)
  1388.                         $faq21 = GUICreate("Настройки управления", 324, 402, -1, -1, -1, 0x00000080, $helpwindow)
  1389.                         GUISetBkColor(0xffFFFF)
  1390.                         GUICtrlCreateEdit($HANDLING & @CRLF & $HANDLING1 & @CRLF & $HANDLING2, 1, 1, 322, 400)
  1391.                         GUISwitch($faq21)
  1392.                         GUISetState(@SW_SHOW, $faq21)
  1393.                         While 1
  1394.                             $20msg = GUIGetMsg()
  1395.                             Select
  1396.                                 Case $20msg = -3
  1397.                                     GUISetState(@SW_ENABLE, $helpwindow)
  1398.                                     GUIDelete($faq21)
  1399.                                     ;Exit
  1400.                                     ExitLoop
  1401.                             EndSelect
  1402.                         WEnd
  1403.  
  1404.                     Case $18msg = $faq3
  1405.                         GUISetState(@SW_DISABLE, $helpwindow)
  1406.                         $faq31 = GUICreate("Остальные машины", 522, 402, -1, -1, -1, 0x00000080, $helpwindow)
  1407.                         GUISetBkColor(0xFFFFFF)
  1408.                         $Label1 = GUICtrlCreateLabel("Клубные:", 104, 0, 51, 17)
  1409.                         $Label2 = GUICtrlCreateLabel("DLC (предзаказ):", 344, 0, 91, 17)
  1410.                         $Label3 = GUICtrlCreateLabel("Покупка через TDU Store:", 64, 144, 136, 17)
  1411.                         $Other_car1 = GUICtrlCreateButton("Ferrari FXX “Evoluzione”", 8, 16, 249, 25)
  1412.                         $Other_car2 = GUICtrlCreateButton("GUMPERT apollo sport", 8, 48, 249, 25)
  1413.                         $Other_car3 = GUICtrlCreateButton("Lotus 2-Eleven", 8, 80, 249, 25)
  1414.                         $Other_car4 = GUICtrlCreateButton("WIESMANN ROADSTER MF3", 8, 112, 249, 25)
  1415.                         $Other_car5 = GUICtrlCreateButton("Aston Martin DBS Carbon Black Edition", 264, 16, 249, 25)
  1416.                         $Other_car6 = GUICtrlCreateButton("Aston Martin V12 Vantage Carbon Black Edition", 264, 48, 249, 25)
  1417.                         $Other_car7 = GUICtrlCreateButton("Audi RS 5 Coupe", 264, 80, 249, 25)
  1418.                         $Other_car8 = GUICtrlCreateButton("Bugatti Veyron 16.4 Super Sport", 264, 112, 249, 25)
  1419.                         $Other_car9 = GUICtrlCreateButton("Catheram Superlight R500", 264, 144, 249, 25)
  1420.                         $Other_car10 = GUICtrlCreateButton("Ferrari 612 Sessanta", 264, 176, 249, 25)
  1421.                         $Other_car11 = GUICtrlCreateButton("Chevrolet Camaro Synergy Special Edition", 264, 208, 249, 25)
  1422.                         $Other_car12 = GUICtrlCreateButton("Jaguar XKR Speed Pack and Black Pack", 264, 240, 249, 25)
  1423.                         $Other_car13 = GUICtrlCreateButton("Pagani Zonda Tricolore", 264, 272, 249, 25)
  1424.                         $Other_car14 = GUICtrlCreateButton("Audi Q7 V12 TDI quattro – TDU2 Inuit Edition", 8, 160, 249, 25)
  1425.                         $Other_car15 = GUICtrlCreateButton("Bugatti Veyron 16.4 Grand Sport Sang Bleu", 8, 192, 249, 25)
  1426.                         $Other_car16 = GUICtrlCreateButton("Bugatti Veyron 16.4 Centenaire", 8, 224, 249, 25)
  1427.                         $Other_car17 = GUICtrlCreateButton("Ferrari 599 GTB Fiorano China Edition", 8, 256, 249, 25)
  1428.                         $Other_car18 = GUICtrlCreateButton("Nissan 370Z Optional Parts", 8, 288, 249, 25)
  1429.                         $Other_car19 = GUICtrlCreateButton("Как их все получить в офлайн и онлайн и многое другое", 8, 328, 249, 57, $BS_MULTILINE)
  1430.                         $Other_car20 = GUICtrlCreateButton("Казино", 264, 304, 249, 25)
  1431.                         $Other_car21 = GUICtrlCreateButton("The Exploration Pack", 264, 336, 249, 25)
  1432.                         $Other_car22 = GUICtrlCreateButton("Неизвестные ", 264, 368, 249, 25)
  1433.                         GUISwitch($faq31)
  1434.                         GUISetState(@SW_SHOW, $faq31)
  1435.                         While 1
  1436.                             $21msg = GUIGetMsg()
  1437.                             Select
  1438.                                 Case $21msg = $Other_car1
  1439.                                     ; Клубные
  1440.                                     ; Ferrari FXX Evoluzione
  1441.                                     _FFXXE()
  1442.                                 Case $21msg = $Other_car2
  1443.                                     ; GUMPERT apollo sport
  1444.                                     _GAS()
  1445.                                 Case $21msg = $Other_car3
  1446.                                     ; Lotus 2-Eleven
  1447.                                     _L2E()
  1448.                                 Case $21msg = $Other_car4
  1449.                                     ; WIESMANN ROADSTER MF3
  1450.                                     _WRMF3()
  1451.                                 Case $21msg = $Other_car5
  1452.                                     ; Предзаказ
  1453.                                     ; Aston Martin DBS Carbon Black Edition
  1454.                                     _AMDBSCBE()
  1455.                                 Case $21msg = $Other_car6
  1456.                                     ; Aston Martin V12 Vantage Carbon Black Edition
  1457.                                     _AMV12VCBE()
  1458.                                 Case $21msg = $Other_car7
  1459.                                     ; Audi RS 5 Coupe
  1460.                                     _ARS5C()
  1461.                                 Case $21msg = $Other_car8
  1462.                                     ; Bugatti Veyron 16.4 Super Sport
  1463.                                     _BV16SS()
  1464.                                 Case $21msg = $Other_car9
  1465.                                     ; Catheram Superlight R500
  1466.                                     _CSR500()
  1467.                                 Case $21msg = $Other_car10
  1468.                                     ; Ferrari 612 Sessanta
  1469.                                     _F612SE()
  1470.                                 Case $21msg = $Other_car11
  1471.                                     ; Chevrolet Camaro Synergy Special Edition
  1472.                                     _CCSSE()
  1473.                                 Case $21msg = $Other_car12
  1474.                                     ; Jaguar XKR Speed Pack and Black Pack
  1475.                                     _JXKRSP()
  1476.                                 Case $21msg = $Other_car13
  1477.                                     ; Pagani Zonda Tricolore
  1478.                                     _PZT()
  1479.                                 Case $21msg = $Other_car14
  1480.                                     ; Покупка через TDU Store
  1481.                                     ;
  1482.                                     _AQ7V12TDIQIE()
  1483.                                 Case $21msg = $Other_car15
  1484.                                     ; Bugatti Veyron 16.4 Grand Sport Sang Bleu
  1485.                                     _BV16GSSB()
  1486.                                 Case $21msg = $Other_car16
  1487.                                     ; Bugatti Veyron 16.4 Centenaire
  1488.                                     _BV16C()
  1489.                                 Case $21msg = $Other_car17
  1490.                                     ; Ferrari 599 GTB Fiorano China Edition
  1491.                                     _F599GTBFCE()
  1492.                                 Case $21msg = $Other_car18
  1493.                                     ; Nissan 370Z Optional Parts
  1494.                                     _N370ZOP()
  1495.                                 Case $21msg = $Other_car19
  1496.                                     ; Как получить их все с помощью читов
  1497.                                     GUISetState(@SW_DISABLE, $faq31)
  1498.                                     $cheats = GUICreate("Читы", 234, 146, -1, -1, -1, 0x00000080, $helpwindow)
  1499.                                     GUISetBkColor(0xFFFFFF)
  1500.                                     $Label1 = GUICtrlCreateLabel("Как получить машины с помощью читов:", 8, 8, 219, 17)
  1501.                                     $Label2 = GUICtrlCreateLabel("Прочее:", 96, 96, 44, 17)
  1502.                                     $CHB1 = GUICtrlCreateButton("Замена машин в гараже", 8, 32, 217, 25)
  1503.                                     $CHB2 = GUICtrlCreateButton("Замена машин в начале новой игры", 8, 64, 217, 25)
  1504.                                     $CHB3 = GUICtrlCreateButton("Распаковка архивов игры", 8, 112, 217, 25)
  1505.                                     GUISetState(@SW_SHOW, $cheats)
  1506.                                     While 1
  1507.                                         $cheatsmsg = GUIGetMsg()
  1508.                                         Select
  1509.                                             Case $cheatsmsg = $CHB1
  1510.                                                 ;
  1511.                                             Case $cheatsmsg = $CHB2
  1512.                                                 ;
  1513.                                             Case $cheatsmsg = $CHB3
  1514.                                                 ;
  1515.                                             Case $cheatsmsg = -3
  1516.                                                 GUISetState(@SW_ENABLE, $faq31)
  1517.                                                 GUIDelete($cheats)
  1518.                                                 ExitLoop
  1519.                                         EndSelect
  1520.                                     WEnd
  1521.                                 Case $21msg = $Other_car20
  1522.                                     ;
  1523.                                 Case $21msg = $Other_car21
  1524.                                     ;
  1525.                                 Case $21msg = $Other_car22
  1526.                                     ;
  1527.                                 Case $21msg = -3
  1528.                                     GUISetState(@SW_ENABLE, $helpwindow)
  1529.                                     GUIDelete($faq31)
  1530.                                     ;Exit
  1531.                                     ExitLoop
  1532.                             EndSelect
  1533.                         WEnd
  1534.  
  1535.                     Case $18msg = -3
  1536.                         GUISetState(@SW_ENABLE, $mainwindow)
  1537.                         GUIDelete($helpwindow)
  1538.                         ;Exit
  1539.                         ExitLoop
  1540.                 EndSelect
  1541.             WEnd
  1542.  
  1543.  
  1544.         Case $msg = $4button
  1545.             MsgBox(0, "О программе", $Text1)
  1546.  
  1547.         Case $msg = -3
  1548.             ExitLoop
  1549.     EndSelect
  1550. WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!