AMIGA: Small rewrite of RM2AG.rx

GitHub´s utf-8 converter adds a char and changes the file when using characters like "°".
Slightly rewritten the rexx script to use "<>" as marker and adjust the rest to take the new two-char marker into account (instead of the one-char marker that was used before).

1 files changed, 30 insertions, 30 deletions

diff --git a/dists/amiga/RM2AG.rx b/dists/amiga/RM2AG.rx
index c29ab6fe19..25f82ab28a 100644
--- a/dists/amiga/RM2AG.rx
+++ b/dists/amiga/RM2AG.rx
@@ -1,5 +1,5 @@
 /*
-README to .guide converter $VER: RM2AG.rx 0.14 (29.12.2017)
+README to .guide converter $VER: RM2AG.rx 0.15 (25.01.2018)
 
 This script converts the pure ASCII-text based README file of ScummVM to a
 basic Amiga guide file.
@@ -43,59 +43,59 @@ DO WHILE EOF(readme_read) = 0
 	working_line=READLN(readme_read)
 
 	/* Checking if the sub links have been reached and leave the loop, if met */
-	IF POS('°1.0°',working_line) = 1 & x > 1 THEN
+	IF POS('<>1.0<>',working_line) = 1 & x > 1 THEN
 		LEAVE
 
 	/* If no chapter has been found, simply write the line */
-	IF POS('°',working_line) = 0 THEN
+	IF POS('<>',working_line) = 0 THEN
 		WRITELN(guide_write,working_line)
 
 	/* Fix the empty chapters - two chapters (1.0 and 7.8) are empty and consist of only the headlines.
 	    We add them to the following chapter and link both of them to the empty one */
 
 	/* If chapter 1.1 is found add a link node to 1.0 (as chapter 1.0 is empty) */
-	IF POS(' * °1.1°',working_line) = 1 THEN DO
+	IF POS(' * <>1.1<>',working_line) = 1 THEN DO
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 		WRITELN(guide_write,'    @{" 1.1 " Link "1.0"} 'working_line)
 	END
 
 	/* If chapter 7.8.1 is found add a link node to 7.8 (as chapter 7.8  is empty) */
-	IF POS(' * * °7.8.1°',working_line) = 1 THEN DO
+	IF POS(' * * <>7.8.1<>',working_line) = 1 THEN DO
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 		WRITELN(guide_write,'      @{" 7.8.1 " Link "7.8"} 'working_line)
 	END
 
 	/* If a single number main chapter is found 1.0 upto 9.0), prepare and write the link node */
-	IF POS('.0',working_line) = 3 THEN DO
+	IF POS('.0',working_line) = 4 THEN DO
 		WRITELN(guide_write,' ')
-		WRITELN(guide_write,'  @{" 'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1) '" Link "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'"} 'COMPRESS(working_line,'*°'))
+		WRITELN(guide_write,'  @{" 'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2) '" Link "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'"} 'COMPRESS(working_line,'*<>'))
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 		x=x+1
 	END
 
 	/* If a double number main chapter is found (10.0 ff), prepare and write the link node */
-	IF POS('.0',working_line) = 4 THEN DO
+	IF POS('.0',working_line) = 5 THEN DO
 		WRITELN(guide_write,' ')
-		WRITELN(guide_write,'  @{" 'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1) '" Link "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'"} 'COMPRESS(working_line,'*°'))
+		WRITELN(guide_write,'  @{" 'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2) '" Link "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'"} 'COMPRESS(working_line,'*<>'))
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 	END
 
 	/* If a level one sub chapter is found (i.e. 1.1), prepare and write the link node */
-	IF POS(' * °',working_line) = 1 THEN DO
-		WRITELN(guide_write,'    @{" 'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1) '" Link "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'"} 'COMPRESS(working_line,'*°'))
+	IF POS(' * <>',working_line) = 1 THEN DO
+		WRITELN(guide_write,'    @{" 'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2) '" Link "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'"} 'COMPRESS(working_line,'*<>'))
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 	END
 
 	/* If a level two sub chapter is found (i.e. 1.1.1), prepare and write the link node */
