• R/O
  • HTTP
  • SSH
  • HTTPS

Commit

Tags
No Tags

Frequently used words (click to add to your profile)

javac++androidlinuxc#windowsobjective-ccocoa誰得qtpythonphprubygameguibathyscaphec計画中(planning stage)翻訳omegatframeworktwitterdomtestvb.netdirectxゲームエンジンbtronarduinopreviewer

Deriving a new dialect of Very Tiny Language from VTL-2 6800 version


Commit MetaInfo

Revisiond5f70f6a99936e63c643cf4d8ddfe2e4af244973 (tree)
Time2022-09-25 21:56:23
AuthorJoel Matthew Rees <joel.rees@gmai...>
CommiterJoel Matthew Rees

Log Message

fixed comments

Change Summary

Incremental Difference

--- a/VTL_6809_coco_translit.asm
+++ b/VTL_6809_coco_translit.asm
@@ -13,7 +13,11 @@
1313 * Copyright 2022, Joel Matthew Rees
1414 *
1515 * Modifications explained at
16-* https://joels-programming-fun.blogspot.com/2022/08/trs-mc-10-assembly-lang-pt1-vtl-2.html
16+* https://joels-programming-fun.blogspot.com/2022/09/vtl-2-part-5-transliterating-to-6809.html
17+*
18+* Note that this is a travesty of a program,
19+* since it is 6809 code, but does not make any use of the 6809's added resources.
20+*
1721 *
1822 * DEFINE LOCATIONS IN MONITOR
1923 * INCH EQU $FF00 ; per VTL.ASM
@@ -27,13 +31,13 @@
2731 *
2832 * FOR SBC6800:
2933 *BREAK EQU $1B ; BREAK KEY
30-* For MC-10:
34+* For MC-10 and Color Computer:
3135 BREAK EQU $03
3236 * For exorsim
3337 *ACIACS EQU $FCF4 ; exorcisor
3438 *ACIADA EQU $FCF5 ; exorcisor
3539 *
36-* A few interpreter variables in the direct page won't hurt, said the snake oil vendor.
40+* A few interpreter variables in the direct page won't hurt, said the spider to the fly.
3741 * (See SNDDUR and PLYTMR in particular.)
3842 * (Really need to move these. Use DP after all? IRQ, at least, uses extended mode addressing.)
3943 * (Yes, I can hear voices of complaint that it's not as "tight" as it could be.)
@@ -44,10 +48,10 @@ BREAK EQU $03
4448 *
4549 * In .c10 format, the following as ORG and RMBs caused object code output,
4650 * which will prevent the code from loading on the MC-10.
47-* Changed to EQU for the MC10 and left this way for the CoCo.
51+* Changed to EQU for the MC10 and left this way for the initial CoCo code.
4852 *
4953 * Does not really make specific use of the DP register.
50-* ORG $C0 ; Move this according to your environment's needs.
54+* ORG $C0 ; Move this according to your environment's needs, but not on CoCo.
5155 * Change this to move the registers:
5256 DPBASE EQU $C4 ; PIA mask at $C2? Avoid it, anyway.
5357 * PARSET RMB 2 ; Instead of SAVE0 in TERM/NXTRM
@@ -81,15 +85,15 @@ DST EQU SRC+2
8185 STKMRK EQU DST+2 ; to restore the stack on each pass.
8286 DPALLOC EQU STKMRK+2 ; total storage declared in the direct page
8387 *
84-*******!!!!!! Check that we have avoided $00E2, as well, since it is used as PLYTMR by an interrupt routine.
85-* Also, $008D is used as SNDDUR by BASIC.
88+*******!!!!!! CoCo: Check that we have avoided $00E2, as well, since it is used as PLYTMR by an interrupt routine.
89+* CoCo: Also, $008D is used as SNDDUR by BASIC.
8690 *
8791 * SET ASIDE FOUR BYTES FOR USER
8892 * DEFINED INTERUPT ROUTINE IF NEEDED
8993 ZERO EQU $1600 ; Dodge BASIC and video use RAM.
9094 ORG ZERO
9195 * ZERO probably no longer needs to be at even $100, but we'll put it there for good luck.
92- RMB 4 ; INTERUPT VECTOR (probably unnecessary?)
96+ RMB 4 ; INTERUPT VECTOR (probably not unnecessary? Implicit non-use in interpreter.)
9397 AT RMB 2 ; CANCEL & C-R
9498 *
9599 * GENERAL PURPOSE STORRGE