]> git.sur5r.net Git - cc65/blob - libsrc/c128/waitvsync.s
Added a C header that translates from the source file's encoding to PetSCII.
[cc65] / libsrc / c128 / waitvsync.s
1 ;
2 ; Written by Groepaz <groepaz@gmx.net>
3 ;
4 ; void waitvsync (void);
5 ;
6
7         .export         _waitvsync
8
9         .include        "c128.inc"
10
11 _waitvsync:
12
13         bit     MODE
14         bmi     @c80
15
16 @l1:
17         bit     VIC_CTRL1
18         bpl     @l1
19 @l2:
20         bit     VIC_CTRL1
21         bmi     @l2
22         rts
23
24 @c80:
25         ;FIXME: do we have to switch banks?
26 @l3:
27         lda     VDC_INDEX
28         and     #$20
29         beq     @l3
30         rts