home *** CD-ROM | disk | FTP | other *** search
/ Programming Tool Box / SIMS_2.iso / vb_code1 / knight / knight.frm < prev    next >
Text File  |  1993-02-09  |  57KB  |  1,888 lines
  1. VERSION 2.00
  2. Begin Form Knight 
  3.    BackColor       =   &H00FFFFFF&
  4.    BorderStyle     =   1  'Fixed Single
  5.    Caption         =   "Knight's Tour"
  6.    Height          =   5640
  7.    Icon            =   KNIGHT.FRX:0000
  8.    Left            =   1335
  9.    LinkTopic       =   "Form1"
  10.    MaxButton       =   0   'False
  11.    ScaleHeight     =   4950
  12.    ScaleWidth      =   5910
  13.    Top             =   1155
  14.    Width           =   6030
  15.    Begin Timer StatsTimer 
  16.       Enabled         =   0   'False
  17.       Interval        =   1000
  18.       Left            =   7920
  19.       Top             =   120
  20.    End
  21.    Begin PictureBox Board 
  22.       BackColor       =   &H00C0C0C0&
  23.       Height          =   495
  24.       Index           =   0
  25.       Left            =   7200
  26.       ScaleHeight     =   465
  27.       ScaleWidth      =   465
  28.       TabIndex        =   70
  29.       Tag             =   "2"
  30.       Top             =   120
  31.       Visible         =   0   'False
  32.       Width           =   495
  33.    End
  34.    Begin CheckBox StopBox 
  35.       BackColor       =   &H00008080&
  36.       Caption         =   "Any Solution"
  37.       Height          =   255
  38.       Left            =   4320
  39.       TabIndex        =   68
  40.       TabStop         =   0   'False
  41.       Tag             =   "0"
  42.       Top             =   3480
  43.       Width           =   1455
  44.    End
  45.    Begin PictureBox Board 
  46.       BackColor       =   &H00C0C0C0&
  47.       Height          =   495
  48.       Index           =   64
  49.       Left            =   3600
  50.       ScaleHeight     =   465
  51.       ScaleWidth      =   465
  52.       TabIndex        =   65
  53.       Tag             =   "2"
  54.       Top             =   4080
  55.       Width           =   495
  56.    End
  57.    Begin PictureBox Board 
  58.       BackColor       =   &H00808080&
  59.       Height          =   495
  60.       Index           =   63
  61.       Left            =   3120
  62.       ScaleHeight     =   465
  63.       ScaleWidth      =   465
  64.       TabIndex        =   64
  65.       Tag             =   "3"
  66.       Top             =   4080
  67.       Width           =   495
  68.    End
  69.    Begin PictureBox Board 
  70.       BackColor       =   &H00C0C0C0&
  71.       Height          =   495
  72.       Index           =   62
  73.       Left            =   2640
  74.       ScaleHeight     =   465
  75.       ScaleWidth      =   465
  76.       TabIndex        =   63
  77.       Tag             =   "4"
  78.       Top             =   4080
  79.       Width           =   495
  80.    End
  81.    Begin PictureBox Board 
  82.       BackColor       =   &H00808080&
  83.       Height          =   495
  84.       Index           =   61
  85.       Left            =   2160
  86.       ScaleHeight     =   465
  87.       ScaleWidth      =   465
  88.       TabIndex        =   62
  89.       Tag             =   "4"
  90.       Top             =   4080
  91.       Width           =   495
  92.    End
  93.    Begin PictureBox Board 
  94.       BackColor       =   &H00C0C0C0&
  95.       Height          =   495
  96.       Index           =   60
  97.       Left            =   1680
  98.       ScaleHeight     =   465
  99.       ScaleWidth      =   465
  100.       TabIndex        =   61
  101.       Tag             =   "4"
  102.       Top             =   4080
  103.       Width           =   495
  104.    End
  105.    Begin PictureBox Board 
  106.       BackColor       =   &H00808080&
  107.       Height          =   495
  108.       Index           =   59
  109.       Left            =   1200
  110.       ScaleHeight     =   465
  111.       ScaleWidth      =   465
  112.       TabIndex        =   60
  113.       Tag             =   "4"
  114.       Top             =   4080
  115.       Width           =   495
  116.    End
  117.    Begin PictureBox Board 
  118.       BackColor       =   &H00C0C0C0&
  119.       Height          =   495
  120.       Index           =   58
  121.       Left            =   720
  122.       ScaleHeight     =   465
  123.       ScaleWidth      =   465
  124.       TabIndex        =   59
  125.       Tag             =   "3"
  126.       Top             =   4080
  127.       Width           =   495
  128.    End
  129.    Begin PictureBox Board 
  130.       BackColor       =   &H00808080&
  131.       Height          =   495
  132.       Index           =   57
  133.       Left            =   240
  134.       ScaleHeight     =   465
  135.       ScaleWidth      =   465
  136.       TabIndex        =   58
  137.       Tag             =   "2"
  138.       Top             =   4080
  139.       Width           =   495
  140.    End
  141.    Begin PictureBox Board 
  142.       BackColor       =   &H00808080&
  143.       Height          =   495
  144.       Index           =   56
  145.       Left            =   3600
  146.       ScaleHeight     =   465
  147.       ScaleWidth      =   465
  148.       TabIndex        =   57
  149.       Tag             =   "3"
  150.       Top             =   3600
  151.       Width           =   495
  152.    End
  153.    Begin PictureBox Board 
  154.       BackColor       =   &H00C0C0C0&
  155.       Height          =   495
  156.       Index           =   55
  157.       Left            =   3120
  158.       ScaleHeight     =   465
  159.       ScaleWidth      =   465
  160.       TabIndex        =   56
  161.       Tag             =   "4"
  162.       Top             =   3600
  163.       Width           =   495
  164.    End
  165.    Begin PictureBox Board 
  166.       BackColor       =   &H00808080&
  167.       Height          =   495
  168.       Index           =   54
  169.       Left            =   2640
  170.       ScaleHeight     =   465
  171.       ScaleWidth      =   465
  172.       TabIndex        =   55
  173.       Tag             =   "6"
  174.       Top             =   3600
  175.       Width           =   495
  176.    End
  177.    Begin PictureBox Board 
  178.       BackColor       =   &H00C0C0C0&
  179.       Height          =   495
  180.       Index           =   53
  181.       Left            =   2160
  182.       ScaleHeight     =   465
  183.       ScaleWidth      =   465
  184.       TabIndex        =   54
  185.       Tag             =   "6"
  186.       Top             =   3600
  187.       Width           =   495
  188.    End
  189.    Begin PictureBox Board 
  190.       BackColor       =   &H00808080&
  191.       Height          =   495
  192.       Index           =   52
  193.       Left            =   1680
  194.       ScaleHeight     =   465
  195.       ScaleWidth      =   465
  196.       TabIndex        =   53
  197.       Tag             =   "6"
  198.       Top             =   3600
  199.       Width           =   495
  200.    End
  201.    Begin PictureBox Board 
  202.       BackColor       =   &H00C0C0C0&
  203.       Height          =   495
  204.       Index           =   51
  205.       Left            =   1200
  206.       ScaleHeight     =   465
  207.       ScaleWidth      =   465
  208.       TabIndex        =   52
  209.       Tag             =   "6"
  210.       Top             =   3600
  211.       Width           =   495
  212.    End
  213.    Begin PictureBox Board 
  214.       BackColor       =   &H00808080&
  215.       Height          =   495
  216.       Index           =   50
  217.       Left            =   720
  218.       ScaleHeight     =   465
  219.       ScaleWidth      =   465
  220.       TabIndex        =   51
  221.       Tag             =   "4"
  222.       Top             =   3600
  223.       Width           =   495
  224.    End
  225.    Begin PictureBox Board 
  226.       BackColor       =   &H00C0C0C0&
  227.       Height          =   495
  228.       Index           =   49
  229.       Left            =   240
  230.       ScaleHeight     =   465
  231.       ScaleWidth      =   465
  232.       TabIndex        =   50
  233.       Tag             =   "3"
  234.       Top             =   3600
  235.       Width           =   495
  236.    End
  237.    Begin PictureBox Board 
  238.       BackColor       =   &H00C0C0C0&
  239.       Height          =   495
  240.       Index           =   48
  241.       Left            =   3600
  242.       ScaleHeight     =   465
  243.       ScaleWidth      =   465
  244.       TabIndex        =   49
  245.       Tag             =   "4"
  246.       Top             =   3120
  247.       Width           =   495
  248.    End
  249.    Begin PictureBox Board 
  250.       BackColor       =   &H00808080&
  251.       Height          =   495
  252.       Index           =   47
  253.       Left            =   3120
  254.       ScaleHeight     =   465
  255.       ScaleWidth      =   465
  256.       TabIndex        =   48
  257.       Tag             =   "6"
  258.       Top             =   3120
  259.       Width           =   495
  260.    End
  261.    Begin PictureBox Board 
  262.       BackColor       =   &H00C0C0C0&
  263.       Height          =   495
  264.       Index           =   46
  265.       Left            =   2640
  266.       ScaleHeight     =   465
  267.       ScaleWidth      =   465
  268.       TabIndex        =   47
  269.       Tag             =   "8"
  270.       Top             =   3120
  271.       Width           =   495
  272.    End
  273.    Begin PictureBox Board 
  274.       BackColor       =   &H00808080&
  275.       Height          =   495
  276.       Index           =   45
  277.       Left            =   2160
  278.       ScaleHeight     =   465
  279.       ScaleWidth      =   465
  280.       TabIndex        =   46
  281.       Tag             =   "8"
  282.       Top             =   3120
  283.       Width           =   495
  284.    End
  285.    Begin PictureBox Board 
  286.       BackColor       =   &H00C0C0C0&
  287.       Height          =   495
  288.       Index           =   44
  289.       Left            =   1680
  290.       ScaleHeight     =   465
  291.       ScaleWidth      =   465
  292.       TabIndex        =   45
  293.       Tag             =   "8"
  294.       Top             =   3120
  295.       Width           =   495
  296.    End
  297.    Begin PictureBox Board 
  298.       BackColor       =   &H00808080&
  299.       Height          =   495
  300.       Index           =   43
  301.       Left            =   1200
  302.       ScaleHeight     =   465
  303.       ScaleWidth      =   465
  304.       TabIndex        =   44
  305.       Tag             =   "8"
  306.       Top             =   3120
  307.       Width           =   495
  308.    End
  309.    Begin PictureBox Board 
  310.       BackColor       =   &H00C0C0C0&
  311.       Height          =   495
  312.       Index           =   42
  313.       Left            =   720
  314.       ScaleHeight     =   465
  315.       ScaleWidth      =   465
  316.       TabIndex        =   43
  317.       Tag             =   "6"
  318.       Top             =   3120
  319.       Width           =   495
  320.    End
  321.    Begin PictureBox Board 
  322.       BackColor       =   &H00808080&
  323.       Height          =   495
  324.       Index           =   41
  325.       Left            =   240
  326.       ScaleHeight     =   465
  327.       ScaleWidth      =   465
  328.       TabIndex        =   42
  329.       Tag             =   "4"
  330.       Top             =   3120
  331.       Width           =   495
  332.    End
  333.    Begin PictureBox Board 
  334.       BackColor       =   &H00808080&
  335.       Height          =   495
  336.       Index           =   40
  337.       Left            =   3600
  338.       ScaleHeight     =   465
  339.       ScaleWidth      =   465
  340.       TabIndex        =   41
  341.       Tag             =   "4"
  342.       Top             =   2640
  343.       Width           =   495
  344.    End
  345.    Begin PictureBox Board 
  346.       BackColor       =   &H00C0C0C0&
  347.       Height          =   495
  348.       Index           =   39
  349.       Left            =   3120
  350.       ScaleHeight     =   465
  351.       ScaleWidth      =   465
  352.       TabIndex        =   40
  353.       Tag             =   "6"
  354.       Top             =   2640
  355.       Width           =   495
  356.    End
  357.    Begin PictureBox Board 
  358.       BackColor       =   &H00808080&
  359.       Height          =   495
  360.       Index           =   38
  361.       Left            =   2640
  362.       ScaleHeight     =   465
  363.       ScaleWidth      =   465
  364.       TabIndex        =   39
  365.       Tag             =   "8"
  366.       Top             =   2640
  367.       Width           =   495
  368.    End
  369.    Begin PictureBox Board 
  370.       BackColor       =   &H00C0C0C0&
  371.       Height          =   495
  372.       Index           =   37
  373.       Left            =   2160
  374.       ScaleHeight     =   465
  375.       ScaleWidth      =   465
  376.       TabIndex        =   38
  377.       Tag             =   "8"
  378.       Top             =   2640
  379.       Width           =   495
  380.    End
  381.    Begin PictureBox Board 
  382.       BackColor       =   &H00808080&
  383.       Height          =   495
  384.       Index           =   36
  385.       Left            =   1680
  386.       ScaleHeight     =   465
  387.       ScaleWidth      =   465
  388.       TabIndex        =   37
  389.       Tag             =   "8"
  390.       Top             =   2640
  391.       Width           =   495
  392.    End
  393.    Begin PictureBox Board 
  394.       BackColor       =   &H00C0C0C0&
  395.       Height          =   495
  396.       Index           =   35
  397.       Left            =   1200
  398.       ScaleHeight     =   465
  399.       ScaleWidth      =   465
  400.       TabIndex        =   36
  401.       Tag             =   "8"
  402.       Top             =   2640
  403.       Width           =   495
  404.    End
  405.    Begin PictureBox Board 
  406.       BackColor       =   &H00808080&
  407.       Height          =   495
  408.       Index           =   34
  409.       Left            =   720
  410.       ScaleHeight     =   465
  411.       ScaleWidth      =   465
  412.       TabIndex        =   35
  413.       Tag             =   "6"
  414.       Top             =   2640
  415.       Width           =   495
  416.    End
  417.    Begin PictureBox Board 
  418.       BackColor       =   &H00C0C0C0&
  419.       Height          =   495
  420.       Index           =   33
  421.       Left            =   240
  422.       ScaleHeight     =   465
  423.       ScaleWidth      =   465
  424.       TabIndex        =   34
  425.       Tag             =   "4"
  426.       Top             =   2640
  427.       Width           =   495
  428.    End
  429.    Begin PictureBox Board 
  430.       BackColor       =   &H00C0C0C0&
  431.       Height          =   495
  432.       Index           =   32
  433.       Left            =   3600
  434.       ScaleHeight     =   465
  435.       ScaleWidth      =   465
  436.       TabIndex        =   33
  437.       Tag             =   "4"
  438.       Top             =   2160
  439.       Width           =   495
  440.    End
  441.    Begin PictureBox Board 
  442.       BackColor       =   &H00808080&
  443.       Height          =   495
  444.       Index           =   31
  445.       Left            =   3120
  446.       ScaleHeight     =   465
  447.       ScaleWidth      =   465
  448.       TabIndex        =   32
  449.       Tag             =   "6"
  450.       Top             =   2160
  451.       Width           =   495
  452.    End
  453.    Begin PictureBox Board 
  454.       BackColor       =   &H00C0C0C0&
  455.       Height          =   495
  456.       Index           =   30
  457.       Left            =   2640
  458.       ScaleHeight     =   465
  459.       ScaleWidth      =   465
  460.       TabIndex        =   31
  461.       Tag             =   "8"
  462.       Top             =   2160
  463.       Width           =   495
  464.    End
  465.    Begin PictureBox Board 
  466.       BackColor       =   &H00808080&
  467.       Height          =   495
  468.       Index           =   29
  469.       Left            =   2160
  470.       ScaleHeight     =   465
  471.       ScaleWidth      =   465
  472.       TabIndex        =   30
  473.       Tag             =   "8"
  474.       Top             =   2160
  475.       Width           =   495
  476.    End
  477.    Begin PictureBox Board 
  478.       BackColor       =   &H00C0C0C0&
  479.       Height          =   495
  480.       Index           =   28
  481.       Left            =   1680
  482.       ScaleHeight     =   465
  483.       ScaleWidth      =   465
  484.       TabIndex        =   29
  485.       Tag             =   "8"
  486.       Top             =   2160
  487.       Width           =   495
  488.    End
  489.    Begin PictureBox Board 
  490.       BackColor       =   &H00808080&
  491.       Height          =   495
  492.       Index           =   27
  493.       Left            =   1200
  494.       ScaleHeight     =   465
  495.       ScaleWidth      =   465
  496.       TabIndex        =   28
  497.       Tag             =   "8"
  498.       Top             =   2160
  499.       Width           =   495
  500.    End
  501.    Begin PictureBox Board 
  502.       BackColor       =   &H00C0C0C0&
  503.       Height          =   495
  504.       Index           =   26
  505.       Left            =   720
  506.       ScaleHeight     =   465
  507.       ScaleWidth      =   465
  508.       TabIndex        =   27
  509.       Tag             =   "6"
  510.       Top             =   2160
  511.       Width           =   495
  512.    End
  513.    Begin PictureBox Board 
  514.       BackColor       =   &H00808080&
  515.       Height          =   495
  516.       Index           =   25
  517.       Left            =   240
  518.       ScaleHeight     =   465
  519.       ScaleWidth      =   465
  520.       TabIndex        =   26
  521.       Tag             =   "4"
  522.       Top             =   2160
  523.       Width           =   495
  524.    End
  525.    Begin PictureBox Board 
  526.       BackColor       =   &H00808080&
  527.       Height          =   495
  528.       Index           =   24
  529.       Left            =   3600
  530.       ScaleHeight     =   465
  531.       ScaleWidth      =   465
  532.       TabIndex        =   25
  533.       Tag             =   "4"
  534.       Top             =   1680
  535.       Width           =   495
  536.    End
  537.    Begin PictureBox Board 
  538.       BackColor       =   &H00C0C0C0&
  539.       Height          =   495
  540.       Index           =   23
  541.       Left            =   3120
  542.       ScaleHeight     =   465
  543.       ScaleWidth      =   465
  544.       TabIndex        =   24
  545.       Tag             =   "6"
  546.       Top             =   1680
  547.       Width           =   495
  548.    End
  549.    Begin PictureBox Board 
  550.       BackColor       =   &H00808080&
  551.       Height          =   495
  552.       Index           =   22
  553.       Left            =   2640
  554.       ScaleHeight     =   465
  555.       ScaleWidth      =   465
  556.       TabIndex        =   23
  557.       Tag             =   "8"
  558.       Top             =   1680
  559.       Width           =   495
  560.    End
  561.    Begin PictureBox Board 
  562.       BackColor       =   &H00C0C0C0&
  563.       Height          =   495
  564.       Index           =   21
  565.       Left            =   2160
  566.       ScaleHeight     =   465
  567.       ScaleWidth      =   465
  568.       TabIndex        =   22
  569.       Tag             =   "8"
  570.       Top             =   1680
  571.       Width           =   495
  572.    End
  573.    Begin PictureBox Board 
  574.       BackColor       =   &H00808080&
  575.       Height          =   495
  576.       Index           =   20
  577.       Left            =   1680
  578.       ScaleHeight     =   465
  579.       ScaleWidth      =   465
  580.       TabIndex        =   21
  581.       Tag             =   "8"
  582.       Top             =   1680
  583.       Width           =   495
  584.    End
  585.    Begin PictureBox Board 
  586.       BackColor       =   &H00C0C0C0&
  587.       Height          =   495
  588.       Index           =   19
  589.       Left            =   1200
  590.       ScaleHeight     =   465
  591.       ScaleWidth      =   465
  592.       TabIndex        =   20
  593.       Tag             =   "8"
  594.       Top             =   1680
  595.       Width           =   495
  596.    End
  597.    Begin PictureBox Board 
  598.       BackColor       =   &H00808080&
  599.       Height          =   495
  600.       Index           =   18
  601.       Left            =   720
  602.       ScaleHeight     =   465
  603.       ScaleWidth      =   465
  604.       TabIndex        =   19
  605.       Tag             =   "6"
  606.       Top             =   1680
  607.       Width           =   495
  608.    End
  609.    Begin PictureBox Board 
  610.       BackColor       =   &H00C0C0C0&
  611.       Height          =   495
  612.       Index           =   17
  613.       Left            =   240
  614.       ScaleHeight     =   465
  615.       ScaleWidth      =   465
  616.       TabIndex        =   18
  617.       Tag             =   "4"
  618.       Top             =   1680
  619.       Width           =   495
  620.    End
  621.    Begin PictureBox Board 
  622.       BackColor       =   &H00C0C0C0&
  623.       Height          =   495
  624.       Index           =   16
  625.       Left            =   3600
  626.       ScaleHeight     =   465
  627.       ScaleWidth      =   465
  628.       TabIndex        =   17
  629.       Tag             =   "3"
  630.       Top             =   1200
  631.       Width           =   495
  632.    End
  633.    Begin PictureBox Board 
  634.       BackColor       =   &H00808080&
  635.       Height          =   495
  636.       Index           =   15
  637.       Left            =   3120
  638.       ScaleHeight     =   465
  639.       ScaleWidth      =   465
  640.       TabIndex        =   16
  641.       Tag             =   "4"
  642.       Top             =   1200
  643.       Width           =   495
  644.    End
  645.    Begin PictureBox Board 
  646.       BackColor       =   &H00C0C0C0&
  647.       Height          =   495
  648.       Index           =   14
  649.       Left            =   2640
  650.       ScaleHeight     =   465
  651.       ScaleWidth      =   465
  652.       TabIndex        =   15
  653.       Tag             =   "6"
  654.       Top             =   1200
  655.       Width           =   495
  656.    End
  657.    Begin PictureBox Board 
  658.       BackColor       =   &H00808080&
  659.       Height          =   495
  660.       Index           =   13
  661.       Left            =   2160
  662.       ScaleHeight     =   465
  663.       ScaleWidth      =   465
  664.       TabIndex        =   14
  665.       Tag             =   "6"
  666.       Top             =   1200
  667.       Width           =   495
  668.    End
  669.    Begin PictureBox Board 
  670.       BackColor       =   &H00C0C0C0&
  671.       Height          =   495
  672.       Index           =   12
  673.       Left            =   1680
  674.       ScaleHeight     =   465
  675.       ScaleWidth      =   465
  676.       TabIndex        =   13
  677.       Tag             =   "6"
  678.       Top             =   1200
  679.       Width           =   495
  680.    End
  681.    Begin PictureBox Board 
  682.       BackColor       =   &H00808080&
  683.       Height          =   495
  684.       Index           =   11
  685.       Left            =   1200
  686.       ScaleHeight     =   465
  687.       ScaleWidth      =   465
  688.       TabIndex        =   12
  689.       Tag             =   "6"
  690.       Top             =   1200
  691.       Width           =   495
  692.    End
  693.    Begin PictureBox Board 
  694.       BackColor       =   &H00C0C0C0&
  695.       Height          =   495
  696.       Index           =   10
  697.       Left            =   720
  698.       ScaleHeight     =   465
  699.       ScaleWidth      =   465
  700.       TabIndex        =   11
  701.       Tag             =   "4"
  702.       Top             =   1200
  703.       Width           =   495
  704.    End
  705.    Begin PictureBox Board 
  706.       BackColor       =   &H00808080&
  707.       Height          =   495
  708.       Index           =   9
  709.       Left            =   240
  710.       ScaleHeight     =   465
  711.       ScaleWidth      =   465
  712.       TabIndex        =   10
  713.       Tag             =   "3"
  714.       Top             =   1200
  715.       Width           =   495
  716.    End
  717.    Begin PictureBox Board 
  718.       BackColor       =   &H00808080&
  719.       Height          =   495
  720.       Index           =   8
  721.       Left            =   3600
  722.       ScaleHeight     =   465
  723.       ScaleWidth      =   465
  724.       TabIndex        =   9
  725.       Tag             =   "2"
  726.       Top             =   720
  727.       Width           =   495
  728.    End
  729.    Begin PictureBox Board 
  730.       BackColor       =   &H00C0C0C0&
  731.       Height          =   495
  732.       Index           =   7
  733.       Left            =   3120
  734.       ScaleHeight     =   465
  735.       ScaleWidth      =   465
  736.       TabIndex        =   8
  737.       Tag             =   "3"
  738.       Top             =   720
  739.       Width           =   495
  740.    End
  741.    Begin PictureBox Board 
  742.       BackColor       =   &H00808080&
  743.       Height          =   495
  744.       Index           =   6
  745.       Left            =   2640
  746.       ScaleHeight     =   465
  747.       ScaleWidth      =   465
  748.       TabIndex        =   7
  749.       Tag             =   "4"
  750.       Top             =   720
  751.       Width           =   495
  752.    End
  753.    Begin PictureBox Board 
  754.       BackColor       =   &H00C0C0C0&
  755.       Height          =   495
  756.       Index           =   5
  757.       Left            =   2160
  758.       ScaleHeight     =   465
  759.       ScaleWidth      =   465
  760.       TabIndex        =   6
  761.       Tag             =   "4"
  762.       Top             =   720
  763.       Width           =   495
  764.    End
  765.    Begin PictureBox Board 
  766.       BackColor       =   &H00808080&
  767.       Height          =   495
  768.       Index           =   4
  769.       Left            =   1680
  770.       ScaleHeight     =   465
  771.       ScaleWidth      =   465
  772.       TabIndex        =   5
  773.       Tag             =   "4"
  774.       Top             =   720
  775.       Width           =   495
  776.    End
  777.    Begin PictureBox Board 
  778.       BackColor       =   &H00C0C0C0&
  779.       Height          =   495
  780.       Index           =   3
  781.       Left            =   1200
  782.       ScaleHeight     =   465
  783.       ScaleWidth      =   465
  784.       TabIndex        =   4
  785.       Tag             =   "4"
  786.       Top             =   720
  787.       Width           =   495
  788.    End
  789.    Begin PictureBox Board 
  790.       BackColor       =   &H00808080&
  791.       Height          =   495
  792.       Index           =   2
  793.       Left            =   720
  794.       ScaleHeight     =   465
  795.       ScaleWidth      =   465
  796.       TabIndex        =   3
  797.       Tag             =   "3"
  798.       Top             =   720
  799.       Width           =   495
  800.    End
  801.    Begin PictureBox Board 
  802.       BackColor       =   &H00C0C0C0&
  803.       Height          =   495
  804.       Index           =   1
  805.       Left            =   240
  806.       ScaleHeight     =   465
  807.       ScaleWidth      =   465
  808.       TabIndex        =   2
  809.       Tag             =   "2"
  810.       Top             =   720
  811.       Width           =   495
  812.    End
  813.    Begin CommandButton Button 
  814.       Enabled         =   0   'False
  815.       Height          =   495
  816.       Left            =   4440
  817.       TabIndex        =   1
  818.       Top             =   3960
  819.       Width           =   1215
  820.    End
  821.    Begin Label Label4 
  822.       BackColor       =   &H00008080&
  823.       Caption         =   "(v1.2)"
  824.       Height          =   255
  825.       Left            =   4800
  826.       TabIndex        =   69
  827.       Top             =   240
  828.       Width           =   615
  829.    End
  830.    Begin Image ImgKnight 
  831.       Enabled         =   0   'False
  832.       Height          =   480
  833.       Index           =   64
  834.       Left            =   9840
  835.       Picture         =   KNIGHT.FRX:0302
  836.       Top             =   4080
  837.       Visible         =   0   'False
  838.       Width           =   480
  839.    End
  840.    Begin Image ImgKnight 
  841.       Enabled         =   0   'False
  842.       Height          =   480
  843.       Index           =   63
  844.       Left            =   9360
  845.       Picture         =   KNIGHT.FRX:0604
  846.       Top             =   4080
  847.       Visible         =   0   'False
  848.       Width           =   480
  849.    End
  850.    Begin Image ImgKnight 
  851.       Enabled         =   0   'False
  852.       Height          =   480
  853.       Index           =   62
  854.       Left            =   8880
  855.       Picture         =   KNIGHT.FRX:0906
  856.       Top             =   4080
  857.       Visible         =   0   'False
  858.       Width           =   480
  859.    End
  860.    Begin Image ImgKnight 
  861.       Enabled         =   0   'False
  862.       Height          =   480
  863.       Index           =   61
  864.       Left            =   8400
  865.       Picture         =   KNIGHT.FRX:0C08
  866.       Top             =   4080
  867.       Visible         =   0   'False
  868.       Width           =   480
  869.    End
  870.    Begin Image ImgKnight 
  871.       Enabled         =   0   'False
  872.       Height          =   480
  873.       Index           =   60
  874.       Left            =   7920
  875.       Picture         =   KNIGHT.FRX:0F0A
  876.       Top             =   4080
  877.       Visible         =   0   'False
  878.       Width           =   480
  879.    End
  880.    Begin Image ImgKnight 
  881.       Enabled         =   0   'False
  882.       Height          =   480
  883.       Index           =   59
  884.       Left            =   7440
  885.       Picture         =   KNIGHT.FRX:120C
  886.       Top             =   4080
  887.       Visible         =   0   'False
  888.       Width           =   480
  889.    End
  890.    Begin Image ImgKnight 
  891.       Enabled         =   0   'False
  892.       Height          =   480
  893.       Index           =   58
  894.       Left            =   6960
  895.       Picture         =   KNIGHT.FRX:150E
  896.       Top             =   4080
  897.       Visible         =   0   'False
  898.       Width           =   480
  899.    End
  900.    Begin Image ImgKnight 
  901.       Enabled         =   0   'False
  902.       Height          =   480
  903.       Index           =   57
  904.       Left            =   6480
  905.       Picture         =   KNIGHT.FRX:1810
  906.       Top             =   4080
  907.       Visible         =   0   'False
  908.       Width           =   480
  909.    End
  910.    Begin Image ImgKnight 
  911.       Enabled         =   0   'False
  912.       Height          =   480
  913.       Index           =   56
  914.       Left            =   9840
  915.       Picture         =   KNIGHT.FRX:1B12
  916.       Top             =   3600
  917.       Visible         =   0   'False
  918.       Width           =   480
  919.    End
  920.    Begin Image ImgKnight 
  921.       Enabled         =   0   'False
  922.       Height          =   480
  923.       Index           =   55
  924.       Left            =   9360
  925.       Picture         =   KNIGHT.FRX:1E14
  926.       Top             =   3600
  927.       Visible         =   0   'False
  928.       Width           =   480
  929.    End
  930.    Begin Image ImgKnight 
  931.       Enabled         =   0   'False
  932.       Height          =   480
  933.       Index           =   54
  934.       Left            =   8880
  935.       Picture         =   KNIGHT.FRX:2116
  936.       Top             =   3600
  937.       Visible         =   0   'False
  938.       Width           =   480
  939.    End
  940.    Begin Image ImgKnight 
  941.       Enabled         =   0   'False
  942.       Height          =   480
  943.       Index           =   53
  944.       Left            =   8400
  945.       Picture         =   KNIGHT.FRX:2418
  946.       Top             =   3600
  947.       Visible         =   0   'False
  948.       Width           =   480
  949.    End
  950.    Begin Image ImgKnight 
  951.       Enabled         =   0   'False
  952.       Height          =   480
  953.       Index           =   52
  954.       Left            =   7920
  955.       Picture         =   KNIGHT.FRX:271A
  956.       Top             =   3600
  957.       Visible         =   0   'False
  958.       Width           =   480
  959.    End
  960.    Begin Image ImgKnight 
  961.       Enabled         =   0   'False
  962.       Height          =   480
  963.       Index           =   51
  964.       Left            =   7440
  965.       Picture         =   KNIGHT.FRX:2A1C
  966.       Top             =   3600
  967.       Visible         =   0   'False
  968.       Width           =   480
  969.    End
  970.    Begin Image ImgKnight 
  971.       Enabled         =   0   'False
  972.       Height          =   480
  973.       Index           =   50
  974.       Left            =   6960
  975.       Picture         =   KNIGHT.FRX:2D1E
  976.       Top             =   3600
  977.       Visible         =   0   'False
  978.       Width           =   480
  979.    End
  980.    Begin Image ImgKnight 
  981.       Enabled         =   0   'False
  982.       Height          =   480
  983.       Index           =   49
  984.       Left            =   6480
  985.       Picture         =   KNIGHT.FRX:3020
  986.       Top             =   3600
  987.       Visible         =   0   'False
  988.       Width           =   480
  989.    End
  990.    Begin Image ImgKnight 
  991.       Enabled         =   0   'False
  992.       Height          =   480
  993.       Index           =   48
  994.       Left            =   9840
  995.       Picture         =   KNIGHT.FRX:3322
  996.       Top             =   3120
  997.       Visible         =   0   'False
  998.       Width           =   480
  999.    End
  1000.    Begin Image ImgKnight 
  1001.       Enabled         =   0   'False
  1002.       Height          =   480
  1003.       Index           =   47
  1004.       Left            =   9360
  1005.       Picture         =   KNIGHT.FRX:3624
  1006.       Top             =   3120
  1007.       Visible         =   0   'False
  1008.       Width           =   480
  1009.    End
  1010.    Begin Image ImgKnight 
  1011.       Enabled         =   0   'False
  1012.       Height          =   480
  1013.       Index           =   46
  1014.       Left            =   8880
  1015.       Picture         =   KNIGHT.FRX:3926
  1016.       Top             =   3120
  1017.       Visible         =   0   'False
  1018.       Width           =   480
  1019.    End
  1020.    Begin Image ImgKnight 
  1021.       Enabled         =   0   'False
  1022.       Height          =   480
  1023.       Index           =   45
  1024.       Left            =   8400
  1025.       Picture         =   KNIGHT.FRX:3C28
  1026.       Top             =   3120
  1027.       Visible         =   0   'False
  1028.       Width           =   480
  1029.    End
  1030.    Begin Image ImgKnight 
  1031.       Enabled         =   0   'False
  1032.       Height          =   480
  1033.       Index           =   44
  1034.       Left            =   7920
  1035.       Picture         =   KNIGHT.FRX:3F2A
  1036.       Top             =   3120
  1037.       Visible         =   0   'False
  1038.       Width           =   480
  1039.    End
  1040.    Begin Image ImgKnight 
  1041.       Enabled         =   0   'False
  1042.       Height          =   480
  1043.       Index           =   43
  1044.       Left            =   7440
  1045.       Picture         =   KNIGHT.FRX:422C
  1046.       Top             =   3120
  1047.       Visible         =   0   'False
  1048.       Width           =   480
  1049.    End
  1050.    Begin Image ImgKnight 
  1051.       Enabled         =   0   'False
  1052.       Height          =   480
  1053.       Index           =   42
  1054.       Left            =   6960
  1055.       Picture         =   KNIGHT.FRX:452E
  1056.       Top             =   3120
  1057.       Visible         =   0   'False
  1058.       Width           =   480
  1059.    End
  1060.    Begin Image ImgKnight 
  1061.       Enabled         =   0   'False
  1062.       Height          =   480
  1063.       Index           =   41
  1064.       Left            =   6480
  1065.       Picture         =   KNIGHT.FRX:4830
  1066.       Top             =   3120
  1067.       Visible         =   0   'False
  1068.       Width           =   480
  1069.    End
  1070.    Begin Image ImgKnight 
  1071.       Enabled         =   0   'False
  1072.       Height          =   480
  1073.       Index           =   40
  1074.       Left            =   9840
  1075.       Picture         =   KNIGHT.FRX:4B32
  1076.       Top             =   2640
  1077.       Visible         =   0   'False
  1078.       Width           =   480
  1079.    End
  1080.    Begin Image ImgKnight 
  1081.       Enabled         =   0   'False
  1082.       Height          =   480
  1083.       Index           =   39
  1084.       Left            =   9360
  1085.       Picture         =   KNIGHT.FRX:4E34
  1086.       Top             =   2640
  1087.       Visible         =   0   'False
  1088.       Width           =   480
  1089.    End
  1090.    Begin Image ImgKnight 
  1091.       Enabled         =   0   'False
  1092.       Height          =   480
  1093.       Index           =   38
  1094.       Left            =   8880
  1095.       Picture         =   KNIGHT.FRX:5136
  1096.       Top             =   2640
  1097.       Visible         =   0   'False
  1098.       Width           =   480
  1099.    End
  1100.    Begin Image ImgKnight 
  1101.       Enabled         =   0   'False
  1102.       Height          =   480
  1103.       Index           =   37
  1104.       Left            =   8400
  1105.       Picture         =   KNIGHT.FRX:5438
  1106.       Top             =   2640
  1107.       Visible         =   0   'False
  1108.       Width           =   480
  1109.    End
  1110.    Begin Image ImgKnight 
  1111.       Enabled         =   0   'False
  1112.       Height          =   480
  1113.       Index           =   36
  1114.       Left            =   7920
  1115.       Picture         =   KNIGHT.FRX:573A
  1116.       Top             =   2640
  1117.       Visible         =   0   'False
  1118.       Width           =   480
  1119.    End
  1120.    Begin Image ImgKnight 
  1121.       Enabled         =   0   'False
  1122.       Height          =   480
  1123.       Index           =   35
  1124.       Left            =   7440
  1125.       Picture         =   KNIGHT.FRX:5A3C
  1126.       Top             =   2640
  1127.       Visible         =   0   'False
  1128.       Width           =   480
  1129.    End
  1130.    Begin Image ImgKnight 
  1131.       Enabled         =   0   'False
  1132.       Height          =   480
  1133.       Index           =   34
  1134.       Left            =   6960
  1135.       Picture         =   KNIGHT.FRX:5D3E
  1136.       Top             =   2640
  1137.       Visible         =   0   'False
  1138.       Width           =   480
  1139.    End
  1140.    Begin Image ImgKnight 
  1141.       Enabled         =   0   'False
  1142.       Height          =   480
  1143.       Index           =   33
  1144.       Left            =   6480
  1145.       Picture         =   KNIGHT.FRX:6040
  1146.       Top             =   2640
  1147.       Visible         =   0   'False
  1148.       Width           =   480
  1149.    End
  1150.    Begin Image ImgKnight 
  1151.       Enabled         =   0   'False
  1152.       Height          =   480
  1153.       Index           =   32
  1154.       Left            =   9840
  1155.       Picture         =   KNIGHT.FRX:6342
  1156.       Top             =   2160
  1157.       Visible         =   0   'False
  1158.       Width           =   480
  1159.    End
  1160.    Begin Image ImgKnight 
  1161.       Enabled         =   0   'False
  1162.       Height          =   480
  1163.       Index           =   31
  1164.       Left            =   9360
  1165.       Picture         =   KNIGHT.FRX:6644
  1166.       Top             =   2160
  1167.       Visible         =   0   'False
  1168.       Width           =   480
  1169.    End
  1170.    Begin Image ImgKnight 
  1171.       Enabled         =   0   'False
  1172.       Height          =   480
  1173.       Index           =   30
  1174.       Left            =   8880
  1175.       Picture         =   KNIGHT.FRX:6946
  1176.       Top             =   2160
  1177.       Visible         =   0   'False
  1178.       Width           =   480
  1179.    End
  1180.    Begin Image ImgKnight 
  1181.       Enabled         =   0   'False
  1182.       Height          =   480
  1183.       Index           =   29
  1184.       Left            =   8400
  1185.       Picture         =   KNIGHT.FRX:6C48
  1186.       Top             =   2160
  1187.       Visible         =   0   'False
  1188.       Width           =   480
  1189.    End
  1190.    Begin Image ImgKnight 
  1191.       Enabled         =   0   'False
  1192.       Height          =   480
  1193.       Index           =   28
  1194.       Left            =   7920
  1195.       Picture         =   KNIGHT.FRX:6F4A
  1196.       Top             =   2160
  1197.       Visible         =   0   'False
  1198.       Width           =   480
  1199.    End
  1200.    Begin Image ImgKnight 
  1201.       Enabled         =   0   'False
  1202.       Height          =   480
  1203.       Index           =   27
  1204.       Left            =   7440
  1205.       Picture         =   KNIGHT.FRX:724C
  1206.       Top             =   2160
  1207.       Visible         =   0   'False
  1208.       Width           =   480
  1209.    End
  1210.    Begin Image ImgKnight 
  1211.       Enabled         =   0   'False
  1212.       Height          =   480
  1213.       Index           =   26
  1214.       Left            =   6960
  1215.       Picture         =   KNIGHT.FRX:754E
  1216.       Top             =   2160
  1217.       Visible         =   0   'False
  1218.       Width           =   480
  1219.    End
  1220.    Begin Image ImgKnight 
  1221.       Enabled         =   0   'False
  1222.       Height          =   480
  1223.       Index           =   25
  1224.       Left            =   6480
  1225.       Picture         =   KNIGHT.FRX:7850
  1226.       Top             =   2160
  1227.       Visible         =   0   'False
  1228.       Width           =   480
  1229.    End
  1230.    Begin Image ImgKnight 
  1231.       Enabled         =   0   'False
  1232.       Height          =   480
  1233.       Index           =   24
  1234.       Left            =   9840
  1235.       Picture         =   KNIGHT.FRX:7B52
  1236.       Top             =   1680
  1237.       Visible         =   0   'False
  1238.       Width           =   480
  1239.    End
  1240.    Begin Image ImgKnight 
  1241.       Enabled         =   0   'False
  1242.       Height          =   480
  1243.       Index           =   23
  1244.       Left            =   9360
  1245.       Picture         =   KNIGHT.FRX:7E54
  1246.       Top             =   1680
  1247.       Visible         =   0   'False
  1248.       Width           =   480
  1249.    End
  1250.    Begin Image ImgKnight 
  1251.       Enabled         =   0   'False
  1252.       Height          =   480
  1253.       Index           =   22
  1254.       Left            =   8880
  1255.       Picture         =   KNIGHT.FRX:8156
  1256.       Top             =   1680
  1257.       Visible         =   0   'False
  1258.       Width           =   480
  1259.    End
  1260.    Begin Image ImgKnight 
  1261.       Enabled         =   0   'False
  1262.       Height          =   480
  1263.       Index           =   21
  1264.       Left            =   8400
  1265.       Picture         =   KNIGHT.FRX:8458
  1266.       Top             =   1680
  1267.       Visible         =   0   'False
  1268.       Width           =   480
  1269.    End
  1270.    Begin Image ImgKnight 
  1271.       Enabled         =   0   'False
  1272.       Height          =   480
  1273.       Index           =   20
  1274.       Left            =   7920
  1275.       Picture         =   KNIGHT.FRX:875A
  1276.       Top             =   1680
  1277.       Visible         =   0   'False
  1278.       Width           =   480
  1279.    End
  1280.    Begin Image ImgKnight 
  1281.       Enabled         =   0   'False
  1282.       Height          =   480
  1283.       Index           =   19
  1284.       Left            =   7440
  1285.       Picture         =   KNIGHT.FRX:8A5C
  1286.       Top             =   1680
  1287.       Visible         =   0   'False
  1288.       Width           =   480
  1289.    End
  1290.    Begin Image ImgKnight 
  1291.       Enabled         =   0   'False
  1292.       Height          =   480
  1293.       Index           =   18
  1294.       Left            =   6960
  1295.       Picture         =   KNIGHT.FRX:8D5E
  1296.       Top             =   1680
  1297.       Visible         =   0   'False
  1298.       Width           =   480
  1299.    End
  1300.    Begin Image ImgKnight 
  1301.       Enabled         =   0   'False
  1302.       Height          =   480
  1303.       Index           =   17
  1304.       Left            =   6480
  1305.       Picture         =   KNIGHT.FRX:9060
  1306.       Top             =   1680
  1307.       Visible         =   0   'False
  1308.       Width           =   480
  1309.    End
  1310.    Begin Image ImgKnight 
  1311.       Enabled         =   0   'False
  1312.       Height          =   480
  1313.       Index           =   16
  1314.       Left            =   9840
  1315.       Picture         =   KNIGHT.FRX:9362
  1316.       Top             =   1200
  1317.       Visible         =   0   'False
  1318.       Width           =   480
  1319.    End
  1320.    Begin Image ImgKnight 
  1321.       Enabled         =   0   'False
  1322.       Height          =   480
  1323.       Index           =   15
  1324.       Left            =   9360
  1325.       Picture         =   KNIGHT.FRX:9664
  1326.       Top             =   1200
  1327.       Visible         =   0   'False
  1328.       Width           =   480
  1329.    End
  1330.    Begin Image ImgKnight 
  1331.       Enabled         =   0   'False
  1332.       Height          =   480
  1333.       Index           =   14
  1334.       Left            =   8880
  1335.       Picture         =   KNIGHT.FRX:9966
  1336.       Top             =   1200
  1337.       Visible         =   0   'False
  1338.       Width           =   480
  1339.    End
  1340.    Begin Image ImgKnight 
  1341.       Enabled         =   0   'False
  1342.       Height          =   480
  1343.       Index           =   13
  1344.       Left            =   8400
  1345.       Picture         =   KNIGHT.FRX:9C68
  1346.       Top             =   1200
  1347.       Visible         =   0   'False
  1348.       Width           =   480
  1349.    End
  1350.    Begin Image ImgKnight 
  1351.       Enabled         =   0   'False
  1352.       Height          =   480
  1353.       Index           =   12
  1354.       Left            =   7920
  1355.       Picture         =   KNIGHT.FRX:9F6A
  1356.       Top             =   1200
  1357.       Visible         =   0   'False
  1358.       Width           =   480
  1359.    End
  1360.    Begin Image ImgKnight 
  1361.       Enabled         =   0   'False
  1362.       Height          =   480
  1363.       Index           =   11
  1364.       Left            =   7440
  1365.       Picture         =   KNIGHT.FRX:A26C
  1366.       Top             =   1200
  1367.       Visible         =   0   'False
  1368.       Width           =   480
  1369.    End
  1370.    Begin Image ImgKnight 
  1371.       Enabled         =   0   'False
  1372.       Height          =   480
  1373.       Index           =   10
  1374.       Left            =   6960
  1375.       Picture         =   KNIGHT.FRX:A56E
  1376.       Top             =   1200
  1377.       Visible         =   0   'False
  1378.       Width           =   480
  1379.    End
  1380.    Begin Image ImgKnight 
  1381.       Enabled         =   0   'False
  1382.       Height          =   480
  1383.       Index           =   9
  1384.       Left            =   6480
  1385.       Picture         =   KNIGHT.FRX:A870
  1386.       Top             =   1200
  1387.       Visible         =   0   'False
  1388.       Width           =   480
  1389.    End
  1390.    Begin Image ImgKnight 
  1391.       Enabled         =   0   'False
  1392.       Height          =   480
  1393.       Index           =   8
  1394.       Left            =   9840
  1395.       Picture         =   KNIGHT.FRX:AB72
  1396.       Top             =   720
  1397.       Visible         =   0   'False
  1398.       Width           =   480
  1399.    End
  1400.    Begin Image ImgKnight 
  1401.       Enabled         =   0   'False
  1402.       Height          =   480
  1403.       Index           =   7
  1404.       Left            =   9360
  1405.       Picture         =   KNIGHT.FRX:AE74
  1406.       Top             =   720
  1407.       Visible         =   0   'False
  1408.       Width           =   480
  1409.    End
  1410.    Begin Image ImgKnight 
  1411.       Enabled         =   0   'False
  1412.       Height          =   480
  1413.       Index           =   6
  1414.       Left            =   8880
  1415.       Picture         =   KNIGHT.FRX:B176
  1416.       Top             =   720
  1417.       Visible         =   0   'False
  1418.       Width           =   480
  1419.    End
  1420.    Begin Image ImgKnight 
  1421.       Enabled         =   0   'False
  1422.       Height          =   480
  1423.       Index           =   5
  1424.       Left            =   8400
  1425.       Picture         =   KNIGHT.FRX:B478
  1426.       Top             =   720
  1427.       Visible         =   0   'False
  1428.       Width           =   480
  1429.    End
  1430.    Begin Image ImgKnight 
  1431.       Enabled         =   0   'False
  1432.       Height          =   480
  1433.       Index           =   4
  1434.       Left            =   7920
  1435.       Picture         =   KNIGHT.FRX:B77A
  1436.       Top             =   720
  1437.       Visible         =   0   'False
  1438.       Width           =   480
  1439.    End
  1440.    Begin Image ImgKnight 
  1441.       Enabled         =   0   'False
  1442.       Height          =   480
  1443.       Index           =   3
  1444.       Left            =   7440
  1445.       Picture         =   KNIGHT.FRX:BA7C
  1446.       Top             =   720
  1447.       Visible         =   0   'False
  1448.       Width           =   480
  1449.    End
  1450.    Begin Image ImgKnight 
  1451.       Enabled         =   0   'False
  1452.       Height          =   480
  1453.       Index           =   2
  1454.       Left            =   6960
  1455.       Picture         =   KNIGHT.FRX:BD7E
  1456.       Top             =   720
  1457.       Visible         =   0   'False
  1458.       Width           =   480
  1459.    End
  1460.    Begin Image ImgKnight 
  1461.       Enabled         =   0   'False
  1462.       Height          =   480
  1463.       Index           =   1
  1464.       Left            =   6480
  1465.       Picture         =   KNIGHT.FRX:C080
  1466.       Top             =   720
  1467.       Visible         =   0   'False
  1468.       Width           =   480
  1469.    End
  1470.    Begin Image ImgKnight 
  1471.       Enabled         =   0   'False
  1472.       Height          =   480
  1473.       Index           =   0
  1474.       Left            =   6480
  1475.       Picture         =   KNIGHT.FRX:C382
  1476.       Top             =   120
  1477.       Visible         =   0   'False
  1478.       Width           =   480
  1479.    End
  1480.    Begin Label Label2 
  1481.       BackColor       =   &H00008080&
  1482.       Caption         =   "By: Michael Sheldrake"
  1483.       Height          =   255
  1484.       Left            =   240
  1485.       TabIndex        =   67
  1486.       Top             =   4680
  1487.       Width           =   2175
  1488.    End
  1489.    Begin Label Label3 
  1490.       BackColor       =   &H00008080&
  1491.       Caption         =   "Click on Any Square to Begin the Knight's Tour"
  1492.       Enabled         =   0   'False
  1493.       ForeColor       =   &H00000000&
  1494.       Height          =   2535
  1495.       Left            =   4440
  1496.       TabIndex        =   66
  1497.       Top             =   840
  1498.       Width           =   1335
  1499.    End
  1500.    Begin Label Label1 
  1501.       Alignment       =   2  'Center
  1502.       BackColor       =   &H00008080&
  1503.       BorderStyle     =   1  'Fixed Single
  1504.       Caption         =   "Knight's Tour  "
  1505.       Enabled         =   0   'False
  1506.       FontBold        =   -1  'True
  1507.       FontItalic      =   0   'False
  1508.       FontName        =   "Times New Roman"
  1509.       FontSize        =   24
  1510.       FontStrikethru  =   0   'False
  1511.       FontUnderline   =   0   'False
  1512.       ForeColor       =   &H00000000&
  1513.       Height          =   5055
  1514.       Left            =   0
  1515.       TabIndex        =   0
  1516.       Top             =   0
  1517.       Width           =   6135
  1518.    End
  1519.    Begin Menu mnuFile 
  1520.       Caption         =   "&File"
  1521.       Begin Menu mnuFLoad 
  1522.          Caption         =   "&Load Board"
  1523.       End
  1524.       Begin Menu mnuFSave 
  1525.          Caption         =   "&Save Board"
  1526.       End
  1527.       Begin Menu mnuFSep 
  1528.          Caption         =   "-"
  1529.       End
  1530.       Begin Menu mnuFExit 
  1531.          Caption         =   "E&xit"
  1532.       End
  1533.    End
  1534. End
  1535. DefInt A-Z
  1536. Dim Mv, MvX, LoMv, Walks#, Prunes#, Finds#, Matrix(10, 64)
  1537. Dim Drc(2, 8), Quad(8), State, DeltaTime!, StartTime!
  1538.  
  1539. Sub Board_Click (Index As Integer)
  1540.  
  1541.   If Index <> 0 Then ' ***** Clear Matrix & Board *****
  1542.     If State = 1 Then       ' Another iteration active??
  1543.       State = 2             ' Yes, tell him to quit
  1544.       Do                    ' Wait for Other iteration to Quit
  1545.         DoEvents
  1546.       Loop Until State = 0
  1547.     End If
  1548.     For i = 1 To 64
  1549.       Board(i).Picture = LoadPicture("")
  1550.       Matrix(1, i) = 0
  1551.       Matrix(2, i) = 0
  1552.       For j = 3 To 10
  1553.         Matrix(j, i) = Abs(Matrix(j, i))
  1554.       Next j
  1555.     Next i
  1556.     Mv = 1
  1557.     LoMv = 64
  1558.     MvX = Index
  1559.     Matrix(1, MvX) = Mv
  1560.     Walks# = 1
  1561.     Prunes# = 0
  1562.     Finds# = 0
  1563.     DeltaTime! = 0
  1564.     State = 1
  1565.   End If
  1566.  
  1567.   If State = 1 Then   ' ***** Find Solution *****
  1568.  
  1569.     For i = 1 To 64
  1570.       Board(i).Enabled = False
  1571.     Next i
  1572.     Button.Caption = "Stop"
  1573.     Button.Enabled = True
  1574.     StatsTimer.Enabled = True
  1575.     StartTime! = Timer
  1576.     Call StatsTimer_Timer
  1577.      
  1578.     Do Until Mv >= 64 Or State <> 1 ' Solution is Found <or> Button is Clicked
  1579.       Found = 0
  1580.       fx = 3
  1581.       Do While fx <= 10 And Found = 0   ' More Links??
  1582.         fl = Matrix(fx, MvX)              ' Get Forward Link
  1583.         If fl > 0 Then                  ' Is Link Seen/Used??
  1584.           Matrix(fx, MvX) = -1 * fl         ' Mark Link as Seen
  1585.           If Matrix(1, fl) = 0 Then       ' Is Forward Link Free??
  1586.             Found = 1                       ' Found a Move
  1587.             ffx = 3
  1588.             Do While ffx <= 10 And Found = 1    ' Look for Dead Branches to Prune
  1589.               ffl = Matrix(ffx, fl)
  1590.               If ffl > 0 Then
  1591.                 If Matrix(1, ffl) = 0 Then
  1592.                   free = 0
  1593.                   fffx = 3
  1594.                   Do While fffx <= 10 And free < 2
  1595.                     fffl = Matrix(fffx, ffl)
  1596.                     If fffl > 0 Then
  1597.                       If Matrix(1, fffl) = 0 Then
  1598.                         free = free + 1
  1599.                       End If
  1600.                     End If
  1601.                     fffx = fffx + 1
  1602.                   Loop
  1603.                   If free < 2 And Mv < 62 Then   ' Need to Prune this branch??
  1604.                     Found = 0
  1605.                     Prunes# = Prunes# + 1
  1606.                   End If
  1607.                 End If
  1608.               End If
  1609.               ffx = ffx + 1
  1610.             Loop
  1611.           End If
  1612.         End If
  1613.         
  1614.         If LoMv > Mv Then
  1615.           LoMv = Mv
  1616.         End If
  1617.  
  1618.         If Found = 1 Then      ' Walk Forward??
  1619.           Board(MvX).Picture = ImgKnight(Mv).Picture
  1620.           Mv = Mv + 1             ' Bump mv(Branch Level)
  1621.           Matrix(1, fl) = Mv      ' Set mv Number
  1622.           Matrix(2, fl) = MvX       ' Set BackLink
  1623.           MvX = fl                  ' Forward Link is New mv
  1624.           If Mv >= 64 Then
  1625.             Finds# = Finds# + 1
  1626.           End If
  1627.         End If
  1628.  
  1629.         fx = fx + 1               ' Bump Link
  1630.       Loop
  1631.  
  1632.       Walks# = Walks# + 1
  1633.  
  1634.       If Mv >= 64 Then
  1635.         Solution = 64
  1636.         For i = 3 To 10
  1637.           If Matrix(1, Matrix(i, MvX)) = 1 Then
  1638.             Solution = 0
  1639.           End If
  1640.         Next i
  1641.         If StopBox.Value = 0 Or (StopBox.Value = 1 And Solution = 0) Then
  1642.           StatsTimer.Enabled = False
  1643.           Call StatsTimer_Timer
  1644.           Board(MvX).Picture = ImgKnight(Solution).Picture
  1645.           For i = 1 To 64
  1646.             Board(i).Enabled = True
  1647.           Next i
  1648.           LoMv = 64: State = 0
  1649.           Button.Caption = "Find Next"
  1650.         End If
  1651.         Found = 0
  1652.       End If
  1653.       
  1654.       Do
  1655.         DoEvents   ' Let Others use CPU!!!
  1656.       Loop Until State <> 0  ' Wait for Find Next button click
  1657.       If StatsTimer.Enabled = False Then
  1658.         StatsTimer.Enabled = True
  1659.         StartTime! = Timer
  1660.       End If
  1661.       
  1662.       If Found = 0 Then                             ' Walk back??
  1663.         Board(MvX).Picture = LoadPicture("")
  1664.         Matrix(1, MvX) = 0                          ' Clear mv Number
  1665.         For i = 3 To 10
  1666.           Matrix(i, MvX) = Abs(Matrix(i, MvX))      ' Reset Link Flags
  1667.         Next i
  1668.         MvX = Matrix(2, MvX)                        ' Backup a Branch
  1669.         Mv = Mv - 1
  1670.       End If
  1671.        
  1672.     Loop ' find next move
  1673.  
  1674.   End If
  1675.   StatsTimer.Enabled = False
  1676.   Call StatsTimer_Timer
  1677.   For i = 1 To 64
  1678.     Board(i).Enabled = True
  1679.   Next i
  1680.   Button.Caption = "Resume"
  1681.   State = 0
  1682.   
  1683. End Sub
  1684.  
  1685. Sub Button_Click ()
  1686.   If Button.Caption = "Stop" Then
  1687.     State = 2
  1688.   ElseIf Button.Caption = "Resume" Then
  1689.     State = 1
  1690.     Call Board_Click(0)
  1691.   ElseIf Button.Caption = "Find Next" Then
  1692.     Button.Caption = "Stop"
  1693.     For i = 1 To 64
  1694.       Board(i).Enabled = False
  1695.     Next i
  1696.     State = 1
  1697.   End If
  1698. End Sub
  1699.  
  1700. Sub Form_Load ()
  1701.   
  1702.   Screen.MousePointer = 11
  1703.   Knight.Top = (Screen.Height - Knight.Height) / 2
  1704.   Knight.Left = (Screen.Width - Knight.Width) / 2
  1705.   Knight.Show
  1706.  
  1707.   '************************* Build Matrix ********************************
  1708.    
  1709.   ' Directions Lower Numbers First      ' Directions & Quadrants (purely arbitrary)
  1710.   ' Delta Row         Delta Col         '  q1 | 1 |   | 2 | q2
  1711.   Drc(1, 1) = -2: Drc(2, 1) = -1        '  -------------------
  1712.   Drc(1, 2) = -2: Drc(2, 2) = 1         '   8 |   |   |   | 3
  1713.   Drc(1, 3) = -1: Drc(2, 3) = 2         '  -------------------
  1714.   Drc(1, 4) = 1:  Drc(2, 4) = 2         '     |   | K |   |
  1715.   Drc(1, 5) = 2:  Drc(2, 5) = 1         '  -------------------
  1716.   Drc(1, 6) = 2:  Drc(2, 6) = -1        '   7 |   |   |   | 4
  1717.   Drc(1, 7) = 1:  Drc(2, 7) = -2        '  -------------------
  1718.   Drc(1, 8) = -1: Drc(2, 8) = -2        '  q4 | 6 |   | 5 | q3
  1719.     
  1720.   For sq = 1 To 64
  1721.     MvX = 3
  1722.     r = Fix((sq - 1) / 8) + 1
  1723.     c = ((sq - 1) Mod 8) + 1
  1724.  
  1725.     ' Corner Weighting based on Quadrant
  1726.     If r <= 4 And c <= 4 Then
  1727.       Quad(1) = 1: Quad(2) = 8: Quad(3) = 2: Quad(4) = 7: Quad(5) = 6: Quad(6) = 3: Quad(7) = 5: Quad(8) = 4
  1728.     ElseIf r <= 4 And c > 4 Then
  1729.       Quad(1) = 3: Quad(2) = 2: Quad(3) = 4: Quad(4) = 1: Quad(5) = 8: Quad(6) = 5: Quad(7) = 7: Quad(8) = 6
  1730.     ElseIf r > 4 And c > 4 Then
  1731.       Quad(1) = 5: Quad(2) = 4: Quad(3) = 6: Quad(4) = 3: Quad(5) = 2: Quad(6) = 7: Quad(7) = 1: Quad(8) = 8
  1732.     Else
  1733.       Quad(1) = 7: Quad(2) = 6: Quad(3) = 8: Quad(4) = 5: Quad(5) = 4: Quad(6) = 1: Quad(7) = 3: Quad(8) = 2
  1734.     End If
  1735.  
  1736.     ' Build Matrix of valid Knight mvs using Corner Weighting.
  1737.     For d = 1 To 8 ' Max possible eight mv from any starting location.
  1738.       New_R = r + Drc(1, Quad(d))
  1739.       New_C = c + Drc(2, Quad(d))
  1740.       If New_R > 0 And New_R < 9 Then
  1741.         If New_C > 0 And New_C < 9 Then
  1742.           Matrix(MvX, sq) = (New_R - 1) * 8 + New_C
  1743.           MvX = MvX + 1
  1744.         End If
  1745.       End If
  1746.     Next d
  1747.    
  1748.     Do ' Weight the squares with the least links first
  1749.       a = 3
  1750.       b = 4
  1751.       Found = 0
  1752.       Do While b <= 10
  1753.         If Matrix(b, sq) > 0 Then
  1754.           If Board(Matrix(a, sq)).Tag > Board(Matrix(b, sq)).Tag Then
  1755.             Found = 1
  1756.             c = Matrix(a, sq)
  1757.             Matrix(a, sq) = Matrix(b, sq)
  1758.             Matrix(b, sq) = c
  1759.           End If
  1760.         End If
  1761.         a = a + 1
  1762.         b = a + 1
  1763.       Loop
  1764.     Loop While Found = 1
  1765.     
  1766.   Next sq
  1767.  
  1768.   Screen.MousePointer = 1
  1769.   State = 0
  1770.  
  1771. End Sub
  1772.  
  1773. Sub mnuFExit_Click ()
  1774.   End
  1775. End Sub
  1776.  
  1777. Sub mnuFLoad_Click ()
  1778.     
  1779.   State = 2
  1780.   DoEvents
  1781.   
  1782.   Filter1$ = "Knight Files" + Chr$(0) + "*.brd" + Chr$(0)
  1783.   Filter2$ = "Text Files" + Chr$(0) + "*.*" + Chr$(0)
  1784.   Filter$ = Filter1$ + Filter2$ + Chr$(0)
  1785.   Index% = 1
  1786.   Flags& = OFN_FILEMUSTEXIST Or OFN_HIDEREADONLY Or OFN_PATHMUSTEXIST
  1787.   IDir$ = CurDir$ + Chr$(0)
  1788.   Title$ = "Load Board Position" + Chr$(0)
  1789.     
  1790.   File$ = OpenFile$(Knight, Status%, FError&, Filter$, IDir$, Title$, Index%, Flags&)
  1791.   
  1792.   If FError& <> 0 Then
  1793.     Msg$ = CmdError$(x&)
  1794.     MsgBox Msg$, 32, "Open"
  1795.   ElseIf File$ <> "" Then
  1796.     CV = 0
  1797.     Open File$ For Input As 1
  1798.     Input #1, Mv, MvX, LoMv, Walks#, Prunes#, Finds#, CV, DeltaTime!
  1799.     For i = 1 To 64
  1800.       Input #1, Matrix(1, i), Matrix(2, i), Matrix(3, i), Matrix(4, i), Matrix(5, i), Matrix(6, i), Matrix(7, i), Matrix(8, i), Matrix(9, i), Matrix(10, i)
  1801.       If Matrix(1, i) <= 0 Then
  1802.         Board(i).Picture = LoadPicture("")
  1803.       Else
  1804.         Board(i).Picture = ImgKnight(Matrix(1, i)).Picture
  1805.       End If
  1806.     Next i
  1807.     Close #1
  1808.     StopBox.Value = CV
  1809.     StartTime! = 0
  1810.     Call StatsTimer_Timer
  1811.     Button.Visible = True
  1812.     Button.Caption = "Resume"
  1813.   End If
  1814.     
  1815. End Sub
  1816.  
  1817. Sub mnuFSave_Click ()
  1818.     
  1819.   State = 2
  1820.   DoEvents
  1821.   
  1822.   For i = 1 To 64
  1823.     If Matrix(1, i) = 1 Then FileN = i
  1824.   Next i
  1825.  
  1826.   Filter1$ = "Knight Files" + Chr$(0) + "*.brd" + Chr$(0)
  1827.   Filter2$ = "All Files" + Chr$(0) + "*.*" + Chr$(0) + Chr$(0)
  1828.   Filter$ = Filter1$ + Filter2$ + Chr$(0)
  1829.   IDir$ = CurDir$ + Chr$(0)
  1830.   FileMask$ = "Knight" & Format$(FileN, "00") & ".brd"
  1831.   Title$ = "Save Board Position" + Chr$(0)
  1832.   Index% = 1
  1833.   Flags& = OFN_HIDEREADONLY Or OFN_PATHMUSTEXIST
  1834.   
  1835.   File$ = SaveFile$(Knight, Status%, FError&, Filter$, IDir$, FileMask$, Index%, Title$, Flags&)
  1836.   
  1837.   If FError& <> 0 Then
  1838.     Msg$ = CmdError$(x&)
  1839.     MsgBox Msg$, 32, "Save Error"
  1840.   ElseIf File$ <> "" Then
  1841.     CV = StopBox.Value
  1842.     Open File$ For Output As 1
  1843.     Write #1, Mv, MvX, LoMv, Walks#, Prunes#, Finds#, CV, DeltaTime!
  1844.     For i = 1 To 64
  1845.       Write #1, Matrix(1, i), Matrix(2, i), Matrix(3, i), Matrix(4, i), Matrix(5, i), Matrix(6, i), Matrix(7, i), Matrix(8, i), Matrix(9, i), Matrix(10, i)
  1846.     Next i
  1847.     Close #1
  1848.     MsgBox "Board Position Saved", 64, "Knight"
  1849.   End If
  1850.   
  1851. End Sub
  1852.  
  1853. Sub StatsTimer_Timer ()
  1854.   If StartTime! > 0 Then
  1855.     EndTime! = Timer
  1856.     DeltaTime! = DeltaTime! + (EndTime! - StartTime!)
  1857.     StartTime! = EndTime!
  1858.   End If
  1859.   Stats$ = "Move:  " & Format$(Mv, "00") & Chr$(13)
  1860.   Stats$ = Stats$ & "Low:    " & Format$(LoMv, "00") & Chr$(13)
  1861.   Stats$ = Stats$ & "Seconds:   " & Format$(DeltaTime!, "#####0.00") & Chr$(13) & Chr$(13)
  1862.   Stats$ = Stats$ & "Solutions: " & Format$(Finds#, "00000000") & Chr$(13)
  1863.   Stats$ = Stats$ & "Walks: " & Format$(Walks#, "00000000") & Chr$(13)
  1864.   Stats$ = Stats$ & "Prunes: " & Format$(Prunes#, "00000000")
  1865.   Label3.Caption = Stats$
  1866. End Sub
  1867.  
  1868. Sub StopBox_Click ()
  1869.  
  1870.   If StopBox.Enabled = True Then
  1871.     StopBox.Enabled = False
  1872.     If StopBox.Tag = 2 Then
  1873.       StopBox.Value = 0
  1874.       StopBox.Caption = "Any Solution"
  1875.     ElseIf StopBox.Tag = 0 Then
  1876.       StopBox.Value = 1
  1877.       StopBox.Caption = "Circular Only"
  1878.     ElseIf StopBox.Tag = 1 Then
  1879.       StopBox.Value = 2
  1880.       StopBox.Caption = "Continuous"
  1881.     End If
  1882.     StopBox.Tag = StopBox.Value
  1883.     StopBox.Enabled = True
  1884.   End If
  1885.  
  1886. End Sub
  1887.  
  1888.