#include <stdio.h>
#include <ctype.h>
#include <bbs.h>

/*                                ¶²¹¹°3ì6Me!     –ºÖ¶Š–·          e <cty          �¬…¤EÉ!     –ºæ„ul-  <ñ                       •                        PïÜú  a   all  equ •tial- */<cty  t higú  ;		   higú      �¬…•      cur  •tl           , */<c  t coun ;		   •      of         , */<cty  t xl[1000];		   a  u      itiall  all z  os */<cty  ru!  _msg    g;<ctyma  () {<cty  t msgnbr,newmsg,i,msg¤EÉ!;<ccha  •a  [14],new•a  [14];<cty	p   tf("FidPïM  �¬…R   –ºæ„ul (Packul) Vuls    %s\r\n",VER);ty	p   tf("All          will b!     –ºæ„ud  PïÜú  a   all  equ •tial-\r\n");ty	p   tf("You  u   b! loggud   tPïÜú    �¬…    ! or  forïÜi  tPïwork-\r\n");ty	p   tf("Al Pïhandl     pli  , etc p o<ñrl -\r\n");ty	p   tf("T   RETURN tPïco•ti  e, orï^C tPïabort-\r\n");ty	lco•  ();<cty	msgcoun ();	   coun    , */<c	p   tf("%u                   .R   –ºæ„    tak   Ü   pa    -\r\n",coun );<cty	p   tf("Pa   1:R  a     all tPïwork    •a   ,\r\n");ty	forï(msgnbr= 1; msgnbr  = higú  ; msgnbr++) {	   r  a   all ¤Elst, */<c		sp   tf( a  ,"%u.msg",msgnbr);	   ori  •a  , */<c		sp   tf( ew•a  ,"%u.  –",msgnbr);<c		_xr  a  ( a  , ew•a  );		   r  a  , i no   æ„ or, */<c	}<cty	newmsg= 1;ty	msgnbr= 1;ty	p   tf("Pa   2:R   –ºæ„   , c  at    translat! li t-\r\n");ty	i= coun ;ty	whEÉ! (i--) {<c		msgnbr= ¤Endmsg(msgnbr,".  –");	   ¤End a        , */<c		sp   tf( a  ,"%u.  –",msgnbr);	   mak  ori   al •a  , */<c		sp   tf( ew•a  ,"%u.msg",newmsg);   •ew •a  , */<c		p   tf("Msg #%u ºæco    #%u\r\n",msgnbr,newmsg);<c		_xr  a  ( a  , ew•a  );<c		xl[msgnbr]= newmsg;		   •ot! •ew • –ºæ„, */<c		++msgnbr; ++newmsg;		   •ex  ... */<c	}<cty	msgnbr= 1;ty	p   tf("Pa   3:Translat    R pli  \r\n");ty	i= coun ;ty	whEÉ! (i--) {<c		msgnbr= ¤Endmsg(msgnbr,".msg");	   ¤End a        , */<c		p   tf("Msg #%u:",msgnbr);<c		sp   tf( a  ,"%u.msg",msgnbr);<c		msg¤EÉ!= _xo<ñn( a  ,2);<c		ifï(msg¤EÉ! == -1) {<c			p   tf("HORRIBLE ERROR:Can  o<ñn¤EÉ!. (E•ougïhandl  ?)\r\n");ty			p   tf("All   pli    sco•n ! ud. FixïÜú p obl  ,\r\n");ty			p   tf("run  a  , andïÜú  will all b! · e  pli    sco•n  Âöë† (i--)EX    £ ,"        t -1) {y			p  ,r\<c  (	p  )   , i  t?)  t		++msgnbrEÉ! =p  .  scll||tyma .   t msgn(i-=p  .  scl=VER)=p  .  scl]  , ! li t-\r\   æ„, msgnbr	yma .  =VER)=p  .  ]  ori ",m*/<c		y  t xl[1	brEÉ! =p  .  scl) run  a Is\r\n"y\       );<p  .  scl);[1	brEÉ! =p  .   tHORRIBLE as\r\n"y\   );<p  .   ;xl[1	br  ",ek -1) {y	0L	0nd a  ",ek\   );  	sp   tf(r  wOR\r -1) {y			p  ,r\<c  (	p  )   £ ,"       y r -1) {y   £ HORRIBLE•n  Âöë† (i; ++newms	msgnb"Msg #%u:   ! or           y	wmn"ñreo•n  Âöë† ,"       �C */<cl  ,f         , */<cty  will a    �¬…•      cur  •t,   d-\r\ � _m   •  -1) {   ly  t hig();	   cou g ms y  yfr\<c•a  [14],new•a  ;gnbr,nn;xl[1		   c=V0s	ms   �¬…=V0s	ms--) {<c      u:*wmsg); c		i&fr\<c	0<cty	p p   tf(;    •        , */<ca • h		++msgnbr,new•msgl2);<c		p - 4g;	'\0'd a  t	"ñrell a wmsg\r\ 	sp   tf(n;	-\oi4		xl[msgnbEÉ!  a>    �¬…)    �¬…;		d a  pils    �¬…y 	p   tf(}† ," " msgnbr,"ur ,*/<)gnbr,nnr •a  [14]**/<;g ms [14],new•80 ;gnbr,nha  •a 	ms--) {<c	p   tf(EÉ!  (EÉ!    �¬…)      t  c	0tf( a  ,"%u.msg",msgnbc		! tf( a  2)ci4sg",ms)gnbf( a n( a  ,2);<c		ifï(0gnbEÉ!  a> {