#147

... -------------------------------------- http://www.CirqueFascination.com ------------------------------------------------------------ ======================================================================= VOLUME 16, NUMBER 4 April 2016 ISSUE #147 ======================================================================= Welcome to the latest edition of Fascination, the Unofficial Cirque du Soleil Newsletter. One Hundred and Forty issues ago, the Fascination! Newsletter made its first trek to th ...

... colour bar and then when the process is now repeated the colours have moved slightly. Then again we rotate the colours one place, display them and so on. The effect is that the bars scroll up the screen. Lets view the code. 10 ORG 8192 20 SEI 30 LDA #147 40 JSR $FFD2 50 LDA #$7F 60 STA $DC0D 70 LDA #$FA 80 STA $D012 90 LDA ^IRQ (YOU USE THE UP ARROW) 100 STA $0315 110 LDA #IRQ 120 STA $0314 130 LDA #$F1 140 STA $D01A 150 CLI 160 EVER JMP EVER 170 IRQ LDA #01 180 STA $D019 190 LDA $D011 200 AND #$7F ...

... ple program. You will learn more by looking and then trying the code for yourself. This example will split the screen into 3 parts. Each part will have a different background and border colour so you can see whats happened. 10 ORG 8192 20 SEI 30 LDA #147 40 JSR $FFD2 50 LDA #$7F 60 STA $DC0D 70 LDA #00 80 STA $D012 90 STA IRQCOUNT 100 LDA (UPARROW)IRQ - YOU JUST TYPE THE UP ARROW 110 STA $0315 120 LDA #IRQ 130 STA $0314 140 LDA $D01A 150 ORA #01 160 STA $D01A 165 CLI 170 LOOP JMP LOOP 180 IRQ LDA #0 ...

... er side. The next process is to shift the entire row of 40 characters one place left (for a left scroll that is). You then place the next character, move the entire row left again, and so on. Well enough of this, lets do the code: 10 ORG 8192 20 LDA #147 30 JSR $FFD2 40 LDA #23 50 STA 53272 60 LDA #00 70 STA 53280 80 STA 53281 90 STA MESSPO 100 SCROLL LDA 53270 110 ORA #07 120 AND #247 130 STA 53270 140 NOTZERO LDX MESSPO 150 CHARS LDA MESS,X 160 CMP #93 170 BNE NOTDONE 180 LDA #00 190 STA MESSPO 20 ...

In Lesson 6 we will learn better programming techniques than lesson 5 to get the sprite moving up & down. And this time instead of just boring up & down movement we will produce a bounce effect. Lets get straight into the coding: 10 LDA #147 20 JSR $FFD2 30 LDA #00 40 STA 53280 50 STA 53281 60 LDA #255 70 STA 53269 80 STA 53276 90 LDA #02 100 STA 53285 110 LDA #03 120 STA 53286 130 LDX #00 140 COLOUR LDA #04 150 STA 53287,X 160 INX 170 CPX #08 180 BNE COLOUR 190 LDA #64 200 LDX #00 210 ...

... lace a sprite on the screen and then get it moving. Here's roughly what we need to do: Clear Screen Set up Sprite pointer Set up Sprite Colours & Mode Set up X & Y position of Sprite Move it Down Move it Up So lets write the code: 10 LDA #147 20 JSR $FFD2 30 LDA #00 40 STA 53280 50 STA 53281 60 LDA #255 70 STA 53269 80 STA 53276 90 LDA #02 100 STA 53285 110 LDA #03 120 STA 53286 130 LDX #00 140 COLOUR LDA #04 150 STA 53287,X 160 INX 170 CPX #08 180 BNE COLOUR 190 LDX #64 200 STX 2040 210 ...

... ou should see your screen fill with the letter R. Notice the speed at which this happens. Now lets assemble the machine code equivalent and see the execution speed difference. Type in the following in Zeus, assemble it and run it. 10 ORG 8192 20 LDA #147 30 JSR $FFD2 40 LDA #82 50 LOOP JSR $FFD2 60 JMP LOOP This is the assembler version of the basic program. When you have assembled it, use: SYS 8192 from BASIC to run it. Again the screen will fill with the letter R, only this time much faster. The a ...

... et table using the font, style and size of the font that you have in the sample window. Then you can print it out. This file contains 68480 bytes, which is a relatively short download, particularly for the value you get. [*][*][*] VISUAL.FX.BXY File #14763 (HyperCard Stack) ''''''''''''''''''''''''''''''''''''''''''''''''''' This is a freeware HyperCard stack by Hangtime and Chet Day. According to Hangtime, it "demonstrates all the different visual effects available through HyperTalk. It allows the ...

... tu móvil (sólo para los que tenéis contrato con Telefónica), tienes derecho a que te lo desbloqueen. Llama al 1439 para que te den el código. ------------ *Para Airtel ------------ (Llamar 177)(9)(1)(Mensaje Bienvenida)(#)(2) -> Servicio contestador #147#(OK) -> Desactiva Servicio Contestador *147*2#(OK) -> Contestador siempre (se activa directamente a pesar de que esté encendido) *147#(OK) -> Contestador si está apagado o fuera de cobertura *147*1#(OK) -> Contestador a los 3 tonos de llamada *131# ...

... 0140 #140 Tx 874.23 Rx 829.23 Chan 0141 #141 Tx 874.26 Rx 829.26 Chan 0142 #142 Tx 874.29 Rx 829.29 Chan 0143 #143 Tx 874.32 Rx 829.32 Chan 0144 #144 Tx 874.35 Rx 829.35 Chan 0145 #145 Tx 874.38 Rx 829.38 Chan 0146 #146 Tx 874.41 Rx 829.41 Chan 0147 #147 Tx 874.44 Rx 829.44 Chan 0148 #148 Tx 874.47 Rx 829.47 Chan 0149 #149 Tx 874.50 Rx 829.50 Chan 0150 #150 Tx 874.53 Rx 829.53 Chan 0151 #151 Tx 874.56 Rx 829.56 Chan 0152 #152 Tx 874.59 Rx 829.59 Chan 0153 #153 Tx 874.62 Rx 829.62 Chan 0154 #154 Tx 8 ...