/[projet1]/users/chema/TINE/disk.s
Defence Force logotype

Diff of /users/chema/TINE/disk.s

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 417 by Chema, Fri Oct 22 19:26:26 2010 UTC revision 418 by Chema, Fri Oct 29 10:34:49 2010 UTC
# Line 225  _chk_313c Line 225  _chk_313c
225    
226    
227  read_data  read_data
 /*    
      lda $0310  
      lsr  
      bcc end_read  
      lda $0318  
      bmi read_data  
 */  
   
228           bit $0314           bit $0314
229           bpl end_read           bpl end_read
230       bit $0318       bit $0318
# Line 247  _chk_313d Line 239  _chk_313d
239       inc pbufh       inc pbufh
240       jmp read_data       jmp read_data
241  end_read  end_read
242  .dsb (($0310&3)-((*+3)&3))&3,$ea  /*.dsb (($0310&3)-((*+3)&3))&3,$ea
243       lda $0310       lda $0310
244  _chk_al_2  _chk_al_2
245    */
246       rts       rts
247    
248  write_data  .dsb (($0313&3)-((*+15)&3))&3,$ea
 /*  
      lda $0310  
      lsr  
      bcc end_write  
      lda $0318  
      bmi write_data  
 */  
249    
250    write_data
251         lda (pbufl),y
252    loop_wait_fdc
253       bit $0314       bit $0314
254       bpl end_write       bpl end_write
255       bit $0318       bit $0318
256       bmi write_data       bmi loop_wait_fdc
257    
      lda (pbufl),y  
 .dsb (($0313&3)-((*+3)&3))&3,$ea  
258       sta $0313       sta $0313
259  _chk_313e  _chk_313e
260       iny       iny

Legend:
Removed from v.417  
changed lines
  Added in v.418

  ViewVC Help
Powered by ViewVC 1.1.26