home *** CD-ROM | disk | FTP | other *** search
/ Logiciels PC 23 / LogicielsPC_23.iso / Educ / Moza / aide.bas < prev    next >
BASIC Source File  |  2000-07-26  |  2KB  |  50 lines
  1. 'Aide de Moza∩k
  2. nomainwin
  3. statictext #aide, "Appuyez sur un des boutons pour avoir de l'aide", 47, 10 ,400, 32
  4. bmpbutton #aide.rouge, "boutons\rouge.bmp",[ableu], UL, 10, 47
  5. bmpbutton #aide.demi, "boutons\demi.bmp",[ademi], UL, 10, 84
  6. bmpbutton #aide.tourner, "boutons\tourner.bmp", [atourner], UL, 10, 121
  7. bmpbutton #aide.quit, "boutons\quit.bmp", [aquit], UL, 10, 158
  8. bmpbutton #aide.gomme, "boutons\gomme.bmp", [agomme], UL, 10, 195
  9. bmpbutton #aide.aide, "boutons\aide.bmp", [aaide], UL, 10, 232
  10. bmpbutton #aide.oups, "boutons\oups.bmp", [aoups], UL, 10, 269
  11. bmpbutton #aide.grille, "boutons\grille.bmp", [agrille], UL, 10, 306
  12. bmpbutton #aide.pagrille, "boutons\pagrille.bmp", [apagrille], UL, 10, 343
  13. bmpbutton #aide.avant, "boutons\avant.bmp", [aavant], UL, 10, 380
  14. bmpbutton #aide.apres, "boutons\apres.bmp", [aapres], UL, 10, 417
  15. texteditor #aide.texte, 47, 47, 400, 400
  16. 'graphicbox #aide.modele, 697, 176, 64, 50 'modele
  17. button #aide.quitter, "Sortir", [quitterAide], UL, 10, 454
  18.  
  19. WindowWidth = 500
  20. WindowHeight = 550
  21. open "Aide de Moza∩k" for window as #aide
  22. [a]
  23. input a$
  24.  
  25. [ableu]
  26. print #aide.texte, "!cls";
  27. print #aide.texte, "En cliquant sur les boutons de couleurs"; chr$(13); "vous pouvez modifier les couleurs"; chr$(13); "de la piΦce active"
  28. print #aide.texte, "PremiΦre colonne : couleur de la forme"
  29. print #aide.texte, "DeuxiΦme colonne : couleur du fond"
  30. goto [a]
  31.  
  32. [ademi]
  33. print #aide.texte, "!cls";
  34. print #aide.texte, "En cliquant sur un des boutons forme vous pouvez "; chr$(13); "changer la forme active"
  35. goto [a]
  36.  
  37. [atourner]
  38. print #aide.texte, "!cls";
  39. print #aide.texte, "Fait tourner la piΦce active"
  40. print #aide.texte, "d'un 1/4 de tour vers la droite"
  41. print #aide.texte, "Vous pouvez aussi le faire avec"
  42. print #aide.texte, "un click du bouton droit dans la zone de dessin"
  43. goto [a]
  44.  
  45. [quitterAide]
  46. close #aide
  47. end
  48.  
  49.  
  50.