3dtesting.s

3D LCD for running graphical lCDs

	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 288
; 		}
L104:
	.dbline 285
	inc R20
L106:
	.dbline 285
	cpi R20,50
	brlo L103
X38:
	.dbline 291
; 		
; 	    
; 		for(temp=15.0; temp>0.0; temp=temp-0.5)
	ldi R16,<L107
	ldi R17,>L107
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L112
L109:
	.dbline 292
; 		{
	.dbline 293
; 	         cube(0.0,0.0,temp);
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	std y+4,R2
	std y+5,R3
	std y+6,R4
	std y+7,R5
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 294
; 		}
L110:
	.dbline 291
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L112:
	.dbline 291
	movw R24,R28
	adiw R24,8
	ldi R16,<L2
	ldi R17,>L2
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L109
X39:
	.dbline 297
; 		
; 
; 		for(temp1=0; temp1<200; temp1++)
	clr R20
	xjmp L117
L114:
	.dbline 298
; 		{
	.dbline 299
; 		     cube(0.0,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 300
; 		}
L115:
	.dbline 297
	inc R20
L117:
	.dbline 297
	cpi R20,200
	brlo L114
X40:
	.dbline 302
; 		
;         for(temp=0.0; temp>-20.0; temp=temp-0.5)
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L121
L118:
	.dbline 303
; 		{
	.dbline 304
; 			 cube(0.0,0.0,temp);
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	std y+4,R2
	std y+5,R3
	std y+6,R4
	std y+7,R5
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 305
; 		}
L119:
	.dbline 302
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L121:
	.dbline 302
	movw R24,R28
	adiw R24,8
	ldi R16,<L122
	ldi R17,>L122
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L118
X41:
	.dbline 307
; 		
; 		for(temp1=0; temp1<50; temp1++)
	clr R20
	xjmp L126
L123:
	.dbline 308
; 		{
	.dbline 309
; 		     cube(0.0,0.0,-20.0);
	ldi R16,<L127
	ldi R17,>L127
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 310
; 		}  
L124:
	.dbline 307
	inc R20
L126:
	.dbline 307
	cpi R20,50
	brlo L123
X42:
	.dbline 312
; 		
; 		for(temp=-20.0; temp<0; temp=temp+0.5)
	ldi R16,<L127
	ldi R17,>L127
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L131
L128:
	.dbline 313
; 		{
	.dbline 314
; 			 cube(0.0,0.0,temp);
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	std y+4,R2
	std y+5,R3
	std y+6,R4
	std y+7,R5
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 315
; 		}
L129:
	.dbline 312
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpadd2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L131:
	.dbline 312
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpcmp2
	brlt L128
X43:
	.dbline 317
; 		
; 		for(temp1=0; temp1<200; temp1++)
	clr R20
	xjmp L135
L132:
	.dbline 318
; 		{
	.dbline 319
; 		     cube(0.0,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 320
; 		}  
L133:
	.dbline 317
	inc R20
L135:
	.dbline 317
	cpi R20,200
	brlo L132
X44:
	.dbline 322
; 		
; 	    for(temp=0.0; temp>-40.0; temp=temp-0.5)
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L139
L136:
	.dbline 323
; 		{
	.dbline 324
; 			 cube(temp,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldd R16,y+8
	ldd R17,y+9
	ldd R18,y+10
	ldd R19,y+11
	xcall _cube
	.dbline 325
; 		}
L137:
	.dbline 322
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L139:
	.dbline 322
	movw R24,R28
	adiw R24,8
	ldi R16,<L140
	ldi R17,>L140
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L136
X45:
	.dbline 327
; 		
; 	    for(temp=40.0; temp>0.0; temp=temp-0.5)
	ldi R16,<L145
	ldi R17,>L145
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L144
L141:
	.dbline 328
; 		{
	.dbline 329
; 			 cube(temp,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldd R16,y+8
	ldd R17,y+9
	ldd R18,y+10
	ldd R19,y+11
	xcall _cube
	.dbline 330
; 		}
L142:
	.dbline 327
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L144:
	.dbline 327
	movw R24,R28
	adiw R24,8
	ldi R16,<L2
	ldi R17,>L2
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L141
X46:
	.dbline 332
; 		
; 	    for(temp1=0; temp1<30; temp1++)
	clr R20
	xjmp L149
L146:
	.dbline 333
; 		{
	.dbline 334
; 		     cube(0.0,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 335
; 		} 
L147:
	.dbline 332
	inc R20
L149:
	.dbline 332
	cpi R20,30
	brlo L146
X47:
	.dbline 337
; 		
; 	   for(temp=0.0; temp>-20.0; temp=temp-0.5)
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L153
L150:
	.dbline 338
; 		{
	.dbline 339
; 			 cube(0.0,temp,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	std y+0,R2
	std y+1,R3
	std y+2,R4
	std y+3,R5
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 340
; 		}
L151:
	.dbline 337
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L153:
	.dbline 337
	movw R24,R28
	adiw R24,8
	ldi R16,<L122
	ldi R17,>L122
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L150
X48:
	.dbline 342
; 		
; 	    for(temp=20.0; temp>0.0; temp=temp-0.5)
	ldi R16,<L158
	ldi R17,>L158
	xcall elpm32
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
	xjmp L157
L154:
	.dbline 343
; 		{
	.dbline 344
; 			 cube(0.0,temp,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	std y+0,R2
	std y+1,R3
	std y+2,R4
	std y+3,R5
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 345
; 		}
L155:
	.dbline 342
	ldd R2,y+8
	ldd R3,y+9
	ldd R4,y+10
	ldd R5,y+11
	ldi R16,<L113
	ldi R17,>L113
	xcall elpm32
	st -y,R19
	st -y,R18
	st -y,R17
	st -y,R16
	movw R16,R2
	movw R18,R4
	xcall fpsub2
	std y+8,R16
	std y+9,R17
	std y+10,R18
	std y+11,R19
L157:
	.dbline 342
	movw R24,R28
	adiw R24,8
	ldi R16,<L2
	ldi R17,>L2
	xcall elpm32
	st -y,R25
	st -y,R24
	xcall fpcmp1
	brlt L154
X49:
	.dbline 347
; 		
;         for(temp1=0; temp1<80; temp1++)
	clr R20
	xjmp L162
L159:
	.dbline 348
; 		{
	.dbline 349
; 		     cube(0.0,0.0,0.0);
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+4,R16
	std y+5,R17
	std y+6,R18
	std y+7,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	std y+0,R16
	std y+1,R17
	std y+2,R18
	std y+3,R19
	ldi R16,<L108
	ldi R17,>L108
	xcall elpm32
	xcall _cube
	.dbline 350
; 		} 
L160:
	.dbline 347
	inc R20
L162:
	.dbline 347
	cpi R20,80
	brlo L159
X50:
	.dbline -2
L102:
	.dbline 0 ; func end
	adiw R28,12
	xjmp pop_xgset300C
	.dbsym r temp1 20 c
	.dbsym l temp 8 D
	.dbend
	.area bss(ram, con, rel)
	.dbfile F:\CODE\LCD1286418\3dtesting.c
_ey::
	.blkb 2
	.dbsym e ey _ey I
_ex::
	.blkb 2
	.dbsym e ex _ex I
_sy::
	.blkb 2
	.dbsym e sy _sy I
_sx::
	.blkb 2
	.dbsym e sx _sx I
	.area lit(rom, con, rel)
L158:
	.word 0x0,0x41a0
L145:
	.word 0x0,0x4220
L140:
	.word 0x0,0xc220
L127:
	.word 0x0,0xc1a0
L122:
	.word 0x0,0xc1a0
L113:
	.word 0x0,0x3f00
L108:
	.word 0x0,0x0
L107:
	.word 0x0,0x4170
	.area data(ram, con, rel)
	.dbfile F:\CODE\LCD1286418\3dtesting.c
L27:
	.blkb 22
	.area idata
	.byte 'M,'E,'G,'A,49,50,56,32,49,54,'M,'H,'z,32,32,49
	.byte 50,56,'X,54,52,0
	.area data(ram, con, rel)
	.dbfile F:\CODE\LCD1286418\3dtesting.c
	.area lit(rom, con, rel)
L12:
	.word 0x0,0x427c
L11:
	.word 0x0,0x4280
L10:
	.word 0x0,0x41f8
L5:
	.word 0xd70a,0x3c23
L4:
	.word 0xc28f,0x3cf5
L3:
	.word 0xd70a,0x3ca3
L2:
	.word 0x0,0x0
; }