home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / basic / library / vb / games / fuzzy / fuzzgame.frm (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1993-09-06  |  9.2 KB  |  159 lines
  1. fuzzgame
  2. FuzzGame
  3. Form1
  4. Image2
  5. Image1
  6. Picture1
  7. Timer1
  8. quitbutton
  9. playbutton
  10. Label2
  11. Label1
  12.     Form_Load
  13. count
  14. Timer1_Timer
  15. playbutton_Click
  16. quitbutton_Click
  17. Image1_Click
  18. Image1_DragDrop
  19. Source
  20. Control-
  21. fb_Click
  22. Index7
  23. Image1_DblClick{
  24. label1G
  25. Caption
  26. counttR
  27. Image2_Click
  28. pheight-
  29. pwidth
  30. picture1
  31. Width
  32. Height
  33. Image18
  34. playbutton#
  35. cntplus6
  36. AirPosH
  37. AirPosVz
  38. AirVar
  39. Picture1_Click
  40. Bombx
  41. Bomby
  42. Picture1_MouseDown
  43. Button
  44. ShiftD
  45. OKtoRecord
  46. LRstep
  47. UDstepX
  48. UDdist
  49. LRdistR
  50. distance
  51. MINUS
  52. sincel
  53. IntegerLRstep
  54.     BombsAway
  55. BobsAway
  56. Image2
  57. bcnt.
  58. flaseA
  59. nada%
  60. picure1
  61. I1leftq
  62. I1top
  63. I2left
  64. I2top^
  65. putimagesback
  66. endroutine
  67. ourdir
  68. readvars
  69.     fuzzspeed1
  70. gLeft
  71. gRight
  72. gLeftA
  73. gRightA
  74. gType
  75.     totalsetsL
  76. InputDataTest
  77.     INPUTDATAl
  78. Membership
  79. BaseL
  80. BaseRy
  81. RatioL
  82. RatioRb
  83.     InputTest
  84. State
  85. Tester
  86.     PlaceHold
  87. ourfile
  88. fuzzpeed
  89. AbsoluteDistance
  90. Label2
  91. fuzzdata
  92. printer
  93. AirposY
  94.  "global" variables
  95.  current count
  96.  current bomb position count
  97.  next legal count triggerR
  98.  Horiz Aircraft posr
  99.  Vert Aircraft pos
  100.  OK to move Aircraft boolean
  101.  bomb position array
  102.  ditto
  103.  OK to act on crosshair click booleane
  104.  boolean trigger for bomb movement
  105.  how many movement steps for bombl
  106.  This code was produced by FUZZGEN, the Fuzzy
  107.  Logic Code Generator from Alston Software Labs.
  108.  The File fuzzgame.VAR contains the 
  109.  variable list used...
  110.   Dimension arrays to hold the variable info in.
  111.   The number 10 is the maximum number of decisions
  112.   that can be used. You can adjust this number down
  113.   to the actual number if space is tight...b
  114. distance
  115. endroutine
  116.  put images back into neutral posp
  117.  reset flags
  118.  aircraft wasn't hit...n
  119. Last Proximity: 
  120.  twips / 2
  121.  reset last recorded mousedown pos.
  122.  force nexts
  123. Form_Load
  124. InputDataTest
  125.   The following routine tests the inputs
  126.   You may want to rename it if you are using multiple
  127.   FL decisions from this product...a
  128.  Boolean
  129.  triangular
  130.  left of apex
  131.  trapezoidal
  132. InputTest
  133. Picture1_MouseDown
  134.  The MouseDown event is used because it contains position variables.
  135.  distance from 0
  136.  how many units/distance
  137.  (All moves are 20,so we need'
  138.   to figure how many are required.)i
  139.  picture bottom 
  140.  now fill array with
  141.  valid positions
  142.  Use MINUS since we have
  143.  to reverse it. 
  144.  The L->R step is based on the number of steps taken up and down.
  145.  This allows the bomb to arrive in both axes simultaneously. Note
  146.  that we don't have to invert the numbers since Y coordinates are
  147. -> ...n
  148.  start at 0 
  149.  fill the array'
  150. playbutton_Click
  151. Speed 
  152. quitbutton_Click
  153. readvars
  154. fuzzgame.var
  155. Timer1_Timer
  156.  new positione
  157.  still moving
  158.  it has reached the endg
  159.