:SAVE "MSX2PCHR.BAS"%ͷ/ AZ5(C2 "*.TXT"K<:uF "Filenaam (zonder extensie): ";F$ŃP: "De file "F$".TXT wordt ingelezen en de aangepaste file "F$".IBM wordt"كZ "aangemaakt."d: "Doorgaan? (J/n) ";: A$$(): A$"N" A$"n" : ,nAN$()"["Dx AN$".";AN$"3.";^ F$".TXT" AS #y F$".IBM" AS #A$$(,#)  #,A$; A$; () ̈́ () ׄ :Subroutine MSX -> PCA(A$) A 6$ A 4 A C A NA$"*"T"r,:Alternatieve karakters6A$$(,#)@A(A$)J AQ A[ hTA$"*"^h:Omzetbare alternatieve karaktersr | I AQ C: A$(C) I!^ &HC1,&HC2,&HB4,&HC3,&HC5,&HB3,&HC4,&HDA,&HBF,&HC0,&HD9v:Escape-sequencesA$$(,#)A(A$) A$"Y" ͆ A$"E" A$"j" A$( ):  A$"K" A$"0K" A$"J" A$"0J" A$"I" A$"2K"@ A$"x" A$"y" A$$(,#): A$"": NA$AN$A$TvX($(,#)): Y($(,#)&S$(X)0A$AN$(S$,(S$))";":S$(Y)͇DA$A$(S$,(S$))"H"ӇN