:1: ExecROM patchfile editor vr 1.0T: (c) 1997,1998 A&L Software\: : (: : , ::  : P$(): AZ: &:P:T1:T2: / B$(X)("00"(X),): W$(X)("0000"(X),): A$(X$)W$(((X$,,))((X$,,)))"h": I$(X)((X),)$: : ,:  )"1. Load patchfile"::  )"2. Save patchfile"::  )"3. Create new patchfile":.  )"4. Edit patchfile"::  )"5. Options"::  )"6. End program".8A$: A$"1" A$"6" 8 : (A$) V,,,,h,BdBA$"The program will be terminated": L:: :҂L ,: A$".":"Proceed (Y/N)?";:W$$(): W$: W$"Y" W$"y" : W$"N" W$"n" $ : L3VA$"Loading a patchfile will clear memory": L:"File name (no extension)";N$:N$N$".XPC"k` N$ AS 1 : #, AS B$: () : N$: 5ÃjA$"": I : #,I:A$A$B$:: A$"ExecROM patchfile"()  : t #,:V(B$):NT:R5~ :T(B$): T :P: $ : NTNT: :P$(NT,,)(T)B$:A$""脈 : B$"$" A$A$B$:  : P$(NT,,)A$: I T:A$"": J : :A$A$B$::P$(NT,I,)A$:A$"": J (P$(NT,I,)): :A$A$B$::P$(NT,I,)A$:: ~ #,R:RR:9 P : A$"Existing file will be overwritten": L"File name (no extension)";N$:N$N$".XPC": N$ AS 1: #,"ExecROM patchfile"()(V); I NT: #,P$(I,,)P$(I,,)"$";: J (P$(I,,)): #,P$(I,J,)P$(I,J,);: J,I: #,();:: $SA$"Creating a patchfile will clear memory": L: : $P: P$: P$(T1,T2,):PP:PS: :V: P $ : PP:PS: :: )"version "(("0"(V),),)"."((V),)>:"Patch name : (";: ((P$(PP,,),,)) "essential"; : "optional";zA(P$(PP,,)):","PP"of"(NT)")": P$(PP,,):"Block number :"PS"of"A:A(P$(PP,PS,)):"Number of bytes:"A:"Address : "A$(P$(PP,PS,));]" (page "I$(((P$(PP,PS,),)))")"::"Data sample :": I : ,I : W$(I): J : J,I Ո  (IJ)A K((P$(PP,PS,),IJ,)): B$(K);:  J: ((K.)(K K).);: J,I : "XX": J,I] ,:"ew block new atch nae ize erel block dl patch pae ptional":" block patch daa ddress ESC";A$: A$""  : A$"Z" A$((A$) )( A$() PP PPPP:PS: 2 A$() PPNT PPPP:PS: < A$() PS PSPS: GF A$() PS(P$(PP,,)) PSPS: P A$"N" A(P$(PP,,)): A (P$(PP,,),,)(A):P$(PP,A,)(,):P$(PP,A,)(): Z A$"P" NT NTNT:IPP:JPS:PPNT:PS: :PPI:PSJ: 6d A$"M" :"Patch name";P$(PP,,): n A$() $ : A$"A"  : A$"T" (P$(PP,PS,))  x A$"V" : "Patch version (x.y):";A$: (A$) (A$,,)"." A$"V": x : V("&h"(A$,)(A$,)): Q A$"O" (P$(PP,,),,)(((P$(PP,,),,)) ):   A$"S" : "Block size (bytes):";A$:A(A$): A  : A A$"S":  : (P$(PP,PS,),,)(A):P$(PP,PS,)(P$(PP,PS,)((P$(PP,PS,)),),A):  A$"D" A(P$(PP,,)): A IPS A:P$(PP,I,)P$(PP,I,):P$(PP,I,)P$(PP,I,)::AA:(P$(PP,,),,)(A):PSPS(PSA)(PSA): b A$"E" NT PPNT NTNT:PPNT:  : IPP NT: J (P$(I,,)):P$(I,J,)P$(I,J,):P$(I,J,)P$(I,J,):::NTNT:PPPP(PSNT)(PPNT): l  :"Address ("A$(P$(PP,PS,))"):";: A$: A$"" A("&h"A$):(P$(PP,PS,),,)(A ):(P$(PP,PS,),,)(A)u ,:"Page ("I$(((P$(PP,PS,),)))"):";: A$: A$"" A(A$): A A  : (P$(PP,PS,),,)(A) ď ,: x): ,: (,);: I : I,:: ,:3: ::K(P$(PP,PS,)):"patch:";(P$(PP,,)( ),)" block:"I$(PS)" size:"I$(K);: %:"ESC"b I  : ,I: T::I: , (I ):A$$(): A$() Ԑ A$() (I ) II :  II: , : J A$() II: (I )  @ : ,@ A$()  II: , : Jo A$()  II: , : @ۑ"A$((A$) (A$"Z")): ("0123456789ABCDEF",A$)  : A("&h"A$): IK :  : A$;n,A$$():A$((A$) (A$"Z")): ("0123456789ABCDEF",A$) , : A$;:AA("&h"A$): (I ): ((A.)(A A).);6(P$(PP,PS,),I,)(A):A$(): @II:TI:R(I): IR R : ,(IR): T::IT: ,: NJ I II:TI:R(I): IR R : ,(I(R)): T:: ,:  : T W$(I);: J : J,: IJK A((P$(PP,PS,),IJ,)): B$(A);: J: ((A.)(A A).); : "XX";: J:" ";^:Hh: : ,:"Free memory : "()"bytes":"Memory used by editor: "("")"bytes"r ,:"Maximum patchs per patchfile ("I$(T1)"):": A$: A$"" A(A$): A A2 r : T1A| , :"Maximum blocks per patch ("I$(T2)"):": A$: A$"" A(A$): A A2 | : T2A' $6: , :_: 5 A$"File not found":   A$"File isn't ExecROM patchfile":   A$"Patchfile too big":P: 앸  A$"Insufficient memory": ? 2 )"Program error""at line ":  )"Strike any key..."$(): WA$"Disk I/O error" (((A$)))A$:: I :: $: : : )"ExecROM patchfile editor vr. 1.0": )"(c) 1997,1998 A&L Software": <P$(PP,,)()():P$(PP,,)"":P$(PP,PS,)(,):P$(PP,PS,)():V 0,16,8,255,8,16,0,0r 0,32,64,255,64,32,0,0 0,16,16,16,84,56,16,0 0,16,56,84,16,16,16,0& : I : A: hI,A:: I : I,( I) ( I)::