home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Development / AmigaTalk / c / InitializeCommands < prev    next >
Encoding:
Text File  |  2004-01-31  |  755 b   |  26 lines
  1. nar <- Narrator new
  2.  
  3. nar setVolume: 64
  4. nar setSex:    1
  5. nar setPitch:  100
  6. nar setMode:   'natural'
  7.  
  8. nar speak: 'Hello there. Be sure to read the hizztory dot guide file for the late-tist information'
  9.  
  10. intuition    <- Intuition    new
  11. '      Intuition    instantiated as "intuition"' print
  12. dosFlags     <- DosFlags     new
  13. '      DosFlags     instantiated as "dosFlags"' print
  14. dataTypeTags <- DataTypeTags new
  15. '      DataTypeTags instantiated as "dataTypeTags"' print
  16. boopsiTags   <- BoopsiTags   new
  17. '      BoopsiTags   instantiated as "boopsiTags"' print
  18. printerFlags <- PrinterFlags new
  19. '      PrinterFlags instantiated as "printerFlags"' print
  20.  
  21. '      Done with InitializeScript!' print
  22.  
  23. nar speak: 'Now write some great programs with me!'
  24.  
  25. nar close
  26.