diff --git a/samples/kim1/subs.asm b/samples/kim1/subs.asm
index 5b525749e..64713a148 100644
--- a/samples/kim1/subs.asm
+++ b/samples/kim1/subs.asm
@@ -775,7 +775,7 @@ _DrawChar:      sty tempy
                 sta dest_hi
 
                 lda #0                              ; Get the address in font memory where this
-                sta src_hi                          ;  Petscii chracter lives (after conversion from
+                sta src_hi                          ;  Petscii character lives (after conversion from
                 lda tempa                           ;  ascii)
 
                 sty temp2