-. COYLIADNTSINCNDATHAST  HHOPART BY RAY WEIR GRAPHICS DEMO WITH SCROLLING ##27 COLORS, DISPLAY INTERRUPTS 44FAST SINE FUNCTION IN ASSEMBLY LANGUAGESSGRAPHICS 7+ (160X192). IT TAKES 16K RAM TO HOLD 2 SCREENS OF THAT RESOLUTION.DDTHE DISPLAY LIST IS END AROUND ROTATED FOR VERTICLE SCROLLING.33(+}LETS SEE THE APPLE ][ OR APPLE III DO THISWHAT GOOD IS IT?,,($CAUTION BOOT WITH 850 INTERFACE OFF6( INTERRUPTS CONFLICT6(PLEASE WAIT 2 MINUTES()MEMORY MAP*JJ19000- HORIZONTAL SCROLE 42 REM 19200- VERTICLE SCROLE ROUTINE+##21000- D.L. INTERRUPT ROUTINE,21400- X FUNCTION TABLE-21656- Y FUNCTION TABLE.22000- FIGURE SUBROUTINE/ 23808- GR. 7+ DISPLAY LIST024567- DISPLAY RAM12BB A7F #B B@#6-B&#0 B<6-B F B86-B B;6-B B<6-B B> A INIT $CBACOLOR ROLL TABLESC::9 SETS OF SHADOW COLOR REGISTERS AND BACKGROUNDF-@H$$B%P:@$%@,J$$B %P:@$%@T,L::B@%P:@$P:@$H:,,%@P$,P Z96-?:B ,$BBA9TURN ON INTERRUPTSdc@AV'@@d36-G6-@d$A$cSYST THINKS DIS MEM=40000i?6-A6-'6-A`?SCROLE BACK AND FORTHn-@s@(6-@&+&P:'@,$@,4"@@6-@x"6-?:B<<,"6- &-@6@&6-B(6-@&+&P:'@,$@,4"B6-&@6-?:B<<, -@A"6-?:B<,"6-%@  AKGGBUILD DISPLAY LIST FOR GRAPHICS 7+ WITH 9 INTERUPTS AND SCROLLINGL]6-B86-BEv'A@;%@AO%@A]6-%@VP-@A#A&D&P:'@#,$@#"@PAT`6-%@6-%@eCHECK FOR 4K BOUNDARYjK-@@-6-BEv%$A@7 *=6-K6-%@o( 6-P:'AV,(6-&$AVt/ %@%6-%@+6-/ y''JUMP AND WAIT FOR VERTICCLE BLANK~7@e#%@7%@@'@'@@$`6-A6-@'6-36-@`PROGRAM PUTS SINE TABLE IN DATA STATEMENTS4 (}(,67@<@,. DATA 46-%56-F:B %,%6-P:'@,56-&@$6-%@_#67<,.7%@<%@,16-%@Q67<,.7%@<%@,_6-%@[A)"A&67<,.Z5(7@<,A6-@O( GOTO 1505R(U(X([& A%67,.Z(7@<,%6-%( DATA END&lkk7F80818282838A8A8B8C8D93949596979D9E9F9FA0A1A7A8A9AAABABB2B2B3B4B5B6B7BDBDBEBFC0C1C1C2C3C9CACBCBCCCDZmkkCECECFD0D1D1D2D3D4D4D5D6D6D7D8D8D9DADADBDCDCDDDDDEDFDFE0E0E1E2E2E3E3E4DFE0E0E1E1E2E2E3E3DEDFDFDFE0E0ZnkkE1DCDCDDDDDDDED9D9DADADAD5D5D6D6D6D7D2D2D2D2D3CDCECECECEC9C9C9CACAC5C5C5C5C5C0C0C0C0C0C0BBBBBBBBBBB5ZokkB5B5B5B5B5B0B0B0B0AFAFAFAAAAAAA9A9A9A9A9A8A3A3A3A2A2A2A2A1A1A1A0A0A0A09F9F9F9E9E9E9D9D9C9C9C9B9B9A9AZpkk9A99999898979796969595949999989897979695959A9999989797969B9A9A9998989D9C9B9B9A999E9D9D9C9BA09F9F9E9DZqkkA2A1A1A09FA47F7F7F7F7F7F7F7F7F7F7F7F7F808080808080818181818282828383848485858686878888898A8A8B8C8D8EZrkk8F8F909192939495969798999A9B9C9D9E9FA0A1A2A3A4A4A5A6A7A8A9A9AAABABACACADADAEAEAEAFAFAFAFAFAFAFAFAFAEZskkAEAEADADACABABAAA9A8A7A6A5A4A2A1A09E9D9B9A98969493918F8D8B89878482807E7C79777572706E6B69676462605D5BZtkk59565452504E4B4947454341403E3C3A393736343332302F2E2D2C2B2B2A2929282828282727272828282829292A2B2C2C2DZukk2E2F303233343537383A3B3D3E4042434547494B4C4E5052545657595B5D5F6062646667696B6C6E6F70727374757778797AZv7A7B7C7D7D7E7E7E7F7F7F7FZw ENDkk688D0AD4A9088D0002A9528D0102A9008D3002A95D8D3102A9008D4B578D4C578D4E578D4D578D4F578D5057AD4D578D5157ZkkAD4E578D52576E52576E51576E52576E51576E52576E5157AE5157BD98538D5357AD4D570A0AAABD9854186D53578D5357ADZkk4B578D5157AD4C578D5257186E52576E51576E52576E51576E52576E5157AABD9853186D53578D5357AD4B570A0AAABD9854Zkk186D53578D5357AD4B57186D4D578D5157AD4C576D4E578D52576E52576E51576E52576E5157AE5157AD53574A187D98536AZkk6A6A29038D5557AD57570A0A0D55578D5757EE4B57D003EE4C57AD4B5729FCCD4B57F024AD4B57C940F0034C1C56AD4C57C9Zkk01D0F6A9008D4B578D4C57EE4D57AD4D57C9C0D0E460A200205857A000B1D4AAC8B1D485D586D4AD4B5738E9048D4957AD4CZkk57E9008D4A57186E4A576E4957186E4A576E495718AD495765D485D4AD4A5765D585D5AD5757A00091D44CDC56EAEAEAEAEAZkkEAEAEAEAEAEAEAEAEAEAAD300285D4AD310285D518A5D4690485D4A90065D585D5A20018AD4D5765D485D4AD4E5765D585D5ZkkE8E003D0EC60EAEAEAEAEAEAEAEAA2008E8A578E8B578E89576E8657901318AD88576D8A578D8A57AD89576D8B578D8B5718Z2E88572E8957E8E008D0DC60Z ENDQQ488A48E6CBA6CBE00AD004A90085CBBD204E8D16D0BD344E8D17D0BD484E8D18D068AA6840Z ENDkk686885D16885D06868A2008E0AD4290FA8A9008D0FD4AD0FD40D0FD40D0FD40D0FD40D0FD40D0FD40D0FD40D0FD40D0FD429Zkk40F0E1A90085CB8C04D4A5D0D005A5D1D00160A90485D4A95D85D5A000B1D41865D091D4C8A5D171D491D418A90365D485D4ZA90065D585D5E8E0C0D0DE60Z END4kk68688D4D4C688D4C4CA9008D4A4C8D4B4C8D514C8D504C8D4E4C8D4F4C4C854CAD4C4C8D504CAD4D4C8D514C6E514C6E504CZ5kk6E514C6E504C6E514C6E504CAE504CBD98538D524CAD4C4C0A0AAABD9854186D524C8D524CAD4A4C8D504CAD4B4C8D514C18Z6kk6E514C6E504C6E514C6E504C6E514C6E504CAABD9853186D524C8D524CAD4A4C0A0AAABD9854186D524C8D524CAD4A4C186DZ7kk4C4C8D504CAD4B4C6D4D4C8D514C6E514C6E504C6E514C6E504CAE504CAD524C4A187D98536A6A6A29038D544CAD564C0A0AZ8kk0D544C8D564CEE4A4CD003EE4B4CAD4A4C29FCCD4A4CF01AAD4A4CC940F0034C204BAD4B4CC901D0F6A9008D4A4C8D4B4C60Z9kkA200A95D85D5A90485D4A000B1D4AAC8B1D485D586D4AD4A4C38E9048D484CAD4B4CE9008D494C186E494C6E484C186E494CZ:kk6E484C18AD484C65D485D4AD494C65D585D5AD564CA00091D44CE04BEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAAD300285D4AD31Z;kk0285D518A5D4690485D4A90065D585D5A20018AD4C4C65D485D4AD4D4C65D585D5E8E003D0EC60A9008D514CA9C18D504C20Z<kk204BA9008D0FD4AD0FD40D0FD40D0FD40D0FD40D0FD42940F0EDA90085CBAD035D48AD045D48AD055D48A200BD065D9D035DZ=__E8E0C0D0F5A200BDC65D9DC35DE8E0C0D0F5A200BD865E9D835EE8E0C0D0F5688D425F688D415F688D405F60Z? END -AU 6-$A`'AU CC6-+G:'@,%P:@$G:,,'@%G:'@,,'@ ,6-+%@,'@,6-P:AU$, B % ((6-+G:'@,$G:'@,$G:,, B6-+%@,'@,6-P:AU$,BB %AV%   &0u&&(EDIT OBJECT FILE NAME IN 300305u**("STARTING LINE NUMBER AND INCREMENT:u  B?u;@,;A ,Du++67@<@,.0123456789ABCDEFIu;A,Nu++@@ D:VERT.OBJSu:6-@#-@@0)@4 :(}Xu4 (}(,67@<@,. DATA 46-%bu1)@!6-P:'@,16-&@$lu_#67<,.7%@<%@,16-%@Q67<,.7%@<%@,_6-%@vuRA67<,.Z+(7@<,76-@F( GOTO 30040I(L(O(R&u BPu%67,.Z(7@<,%6-%u( DATA END&yii104,104,133,204,104,133,203,104,133,207,104,133,206,160,0,162,0,134,212,134,213,164,212,177,203,200"yff132,212,201,48,144,44,201,71,176,44,201,58,176,6,56,233,48,56,176,3,56,233,55,224,0,240,13,5,205,yhh164,213,145,206,200,132,213,162,0,240,211,10,10,10,10,133,205,232,24,144,201,169,0,240,231,164,2136y""132,212,160,0,132,213,96,999@y"6-B6-";A ,Jy"!AV$Ty! 6-%@! BPhy"4END$ry%6-?: