Mercurial > hg > Members > kono > os9 > sbc09

comparison os9/level1/clock.asm @ 54:fc10b7ae23d0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
clock level2 worked
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 22 Jul 2018 19:41:06 +0900
parents 2032755628dc
children 4fa2bdb0c457
comparison
equal deleted inserted replaced
53:fe88cea67ef0 54:fc10b7ae23d0
46 bita #$10 46 bita #$10
47 beq L00B4 47 beq L00B4
48 ldb #$8f start timer 48 ldb #$8f start timer
49 stb ,x 49 stb ,x
50 L00B4 50 L00B4
51 jmp [>D.SvcIRQ] 51 jsr [>D.SvcIRQ]
52 rti
52 53
53 ClkEnt equ * 54 ClkEnt equ *
54 ldd #59*256+$01 last second and last tick 55 ldd #59*256+$01 last second and last tick
55 std <D.Sec will prompt RTC read at next time slice 56 std <D.Sec will prompt RTC read at next time slice
56 * ldb #TkPerSec 57 * ldb #TkPerSec
64 stx <D.IRQ 65 stx <D.IRQ
65 * install system calls 66 * install system calls
66 leay <SysTbl,pcr 67 leay <SysTbl,pcr
67 os9 F$SSvc 68 os9 F$SSvc
68 ldx #TimerPort 69 ldx #TimerPort
69 * ldb #$8f start timer 70 ldb #$8f start timer
70 * stb ,x 71 stb ,x
71 puls pc,cc 72 puls pc,cc
72 73
73 * F$Time system call code 74 * F$Time system call code
74 FTime ldx R$X,u 75 FTime ldx R$X,u
75 ldy #TimerPort 76 ldy #TimerPort