TIP: Click on subject to list as thread! ANSI
echo: 4dos
to: All
from: Klaus Meinhard
date: 1998-12-31 00:02:44
subject: XROT13.BTM

Hallo All,

I stumbled across an old batch by somebody else and revamped it a little
bit. Basically it is a routine to read a file byte for byte, do something
to that byte (I choose Rotation 13 or Caesar's Cipher, because the original
author had done so) and write it to another file.

This file shows that it is possible (and the how-to) to get around the
problems posed by 4DOS' special characters.

I wish you a happy, healthy and peaceful 1999.

Here comes

begin 644 Xrot13.zip
M4$L#!!0````(`#R^GB7B;G6X9P<``,H3```*````6%)/5#$S+D)43:U87U,C
MN1%_WJW:JGR$AJM);#(>;/-G#Q_>{at}P!;1S;{at}%)!L4ASQR3.RK7A&\DD:;">;
M+W;)XSTD#_E,2;36LG^LW-!?RD
M]D>NC5`26E$SA)UF=,KCJ'5P\.6KEYT._0`,%O!9[5W*<{at},77,{at}QTXG'^-S6
M[K1W=P^VVSO[4:O9W'L:R+M^:<11+$P4JZSB%#,\`?3[Y/CL^OC*\?4I1W^K
MYM%0/`VFAXMA"]X*F3+Y1((QQ.T5&R>,
M&Z;A1$S'7`.7L5Y,K5`RA(0/69Y:T,JV=B+XG5(38!;LF*,8$CC$KC`P%"G?
M\%{at}W(N/&LFP*K;W&I;IOD*IHI>O]&->?PYC=&;S>]J]=N[#W\!;N/({at}_ELR1`,232/$08QDS!`4ZS58I!;;RI)CK2:"3DJ
M+&-3;ZS{at}AM;OGO:N(V2096!RY,TKFZD\33RK(INBX:B<`,<\`S'T2#A8H$B"
M2I%T=L]$RM!';Q_]PM!5(D4T:8QE".Y,{at}1JR/4,Y?H],RCP;X)^%RF'&I*V'
M%+][EN8(ER3>E8Q-N(="1]ETFF)PB9$(_HS+8F?QTEB468"/DD'?J\$&/O>Q
M]&`N(,1BQ=9OR/%A+C=>O7SUDA+\B,=CA70-_7#+<)NJF*7%,)TV(5(Z{at}N!(R(3/;X-?AE_?P8A#$T8*/3J_?-NC%:3RW!"A&`"MK',+
M)D{at}O)9\6UPRI\^J`^>2=K7;-%)A1^4RV7ATI0O5V>7I
M0TUY8W=O__67*S9,L_NA,FIUMRNC=O?'RFBG
M^^UJ%*.IENMNLS*5:Z-T%ZE4'?PEUC6;9J=96E/QB[H&WBL]$7+TOVK8QDPF
M*6]AK({at}?-:7("QG2L1D.[A[*M=?D,,8A')OW$&MOCFL6%,P
M{at}KY6,R`GTCR3V!F.Z#X-^H,1!+>FS,O"?P{at}"V+VK9F*%&]IM\5)T71F*S;O+
MK>#L(L]N{at}\+ML%5%=9MI3AMV?P\BE(AHF'(X:#Y(Q2JXMW3^ZT`K6P$KCP7$
MLP3P0+RQMK,HE5?:#UZO:6^UVS]3/2%\6G^1Y57P),^R11%O%^5!25O;'1)T
MP")022!").JCC=!\D)Z!3]]57E6UQ*DR?!F;2O(]*M2^JR8[-.!42>Y.<NT"G$
M0:5)I>B"C-NQ2CHKL,?;>N'&)LP7:I^R[+F:`[M>2,OFG\,4;V!1R
M$PXW56XWWWP&V'.U-;!#9U%9:9<_JIJ,T[9>!SA0CI=_.7*B_?BXZ\;G')5K9+I
M`E6EN3N34D8[!W(JS:F:1PNYEE1.NX>%4FF'[+PZNX!3EDD0={at}-JU&,8C^]S
ME8!$%-I[:2I&:$K="Y^[K>FK>^C[!.F3<_VIYL;PI.^,"IU8HJCZ&Y,)5D'?
MY7J_5.M>`/342Q+/T`G$*N'0:=0`CF5"=VD.DG/_.707,I3/$/=PPAF/-1NK
ME(:DJ7RCHO%>B00R)F2->G6:^CO]
M$J3DJT+HQ6Q,N[A6B[LC;DEWK5Z'C2Z<]=[6O?R+%\{at}X"71W=NOPX0.X[NME
M]V`?5V`$W>+V;OTKOZB";'5:6/^M4>)HNC_B][T_7)Y&\`TSI9:UI(DB)>)N=;AG!P``RA,```H``````````0`{at}````````
A`%A23U0Q,RY"5$U02P4&``````$``0`X````CP<`````
`
end

Greetings from Ostrhauderfehn, 31. Dezember 1998, 0:02:45

*Klaus Meinhard*

--- WP/95 Rel 1.4 (190.0) Reg.
* Origin: Too much money? Get married or run a BBS! (2:2449/236.1005)
SEEN-BY: 396/1 632/0 371 633/260 262 267 270 371 635/444 506 728 639/50 252
@PATH: 2449/236 200 150 24/888 396/1 633/260 635/506 728 633/267

SOURCE: echomail via fidonet.ozzmosis.com

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.