#136

... ---------------------------------------- http://www.CirqueFascination.com ------------------------------------------------------------ ======================================================================= VOLUME 15, NUMBER 5 May 2015 ISSUE #136 ======================================================================= Welcome to the latest edition of Fascination, the Unofficial Cirque du Soleil Newsletter. There's no mistaking what's on everyone's mind this month - and what the hot topic is i ...

... ADD.L #160,A1 DBF D0,FONTYDRAW10 move.w #7,d0 FONTYDRAW10C MOVE.W (A0)+,(A1) move.w (a0)+,8(a1) ADD.L #160,A1 DBF D0,FONTYDRAW10C MOVE.W #28,D0 MOVE.L FONTTYPE,A0 CLR.L D6 MOVE.B (A6)+,D6 SUB.B #32,D6 MULU #144,D6 ADD.L D6,A0 MOVE.L SCREEN,A1 add.l #1368,a1 FONTYDRAW11 MOVE.W (A0)+,D5 ADD.W D5,(A1) move.w (a0)+,8(a1) ADD.L #160,A1 DBF D0,FONTYDRAW11 move.w #7,d0 FONTYDRAW11b MOVE.W (A0)+,(a1) move.w (a0)+,8(a1) ADD.L #160,A1 DBF D0,FONTYDRAW11b MOVE.W #28,D0 MOVE.L FONTTYPE,A0 CLR.L D6 MOVE.B (A6)+ ...

... ec city which of whom will be the most cheapest. IGA RULE #112 try not to speak the words : crime , murder , husban , or blender in front or at least near the barmaid ... or do it at your own risks IGA RULE #128 You must read RULE #572 NoW! IGA RULE #136 Don't you ever try to read any other E-zine on the net ... you could easily find the better than IgA and no one has ever quit IgA alive IGA RULE #195 the adoption a a new rule require a vote between the "Staff" member ; the vote require an answer of ...

... 0129 #129 Tx 873.90 Rx 828.90 Chan 0130 #130 Tx 873.93 Rx 828.93 Chan 0131 #131 Tx 873.96 Rx 828.96 Chan 0132 #132 Tx 873.99 Rx 828.99 Chan 0133 #133 Tx 874.02 Rx 829.02 Chan 0134 #134 Tx 874.05 Rx 829.05 Chan 0135 #135 Tx 874.08 Rx 829.08 Chan 0136 #136 Tx 874.11 Rx 829.11 Chan 0137 #137 Tx 874.14 Rx 829.14 Chan 0138 #138 Tx 874.17 Rx 829.17 Chan 0139 #139 Tx 874.20 Rx 829.20 Chan 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 8 ...

... NC DSY ;Increase`y-rotation JMP :CONT :F4 CMP #138 BNE :F5 LDA DSY BEQ :CONT1 DEC DSY JMP :CONT :F5 CMP #135 BNE :F6 LDA DSZ CMP #ANGMAX/2 BEQ :CONT1 INC DSZ ;z-rotation JMP :CONT :F6 CMP #139 BNE :F7 LDA DSZ BEQ :CONT1 DEC DSZ JMP :CONT :F7 CMP #136 BNE :PLUS JMP INIT :CONT1 JMP :CONT :PLUS CMP #'+' BNE :MINUS INC ZOOM ;Bah,`who`needs`error`checking? INC ZOOM JMP :CONT :MINUS CMP #'-' BNE :H DEC ZOOM DEC ZOOM BPL :CONT INC ZOOM INC ZOOM JMP :CONT :H CMP #'h' BNE :SPACE LDA HIDE EOR #$01 STA HID ...

... T INC DSY ;Increase y-rotation JMP :CONT :F4 CMP #138 BNE :F5 LDA DSY BEQ :CONT DEC DSY JMP :CONT :F5 CMP #135 BNE :F6 LDA DSZ CMP #ANGMAX/2 BEQ :CONT INC DSZ ;z-rotation JMP :CONT :F6 CMP #139 BNE :F7 LDA DSZ BEQ :CONT DEC DSZ JMP :CONT :F7 CMP #136 BNE :Q JMP INIT :Q CMP #'q' ;q quits BNE :CONT JMP CLEANUP :CONT SEI ;Speed things up a bit **** Update angles UPDATE CLC LDA SX ADC DSX CMP #ANGMAX ;Are we >= maximum angle? BCC :CONT1 SBC #ANGMAX :If so, reset :CONT1 STA SX CLC LDA SY ADC DSY CMP ...

... T INC DSY ;Increase.y-rotation JMP :CONT :F4 CMP #138 BNE :F5 LDA DSY BEQ :CONT DEC DSY JMP :CONT :F5 CMP #135 BNE :F6 LDA DSZ CMP #ANGMAX/2 BEQ :CONT INC DSZ ;z-rotation JMP :CONT :F6 CMP #139 BNE :F7 LDA DSZ BEQ :CONT DEC DSZ JMP :CONT :F7 CMP #136 BNE :Q JMP INIT :Q CMP #'q' ;q.quits BNE :CONT JMP CLEANUP :CONT *.>>>.DEBUG,'5' ****.Update.angles UPDATE CLC LDA SX ADC DSX CMP #ANGMAX ;Are.we.>=.maximum.angle? BCC :CONT1 SBC #ANGMAX :If so, reset :CONT1 STA SX CLC LDA SY ADC DSY CMP #ANGMAX BCC ...