‡
                      STUNNING DEMO SOURCE PART III
                   ---=============================---

by
Negativ and Zinkfloid
of TRSI

Demo Name: H A R D W I R E D  II
cont.


hidden vector
-------------
 
 10 Create "Hidden Vector"
 20 Goto 10
 30 Sys33399
 40 Run
 
 
 move.v links oben nach rechts unten,118
 move.transl: left upper to right corner,118
 sin: pea $20000
 pea      $4ffd0
 lda0     $5ffd0 
 dot:  leamove.pea
 
	far	mov,jk45sin	
	copy	ass.tan -=> Comment
	movepea.lea 
	movew.    $20000
	movew.    $24dff0
	kill sys
	kill all
	move.dot sinrout $2acb short
	fix.et,0  glenz.et,1   33dd55
	bp10
	blk.b    $2727*5t,$00

faces movement correction
-------------------------
	lea.cor	cmos
	get	code(33d7-(A0/d7))
	out	surface
	pop    
	
faces movement re-correction
----------------------------

       lea.cor cmos
       get     code(23a7-(a44/a56)
       sub     move.l
       popo
       movepea.lea
       move.w                              no exit
       
realtime calculation in 600surfaces pp44bitplanes
-------------------------------------------------

	move.l	bplcounter,a1
	move.l	a1,bplshower
	move.w	#$ffff,intwai
waitint2
	tst.w	intwait
	bne.s	waitint2
	add.l	#$c800,a1
	cmp.l	#bpl0+$c800*2
	bne.s	noplanee2
	move.l	#bpl0,a1
noplanee2
	move.l	a1,bplcounter
	move.w	(a2,d3.w),d0
	move.w	#$a9,d1
	lea	enco,a0
	move.l	#$c8,d2
copyline2
	move.w	d0,$72(a6)
	move.l	#$09300000,$4
	move.l	#$ffffffff,$4
	clr.l	$64(a6)
	move.l	a0,$50(a6)
	move.l	a1,$54(a6)

texture mapping
---------------
ein(on)
texture mapping
---------------
aus(off)


shadow-vector plott 97000 Farben
--------------------------------

shadow_vector_plot_ein();
void	push	ax
	lea	move.z5$
	leapea.move.a6(d6,d7),a6
	
	dro.4ffd0   $4ffd0 sin $20fffff
	move.l rdd$3r      sin $20ffff0
	move               sin $00ff
        dot d..            dsin.ll
        dot d..            dsin.cut
        move.g..           $444ff                        end line
        lea                                              ---------
   	
	
hd-controller non-interlaced
----------------------------
	lea	franz_von_Assisi,a0
	pea	a0
	jmp	Fake
franz_von_Assisi
	move.w	#8,d1
looop
	move.w	d0,$dff180
	dbf	d0,looop
	dbf	d1,looop
	reset
	jmp	$fc00d2
	sp.d00
Fake
	tildo	d0,$dffd00
	end	macro

md. innterlac4e md.controll
---------------------------

.m       
	move.w	d0,(a1)
	addq	#4,a2
	swap	d0
	move.w	d0,(a1)
	addq	#4,a1
	swap	d0
	add.l	#$28,d0
	dbf	d1,setbplanes


	lea	copperlist(pc),a0
	move.l	a0,$80(a6)
	clr.w	$88(a6)
	move.w	#$87c0,$96(a6)

…