home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / STOSBTS2.ARJ / stosbts2.msa / DATA / RESET1.DAT < prev    next >
Text File  |  1987-04-22  |  2KB  |  37 lines

  1. My god!! he's back at last, now after 6-8 weeks of not doing any 
  2. articles for the ne new issue of BITS, Eddie of the Happening 
  3. Boiz is back, this time its only a short piece, this article is 
  4. going to introduce the use of RESET routines in STOS programs, 
  5. everybody knows that almost all demos have reset demos, so when 
  6. you try a quit from the main demo, you get another screen, which 
  7. you can't get out of, the routine in this article is only very 
  8. simple, it just displays a screen!!, boring I know but 
  9. music,noving sprites comes later, much later!, now onto the STOS 
  10. source.....
  11.  
  12. Lines 70 - 210 these just set up the screen, get the palette of 
  13. screen 15, reserve 32 bytes for the palette, then the palette of 
  14. screen 15 is pushed into the 16 words in bank 2 using the DOKE, 
  15. and DEEK commands.
  16.  
  17. Line 250 - AREG(0) is set to point at start(15) - this is the 
  18. address of the picture data we want to display when the reset 
  19. button is pressed.
  20.  
  21. Line 260 - AREG(1) is set to point at the palette data in bank 2, 
  22. eg AREG(1)=start(2), simple eh??
  23.  
  24. Line 270 - CALL 1 , this is the machine code program that I 
  25. wrote, this inititilises the reset routine, stores the position 
  26. of the picture data, and paltte data, and returns.
  27.  
  28. Now when you press the button, you will get you picture on the 
  29. screen!!!, remember, if you erase bank 15 or 2, AFTER the routine 
  30. has been called, then when activated the computer MAY crash, also 
  31. sometimes when you press reset the planes of the picture are 
  32. shifted across, so the colours are all messed up,this can be 
  33. cured by pressing it again!
  34.  
  35. Well thats it for this article..............Eddie 21 Oct '91
  36.  
  37.