The book's cipher challenge stage 1 is a simple monoalphabetic substitution cipher. In this e-mail below is a copy of the book's stage 1 cipher in a REXX program for AS/400. With a five minute "fun" break you can break it. Upload this source to a member of type REXX. On green-screen WRKMBRPDM & SEU use option 16, 2, 16, 2 etc. to run and edit the REXX. Little by little, replace the 26 blanks in the variable 'TO' with monoalphabetic substitutions below the variable 'FROM'. Eventually the plaintext message will appear. /* REXX */ From = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" To = " " Say "-----------------------------------------------------------" A.1 = "BT JPX RMLX PCUV AMLX ICVJP IBTWXVR CI M LMT'R PMTN, MTN " A.2 = "YVCJX CDXV MWMBTRJ JPX AMTNGXRJBAH UQCT JPX QGMRJXV CI JPX " A.3 = "YMGG CI JPX HBTW'R QMGMAX; MTN JPX HBTW RMY JPX QMVJ CI JPX" A.4 = "PMTN JPMJ YVCJX. JPXT JPX HBTW'R ACUTJXTMTAX YMR APMTWXN," A.5 = "MTN PBR JPCUWPJR JVCUFGXN PBL, RC JPMJ JPX SCBTJR CI PBR " A.6 = "GCBTR YXVX GCCRXN, MTN PBR HTXXR RLCJX CTX MWMBTRJ " A.7 = "MTCJPXV. JPX HBTW AVBXN MGCUN JC FVBTW BT JPX MRJVCGCWXVR," A.8 = "JPX APMGNXMTR, MTN JPX RCCJPRMEXVR. MTN JPX HBTW RQMHX, " A.9 = "MTN RMBN JC JPX YBRX LXT CI FMFEGCT, YPCRCXDXV RPMGG VXMN " A.10 = "JPBR YVBJBTW, MTN RPCY LX JPX BTJXVQVXJMJBCT JPXVXCI, " A.11 = "RPMGG FX AGCJPXN YBJP RAMVGXJ, MTN PMDX M APMBT CI WCGN " A.12 = "MFCUJ PBR TXAH, MTN RPMGG FX JPX JPBVN VUGXV BT JPX " A.13 = "HBTWNCL. JPXT AMLX BT MGG JPX HBTW'R YBRX LXT; FUJ JPXE " A.14 = "ACUGN TCJ VXMN JPX YVBJBTW, TCV LMHX HTCYT JC JPX HBTW JPX " A.15 = "BTJXVQVXJMJBCT JPXVXCI. JPXT YMR HBTW FXGRPMOOMV WVXMJGE " A.16 = "JVCUFGXN, MTN PBR ACUTJXTMTAX YMR APMTWXN BT PBL, MTN PBR " A.17 = "GCVNR YXVX MRJCTBRPXN. TCY JPX KUXXT, FE VXMRCT CI JPX " A.18 = "YCVNR CI JPX HBTW MTN PBR GCVNR, AMLX BTJC JPX FMTKUXJ " A.19 = "PCURX; MTN JPX KUXXT RQMHX MTN RMBN, C HBTW, GBDX ICVXDXV; " A.20 = "GXJ TCJ JPE JPCUWPJR JVCUFGX JPXX, TCV GXJ JPE ACUTJXTMTAX " A.21 = "FX APMTWXN; JPXVX BR M LMT BT JPE HBTWNCL, BT YPCL BR JPX " A.22 = "RQBVBJ CI JPX PCGE WCNR; MTN BT JPX NMER CI JPE IMJPXV " A.23 = "GBWPJ MTN UTNXVRJMTNBTW MTN YBRNCL, GBHX JPX YBRNCL CI JPX " A.24 = "WCNR, YMR ICUTN BT PBL; YPCL JPX HBTW TXFUAPMNTXOOMV JPE " A.25 = "IMJPXV, JPX HBTW, B RME, JPE IMJPXV, LMNX LMRJXV CI JPX " A.26 = "LMWBABMTR, MRJVCGCWXVR, APMGNXMTR, MTN RCCJPRMEXVR; " A.27 = "ICVMRLUAP MR MT XZAXGGXTJ RQBVBJ, MTN HTCYGXNWX, MTN " A.28 = "UTNXVRJMTNBTW, BTJXVQVXJBTW CI NVXMLR, MTN RPCYBTW CI PMVN " A.29 = "RXTJXTAXR, MTN NBRRCGDBTW CI NCUFJR, YXVX ICUTN BT JPX " A.30 = "RMLX NMTBXG, YPCL JPX HBTW TMLXN FXGJXRPMOOMV; TCY GXJ " A.31 = "NMTBXG FX AMGGXN, MTN PX YBGG RPCY JPX BTJXVQVXJMJBCT. JPX" A.32 = "IBVRJ ACNXYCVN BR CJPXGGC. " Do X = 1 To 32 Say A.X Say Translate( A.X, To, From ) Say ' ' End X Say ' ' +--- | This is the MI Programmers Mailing List! | To submit a new message, send your mail to MI400@midrange.com. | To subscribe to this list send email to MI400-SUB@midrange.com. | To unsubscribe from this list send email to MI400-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: firstname.lastname@example.org +---
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.