|
Routines |
| Prev: 49895 | Up: Map | Next: 49963 |
|
|
||||
| WhoopsCopy | 49927 | DEFB 22,12,25 | PRINT AT (12, 25). | |
| 49930 | DEFB 19,1 | BRIGHT "ON". | ||
| 49932 | DEFM "WHOOPS!" | "WHOOPS!". | ||
|
Open the upper screen channel.
|
||||
| WhoopsPrint | 49939 | LD A,2 | A=2. | |
| 49941 | CALL 5633 | Call CHAN_OPEN. | ||
| 49944 | LD DE,49927 | DE=WhoopsCopy (text). | ||
| 49947 | LD BC,12 | BC=12 (counter). | ||
| 49950 | CALL 8252 | Call PR_STRING. | ||
| 49953 | LD B,32 | B=32 (scroll counter). | ||
| WhoopsPrint_Loop | 49955 | PUSH BC | Stash BC on the stack. | |
| 49956 | CALL 49895 | Call 49895. | ||
| 49959 | POP BC | Restore BC from the stack. | ||
| 49960 | DJNZ WhoopsPrint_Loop | Decrease the scroll counter by one and loop back to WhoopsPrint_Loop until counter is zero. | ||
| 49962 | RET | Return. | ||
| Prev: 49895 | Up: Map | Next: 49963 |