regval_tab_e:
start:
- ldi temp,low(RAMEND) ; top of memory
+ ldi temp,low(RAMEND) ; top of memory; vim:set ts=8 noet nowrap
+
out SPL,temp ; init stack pointer
ldi temp,high(RAMEND) ; top of memory
out SPH,temp ; init stack pointer
halted_loop:
rjmp halted_loop ;keep AVR in an endless loop
+printxbits:
+ push temp2
+ push temp3
+ mov temp2,temp
+ ldi temp3,8
+prntxb0:
+ ldi temp,'-'
+ lsl temp2
+ brcc prntxb1
+ ldi temp,'X'
+prntxb1:
+ rcall uartPutc
+ dec temp3
+ brne prntxb0
+ pop temp3
+ pop temp2
+ ret
+
ramtestend:
.endif
; Read first sector of first CP/M partition (ipl)
+ ldiw y,fsys_vars
+
; Disk 0
- sts seekdsk,_0
+ std y+o_seekdsk,_0
; Track 0
- sts seektrk,_0
- sts seektrk+1,_0
+ std y+o_seektrk, _0
+ std y+o_seektrk+1,_0
; Sector 0
- sts seeksec,_0
+ std y+o_seeksec,_0
; Destination
ldiw x,IPLADDR
- stsw dmaadr,x
+ std y+o_dmaadr+0,xl
+ std y+o_dmaadr+1,xh
ldi temp,1<<READ_FUNC
lcall dskDoIt
ljmp z80_init
-printspace:
- push temp
- ldi temp,' '
- rcall uartputc
- pop temp
- ret
-
-printxbits:
- push temp2
- push temp3
- mov temp2,temp
- ldi temp3,8
-prntxb0:
- ldi temp,'-'
- lsl temp2
- brcc prntxb1
- ldi temp,'X'
-prntxb1:
- rcall uartPutc
- dec temp3
- brne prntxb0
- pop temp3
- pop temp2
- ret
-
-
-
+; vim:set ts=8 noet nowrap