Startup code

20896: Change game character's name.


Used by routine at 21152

A Message number corresponding to character's name

20896 6F LD L,A
20897 26FE LD H,254
20899 5E LD E,(HL)
20900 24 INC H
20901 56 LD D,(HL) DE=address of message (character's name)
20902 EB EX DE,HL
20903 01000C LD BC,3072 B=12, C=0
20906 71 LD (HL),C Blank out the current name
20907 23 INC HL
20908 10FC DJNZ 20906
20910 F5 PUSH AF
20911 214050 LD HL,20544
20914 CDBC50 CALL 20668 Print name built up so far
20917 CDE271 CALL 29154 Wait for a keypress
20920 28FB JR Z,20917
20922 FE0D CP 13
20924 47 LD B,A
20925 2002 JR NZ,20929
20927 F1 POP AF
20928 C9 RET Return with new name entered
20929 F1 POP AF
20930 6F LD L,A
20931 26FE LD H,254
20933 5E LD E,(HL)
20934 24 INC H
20935 56 LD D,(HL)
20936 210B00 LD HL,11
20939 4F LD C,A
20940 19 ADD HL,DE HL=address of last byte in message area for character name
20941 7E LD A,(HL)
20942 A7 AND A
20943 2008 JR NZ,20953 Jump if message area is already full
20945 EB EX DE,HL HL=start address of message area
20946 2B DEC HL
20947 23 INC HL
20948 7E LD A,(HL)
20949 A7 AND A
20950 20FB JR NZ,20947
20952 70 LD (HL),B Put new letter in message area
20953 79 LD A,C
20954 18D2 JR 20910