Replace ¥ font character with <COIN> (#7)

engine/events/std_scripts.asm

@@ -840,8 +840,8 @@ ChipVendor_IntroScript:
 .MenuData:
 	db STATICMENU_CURSOR ; flags
 	db 3 ; items
-	db " 50 :  ¥1000@"
-	db "500 : ¥10000@"
+	db " 50 :  <COIN>1000@"
+	db "500 : <COIN>10000@"
 	db "CANCEL@"
 
 HappinessCheckScript:

engine/math/print_num.asm

@@ -19,7 +19,7 @@ _PrintNum::
 	jr z, .main
 
 .moneyflag ; 101xxxxx or 011xxxxx
-	ld a, "¥"
+	ld a, "<COIN>"
 	ld [hli], a
 	res 5, b ; 100xxxxx or 010xxxxx
 
@@ -155,7 +155,7 @@ _PrintNum::
 	jr .money_leading_zero
 
 .money
-	call .PrintYen
+	call .PrintCoin
 	push af
 	ld a, "0"
 	add c
@@ -170,7 +170,7 @@ _PrintNum::
 
 .money_leading_zero
 	call .AdvancePointer
-	call .PrintYen
+	call .PrintCoin
 	ld a, "0"
 	add b
 	ld [hli], a
@@ -179,14 +179,14 @@ _PrintNum::
 	pop bc
 	ret
 
-.PrintYen:
+.PrintCoin:
 	push af
 	ldh a, [hPrintNumBuffer + 0]
 	and a
 	jr nz, .stop
 	bit 5, d
 	jr z, .stop
-	ld a, "¥"
+	ld a, "<COIN>"
 	ld [hli], a
 	res 5, d
 
@@ -264,7 +264,7 @@ _PrintNum::
 	jr nz, .done
 	bit 5, d
 	jr z, .done
-	ld a, "¥"
+	ld a, "<COIN>"
 	ld [hli], a
 	res 5, d
 .done