From 5f2b5d1955a195773e1c2132294b2af79a7ce5b6 Mon Sep 17 00:00:00 2001
From: Michael <testcraft@sharedcraft.com>
Date: Fri, 15 Jan 2016 04:46:59 -0800
Subject: [PATCH] Updated Home (markdown)

---
 Home.md | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)

diff --git a/Home.md b/Home.md
index 7857c22..3244645 100644
--- a/Home.md
+++ b/Home.md
@@ -200,6 +200,13 @@ Given:
 
 
 ```assembly
+                     ; Algorithm Y to TXT address
+                     ; INPUT: A = row
+
+                     BASL     EQU   $28
+                     BASH     EQU   $29
+
+                              ORG   $FBC1
 FBC1: 48        577  BASCALC  PHA              ;CALC BASE ADR IN BASL,H
 FBC2: 4A        578           LSR              ;  FOR GIVEN LINE NO
 FBC3: 29 03     579           AND   #$03       ;  0<=LINE NO.<=$17
@@ -215,6 +222,28 @@ FBD3: 0A        588           ASL
 FBD4: 05 28     589           ORA   BASL
 FBD6: 85 28     590           STA   BASL
 FBD8: 60        591           RTS
+
+                     ; Table Y to TXT address
+                     ; INPUT: Y = row
+
+                     y2txtL   EQU   $1280
+                     y2txtH   EQU   $1298
+
+                              ORG   $1200
+1200: B9 80 12       Y2TXTADR LDA   y2txtL, Y
+1203: 85 26                   STA   GBASL
+1205: B9 98 12                LDA   y2txtH, Y
+1208: 85 27                   STA   GBASH
+120A: 60                      RTS
+
+                              ORG   $1280
+1280: 00 80 00 80 00 80 00 80                  ; Rows  0 .. 7 ($00 .. $07)
+1288: 28 A8 28 A8 28 A8 28 A8                  ; Rows  8 ..15 ($08 .. $10)
+1290: 50 D0 50 D0 50 D0 50 D0                  ; Rows 16 ..23 ($10 .. $17)
+
+1298: 04 04 05 05 06 06 07 07                  ; Rows  0 .. 7 ($00 .. $07)
+1298: 04 04 05 05 06 06 07 07                  ; Rows  8 ..15 ($08 .. $10)
+1298: 04 04 05 05 06 06 07 07                  ; Rows 16 ..23 ($10 .. $17)
 ```