-	IF POS(' * * °',working_line) = 1 THEN DO
-		WRITELN(guide_write,'      @{" 'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1) '" Link "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'"} 'COMPRESS(working_line,'*°'))
+	IF POS(' * * <>',working_line) = 1 THEN DO
+		WRITELN(guide_write,'      @{" 'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2) '" Link "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'"} 'COMPRESS(working_line,'*<>'))
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'*°')
+		working_line=COMPRESS(working_line,'*<>')
 	END
 END
 
@@ -109,40 +109,40 @@ WRITELN(guide_write,'-----------------------------------------------------------
 /* Creating the sub links nodes */
 DO WHILE EOF(readme_read) = 0
 	/* If no chapter has been found, simply write the line */
-	IF POS('°',working_line) = 0 THEN
+	IF POS('<>',working_line) = 0 THEN
 		WRITELN(guide_write,working_line)
 
 	/* Fix the empty chapters - two chapters (1.0 and 7.8) are empty and consist of only the Headlines.
 	    We don't close the NODE, rather add the following chapter to the former empty one */
 
 	/* If chapter 1.1 is found don't close the NODE, just write the line */
-	IF POS('°1.1°',working_line) = 1 THEN DO
+	IF POS('<>1.1<>',working_line) = 1 THEN DO
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'°')
+		working_line=COMPRESS(working_line,'<>')
 		WRITELN(guide_write,working_line)
 	END
 
 	/* If chapter 7.8.1 is found don't close the NODE, just write the line */
-	IF POS('°7.8.1°',working_line) = 1 THEN DO
+	IF POS('<>7.8.1<>',working_line) = 1 THEN DO
 		/* Get rid of the markers so the following loops doesn't process them again */
-		working_line=COMPRESS(working_line,'°')
+		working_line=COMPRESS(working_line,'<>')
 		WRITELN(guide_write,working_line)
 	END
 
-	IF POS('°',working_line) > 0 THEN DO
+	IF POS('<>',working_line) > 0 THEN DO
 		/* Check for link references inside the text and create link nodes for them */
-		IF POS('section °',working_line) > 0 THEN DO
-			working_line=SUBSTR(working_line,1,POS('°',working_line)-1)'@{"'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'" Link "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'"}'SUBSTR(working_line,LASTPOS('°',working_line)+1)
+		IF POS('section <>',working_line) > 0 THEN DO
+			working_line=SUBSTR(working_line,1,POS('<>',working_line)-1)'@{"'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'" Link "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'"}'SUBSTR(working_line,LASTPOS('<>',working_line)+2)
 			/* Get rid of the markers so the following loops doesn't process them again */
-			WRITELN(guide_write,COMPRESS(working_line,'°'))
+			WRITELN(guide_write,COMPRESS(working_line,'<>'))
 		END
 		ELSE DO
 		/* If a chapter has been found, prepare and write the link */
 		WRITELN(guide_write,'@ENDNODE')
-		WRITELN(guide_write,'@NODE "'SUBSTR(working_line,POS('°',working_line)+1,LASTPOS('°',working_line)-POS('°',working_line)-1)'" "'COMPRESS(working_line,'°')'"')
+		WRITELN(guide_write,'@NODE "'SUBSTR(working_line,POS('<>',working_line)+2,LASTPOS('<>',working_line)-POS('<>',working_line)-2)'" "'COMPRESS(working_line,'<>')'"')
 		WRITELN(guide_write,' ')
 		/* Get rid of the markers so the following loops doesn't process them again */
-		WRITELN(guide_write,COMPRESS(working_line,'°'))
+		WRITELN(guide_write,COMPRESS(working_line,'<>'))
 		END
 	END