0866 1DF3 C9 51 CMP #’Q’ ; DUMP FROM OPEN CELL TO HI LIMIT
0867 1DF5 F0 0A BEQ DUMPV

0873 1E01 4C 42 1D DUMPV JMP DUMP

0778 1D42 A9 00 DUMP LDA #$00
0779 1D44 85 F8 STA INL
0780 1D46 85 F9 STA INH ; CLEAR RECORD COUNT
0781 1D48 A9 00 DUMP0 LDA #$00
0782 1D4A 85 F6 STA CHKHI ; CLEAR CHKSUM
0783 1D4C 85 F7 STA CHKSUM
0784 1D4E ;
0785 1D4E 20 2F 1E JSR CRLF ; PRINT CR LF
0786 1D51 A9 3B LDA #$3B ; PRINT SEMICOLON
0787 1D53 20 A0 1E JSR OUTCH
0788 1D56 A5 FA LDA POINTL ; TEST POINT GT OR ET
0789 1D58 CD F7 17 CMP EAL ; HI LIMIT GOTO EXIT
0790 1D5B A5 FB LDA POINTH
0791 1D5D ED F8 17 SBC EAH
0792 1D60 90 18 BCC DUMP4
0793 1D62 ;
0794 1D62 A9 00 LDA #$00 ; PRINT LAST RECORD
0795 1D64 20 3B 1E JSR PRTBYT ; 0 BYTES
0796 1D67 20 CC 1F JSR OPEN
0797 1D6A 20 1E 1E JSR PRTPNT
0798 1D6D ;
0799 1D6D A5 F6 LDA CHKHI ; PRINT CHKSUM
0800 1D6F 20 3B 1E JSR PRTBYT ; FOR LAST RECORD
0801 1D72 A5 F7 LDA CHKSUM
0802 1D74 20 3B 1E JSR PRTBYT
0803 1D77 4C 64 1C JMP CLEAR
0804 1D7A ;
0805 1D7A A9 18 DUMP4 LDA #$18 ; PRINT 24 BYTE COUNT
0806 1D7C AA TAX ; SAVE AS INDEX
0807 1D7D 20 3B 1E JSR PRTBYT
0808 1D80 20 91 1F JSR CHK
0809 1D83 20 1E 1E JSR PRTPNT
0810 1D86 ;
0811 1D86 A0 00 DUMP2 LDY #$00 ; PRINT 24 BYTES
0812 1D88 B1 FA LDA (POINTL),Y ; GET DATA
0813 1D8A 20 3B 1E JSR PRTBYT ; PRINT DATA
0814 1D8D 20 91 1F JSR CHK ; COMP CHKSUM
0815 1D90 20 63 1F JSR INCPT ; INCREMENT POINT
0816 1D93 CA DEX
0817 1D94 D0 F0 BNE DUMP2
0818 1D96 ;
0819 1D96 A5 F6 LDA CHKHI ; PRINT CHKSUM
0820 1D98 20 3B 1E JSR PRTBYT
0821 1D9B A5 F7 LDA CHKSUM
0822 1D9D 20 3B 1E JSR PRTBYT
0823 1DA0 E6 F8 INC INL ; INCR RECORD CNT
0824 1DA2 D0 02 BNE DUMP3
0825 1DA4 E6 F9 INC INH
0826 1DA6 4C 48 1D DUMP3 JMP DUMP0

How the papertape format looks like is shown on the Load papertape format page.