00070 A.A = size-1 00079 start object phase 00080 D (characters per line) = 64 00083 B.A = size-1 00085 A.A = adr of alloc str 00088 D0 = adr of alloc str 0008B D0 = adr of alloc str data 0008E point to checksum on stack 00091 C.A = adr of checksum 00094 save adr of checksum 00096 point to orig object 00099 A.A = adr of orig object 0009C D1 = adr of orig object 0009F A.S = first nibble of object 000A3 C.S = first nibble of object 000A6 modify A.A's copy of data 000A9 and try to update memory 000AD fetch nibble back 000B1 go if RAM (changed) 000BD fix RAM (replace orig nibble) 000C1 count character in line 000C4 go if not EOL 000C7 reset D for new line (D=63) 000CB ... 000D2 append line feed 000D5 ... 000D8 convert nibble to character 000FF store character into string 00102 next character 00105 next nibble 00108 decr nibbles remaining 0010A go if more 0010D exit if checksum in progress 00112 start checksum phase 00115 B.A = 3 (size of checksum - 1) 0011C ... 0011E C = adr of checksum 00120 D1 = adr of checksum 00123 D1 = adr of checksum data 00126 go process checksum