home *** CD-ROM | disk | FTP | other *** search
/ Falcon 030 Power 2 / F030_POWER2.iso / ST_STE / MAGS / STOSBTS1.ARJ / stosbts1.msa / DATA / HORIZ.DAT < prev    next >
Text File  |  1987-04-22  |  817b  |  23 lines
  1. Eddie has done it at last, the first ever HORIZONTAL WOBBLER, written 
  2. in STOS, yes its true,using the facts about the SCREEN COPY 
  3. command (read the article on the message code), I have been able 
  4. to code a sine wave wobbler that wobbles horizontally, until now 
  5. this has been impossible because STOS rounds down the destination 
  6. X co-ords to the nearest 16 bit boundary.
  7.  This is how it works:
  8.  
  9. First of all a sine table is created using.
  10.  DIM Y(730)
  11.  FOR K=1 TO 720
  12.      ANGLE#=RAD(K)
  13.      Y(K)=100+SIN(ANGLE#)*30
  14.  NEXT K
  15.  
  16. The routine then grabs 3 scan lines at a time from to source 
  17. picture, at x X co-ords of y(??) and displays then on the 
  18. physical screen at 0,0+Scanlines, as ?? increases so the picture 
  19. flows back and forth across the screen. Not bad eh????
  20.  
  21. EB21101990 Yeah........
  22. }
  23.