home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_2 / WALDO / WALDO_F.FRM (.txt) next >
Encoding:
Visual Basic Form  |  1995-03-18  |  59.0 KB  |  62 lines
  1. WALDO_F
  2. WHERE'S WALDO?
  3. Form1%
  4. Picture4
  5. Picture3
  6. wwwwwwww
  7. qwwwq
  8. wwwwwwww
  9. |wwww|ww
  10. wwwwwwwwwww
  11. wwwww
  12. Picture2
  13. wqwqq
  14. wwwwqww
  15. |wwqww
  16. wwwwwwwwwwww
  17. wwwwww
  18. Picture1
  19. wwwwwwww
  20. wwwwwwww
  21. wwwwqw
  22. wwwwwwwwwww
  23. wwwww
  24. Timer1
  25. Form_Click
  26. picture1
  27. Visible
  28. Picture4
  29. Picture
  30. picture2
  31. picture3
  32. Picture4_Click
  33. Waldo
  34. Form1
  35. Timer1_Timer
  36. WALDO_F
  37. Picture1_Click
  38. Timer1_Timer
  39. Show the main form after small pause
  40. Run WALDO sub routine of animation
  41. End of program
  42. Waldo
  43. This Sub uses three pictures of Waldo and one empty picture boxg
  44. Set all picture boxes Resize property to True with no bordersr
  45. Make sure that your Form Background color matches the background of your artwork
  46. Declaration of animation section
  47. Runs this loop 6 times  
  48. Shows picture #4
  49. put Pic1 in Pic4
  50. Move Pic4 to the right to simulate walking
  51. Show #2 
  52. Move again
  53. Show #3o
  54. Show #2 Againa
  55. Show #1o
  56. Repeat
  57. Hide Pic4 when finishedi
  58. Reset Pic4 to Far Left of Form
  59. Close the Form
  60. End the Programs
  61. To increase speed of animation, change 400 to 600 etc.
  62.