Mit der Materie, die dich zum Final bringen wird, hat Azzo jahrelang seine Brötchen verdient und das ist es wohl wert, diesem Thema auch einen Cache zu widmen.
Gemeinsam mit Matricula und Wiener Urkunde hat sich nun auch ungeplanter Weise eine kleine Serie ergeben, die den Titel "Alte Kulturtechniken, von denen Azzo nicht will, dass sie vergessen werden" tragen könnte.
Gut, also so geht's zum Cache:
The following text will lead you to the cache:
IDENTIFICATION DIVISION.
PROGRAM-ID. GC5K21W.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 V-ATTRIBUTES.
05 V-I-COUNTER PIC 99 VALUE 0.
05 V-O-COUNTER PIC 99 VALUE 0.
05 V-I-MAX PIC 99 VALUE 44.
05 V-CONST01 PIC X VALUE "N".
05 V-CONST02 PIC X VALUE "E".
05 V-CONST03 PIC X VALUE SPACE.
05 V-CONST04 PIC X VALUE ".".
05 INPUT-STRING PIC X(44) VALUE "30391575476250869130253647516230422133485439".
05 INPUT-TAB REDEFINES INPUT-STRING.
10 IN-T PIC X OCCURS 44.
05 OUTPUT-STRING PIC X(25).
05 OUTPUT-TAB REDEFINES OUTPUT-STRING.
10 OUT-T PIC X OCCURS 25.
PROCEDURE DIVISION.
DISPLAY "Die Koordinaten sind/The coordinates are:"
PERFORM VARYING V-I-COUNTER FROM V-I-MAX BY -2 UNTIL V-I-COUNTER = 0
ADD 1 TO V-O-COUNTER
EVALUATE TRUE
WHEN V-O-COUNTER = 1
MOVE V-CONST01 TO OUT-T (V-O-COUNTER)
WHEN V-O-COUNTER = 4 OR 11 OR 16
MOVE V-CONST03 TO OUT-T (V-O-COUNTER)
WHEN V-O-COUNTER = 7 OR 19
MOVE V-CONST04 TO OUT-T (V-O-COUNTER)
WHEN V-O-COUNTER = 12
MOVE V-CONST02 TO OUT-T (V-O-COUNTER)
WHEN OTHER
MOVE IN-T (V-I-COUNTER) TO OUT-T (V-O-COUNTER)
END-EVALUATE
END-PERFORM.
DISPLAY OUTPUT-STRING.
STOP RUN.
Deine Lösung für die Koordinaten dieses Rätsels kannst du auf geochecker.com überprüfen. GeoChecker.com.
Viel Spaß!
Good luck!