10 REM 10 REM MLANDER .BAC     Ver. 4.1 
20 REM (c)  S.Software  Dat. 1984.12.03
30 REM Stefan Svensson  Tel. 0511-83332
40 REM 
50 REM 
60 ; CHR$(12%);
70 ; '`rsq0'
80 ; '/'' +/  ,,, (,,$(,,$,,,($ ($ ,, (,,, ,,,';
90 ; 'o||0 bq "!s  sb1   s b1 b1r!"qb1 b1s'
100 ; ' ##//  (,, ,  ,(,,  , ($ ($,,,,(,,, ,,$';
110 ; 'o}p~? `0 b1s  sb1   s b1pb1s  sb1#p s'
120 ; ' (,$ / ,,, (,,$($   ,  ,,, ,  ,($ ($,,,';
130 ; '';
140 ; ',,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,z%,,,,';
150 ; ' `<.#mp<x.kt<''k4`<''} `<''k4x.kv?#-'
160 ; '  j5  j5j?! h7  ~i7   h7  ~k?!`?z%  x,t';
170 ; '     z%    p>! ##+t p>!  z%  *up3';
180 ; ' j5  x''j5   #!     x''#!`~5   k4    ';
190 ; '`?+,''! /    "-.# +,''! "-.#/   "- +,+,.!';
200 ; '.!#####################################';
210 ; CUR(0%,23%)CHR$(5%)'copyright dec''84';
220 REM 
230 FOR L%=15% TO 19% : READ R$ : R$=CHR$(20%)+R$+SPACE$(39%-LEN(R$)) : ]%=PEEK(L%*2%+884%)+SWAP%(PEEK(L%*2%+885%))
240 FOR R%=0% TO 39% : POKE ]%+R%,ASC(RIGHT$(R$,R%+1%))+128% : NEXT R% : NEXT L%
250 ; CUR(20%,0%); : CHAIN 'MLANDER.GAM'
260 REM 
270 DATA ''
280 DATA '  =085         5          j'
290 DATA '  5" 5bs4=#$fs!5   syj&ih#khsyj&)'
300 DATA 'pp5p05ep55pppp%upp*pzj`j*pn*p8j`ppppppp'
310 DATA ''