home *** CD-ROM | disk | FTP | other *** search
/ Fujiology Archive / fujiology_archive_v1_0.iso / S / SHAPESFT / SSSOURCE.ZIP / SSSOURCE.MSA / EXAMPLE / TUNES.DOC < prev   
Encoding:
Text File  |  1985-11-20  |  1.2 KB  |  90 lines
  1.  
  2.  
  3.  
  4.  
  5.    canticle.prg & canticl2.prg
  6.  
  7.          o-O-o
  8.  
  9.    Both run as vbls in slot 2.
  10.  
  11.  If included in an auto folder or
  12.  'launched' from your program the
  13.  tunes can be disabled by....
  14.     
  15.      CLR.L $4CE+4 
  16.  
  17.  ; make silence
  18.  
  19.  ;waitvbl, then...
  20.  
  21.     move.l #$8000000,$ff8800 
  22.     move.l #$9000000,$ff8800 
  23.     move.l #$a000000,$ff8800 
  24.  
  25.  
  26.  Obviously, if you wish to re-enable
  27.  you must... 
  28.     MOVE.L $4CE+4,TUNE 
  29.  beforehand.
  30.  
  31.  and... 
  32.     MOVE.L TUNE,$4CE+4
  33.  to restart.
  34.  
  35.  If your prog installs a new vbl then
  36.  non of the above will be relevent.
  37.  
  38.  The tunes can also be 'run' by....
  39.  
  40.  MOVE.L $4CE+4,A0
  41.  
  42.  and JSR (A0)  
  43.  
  44.  every 50th of a second. (no registers
  45.  are saved by the tunes, so you must
  46.  do this yourself, if required.)
  47.  
  48. All this for the benefit of....
  49.  
  50.     *-*-*-*-*
  51. All those who seem not to know.
  52.  
  53. Those who want to know.
  54.  
  55. Those who don't want to know, but must
  56.  
  57. Those who think they know.
  58.  
  59. The Tommyknockers. (konig)
  60.  
  61. The Happenin' Boiz. (lpoke $4ce+4,0)
  62.  
  63. Those who face the dilemma.
  64.  
  65.  
  66.     *-*-*-*-*
  67.  
  68.  Them as knows, knows and them as
  69.  thinks they knows, knows nowt.
  70.  
  71.  
  72.  Keep on rockin' in the free world.
  73.  
  74.      GOTH.
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.     
  88.  
  89.  
  90.