mirror of
https://github.com/fadden/6502bench.git
synced 2024-12-05 03:49:53 +00:00
83da0d952c
Added a "fancy" flag to MultiLineComment. If set, we will use formatting commands embedded in the text itself. The max width pop-up and "boxed" flag will be ignored in favor of width and boxing directives. (See issue #111.) The current "fancy" formatter is just a placeholder that folds lines every 10 characters. Removed FormattedMlcCache (added two changes back). Caching the rendered string list in the MLC itself is simpler and more efficient than having a separate cache, and it works for Notes as well. Added anchors for more comments in the 20090 test.
138 lines
4.9 KiB
ArmAsm
138 lines
4.9 KiB
ArmAsm
;***************************************
|
||
;* Old school boxed output header. *
|
||
;* Brk *
|
||
;* multiple lines yay. How about a *
|
||
;* hy-phenated word? *
|
||
;* Looonglonglonglonglonglonglonglongl *
|
||
;* onglonglongword. *
|
||
;***************************************
|
||
;* Throw in a line divider. These *
|
||
;* aren't: *
|
||
;* *! *
|
||
;* * *
|
||
;* &XYZ *
|
||
;* *
|
||
;***************************************
|
||
.setcpu "6502"
|
||
plataddr = $3000 ;address only in platform file
|
||
|
||
;Short, unboxed comment here!!
|
||
;Two spaces after. More hyp-
|
||
;hens?
|
||
.org $1000
|
||
lda #$01 ;Comment!
|
||
;Comment rulers can be helpful in findin the edges of notes. Comments are hyph-
|
||
;enatingly fun. Like the note, this goes out to 80 columns.
|
||
lda #$02 ;&another comment with &&s!
|
||
;Down to 64 columns this time. Why 64? Why not 64. A rose, by
|
||
;any other name, would break the line at the same place. Or hy-
|
||
;phen split.
|
||
lda #$03
|
||
;Ah, the classic 40-column limitation...
|
||
;brings back memories. Of, you know, h-
|
||
;yphenated things.
|
||
lda #$04
|
||
;Thirty columns. 'cause forty
|
||
;felt like too many. Oh, hyp-
|
||
;henation!
|
||
lda #$05 ;comment ending in backslash\
|
||
;*******************************************************************************
|
||
;* Short box comment, 80 cols. *
|
||
;*******************************************************************************
|
||
lda #$06 ;comment, with, commas \\ \" \/ \\\
|
||
;***************************************************************
|
||
;* *
|
||
;* Choppy *
|
||
;* *
|
||
;* box *
|
||
;* *
|
||
;* comment *
|
||
;* *
|
||
;* 64 cols *
|
||
;* *
|
||
;***************************************************************
|
||
lda #$07
|
||
;***************************************************************
|
||
;* Some non-ASCII stuff: *
|
||
;* †•<E280A0>␇ *
|
||
;* (right side of box looks pushed over on-screen because font *
|
||
;* isn't fully mono) *
|
||
;***************************************************************
|
||
lda #$08
|
||
;***************************************
|
||
;* Specific line break case at end *
|
||
;* of. Sentence. *
|
||
;* Alternate version for semicolon zz. *
|
||
;* Output. *
|
||
;* *
|
||
;* Same thing but with three spaces *
|
||
;* zz. Three! *
|
||
;* Again with the three spces between. *
|
||
;* Things. *
|
||
;* *
|
||
;* Try to make it the very last *
|
||
;* thing.. *
|
||
;***************************************
|
||
lda #$09
|
||
lda #$0a
|
||
lda #$0b
|
||
lda #$0c
|
||
lda #$0d
|
||
lda #$0e
|
||
lda #$0f
|
||
jmp L1062
|
||
|
||
.byte $ea
|
||
bytes: .byte $00,$01,$02,$03,$04,$05,$06,$07,$08,$09,$0a,$0b,$0c,$0d,$0e,$0f ;Comment at the end of a lengthy bulk hex item might overflow various things, but could be wrapped.
|
||
.byte $00,$01,$02,$03,$04,$05,$06,$07,$08,$09,$0a,$0b,$0c,$0d,$0e,$0f
|
||
.byte $00,$01,$02,$03,$04,$05,$06,$07,$08,$09,$0a,$0b,$0c,$0d,$0e,$0f
|
||
.byte $00,$01,$02,$03,$04,$05,$06,$07,$08,$09,$0a,$0b,$0c,$0d,$0e,$0f
|
||
|
||
L1062: bit plataddr ;Pull in plataddr to see the comment on the platform file entry.
|
||
;CRLFA triv
|
||
;ial fancy
|
||
;comment.
|
||
;Nothing sp
|
||
;ecial abou
|
||
;t it at al
|
||
;l. Go on
|
||
;about your
|
||
; business.
|
||
;CRLFCRLF
|
||
lda #$10
|
||
lda #$11
|
||
lda #$12
|
||
lda #$13
|
||
lda #$14
|
||
lda #$15
|
||
lda #$16
|
||
lda #$17
|
||
lda #$18
|
||
lda #$19
|
||
lda #$1a
|
||
lda #$1b
|
||
lda #$1c
|
||
lda #$1d
|
||
lda #$1e
|
||
lda #$1f
|
||
lda #$20
|
||
lda #$21
|
||
lda #$22
|
||
lda #$23
|
||
lda #$24
|
||
lda #$25
|
||
lda #$26
|
||
lda #$27
|
||
lda #$28
|
||
lda #$29
|
||
lda #$2a
|
||
lda #$2b
|
||
lda #$2c
|
||
lda #$2d
|
||
lda #$2e
|
||
lda #$2f
|
||
jmp @L10A8
|
||
|
||
@L10A8: rts
|
||
|