100 J:*PMINIT›110 *MOVE C:@B53248=#X›120 C:@B88=#Y›130 POS:0,0›140 T:$SHIP›150 *LOOP A:$S=%J0›160 MS:10,9,8,6,5,4,2,1,0›170 JM:*DR,*UR,*R,*DL,*UL,*L,*D,*U,*LOOP›180 *DR C:#X=#X+1›190 *D C:#Y=#Y+1›200 J:*MOVE›210 *UR C:#Y=#Y-1›220 *R C:#X=#X+1›230 J:*MOVE›240 *DL C:#Y=#Y+1›250 *L C:#X=#X-1›260 J:*MOVE›270 *UL C:#X=#X-1›280 *U C:#Y=#Y-1›290 J:*MOVE›300 *PMINIT›310 T:}             [CLEAR SCREEN›320 C:@82=9984      [FULL MARGINS›330 C:$SHIP= ¹Ýÿݹ [PM SHAPE DATA›340 C:#P=@B106-12   [BELOW SCREEN...›350 C:@B54279=#P    [IS PM AREA›360 C:#X=128        [PLAYER X POS.›370 C:#Y=48         [PLAYER Y POS.›380 C:@B704=14      [PLAYER IS WHITE›390 C:@B559=14      [ENABLE DISPLAY..›400 C:@B53277=3     [OF PM GRAPHICS›410 C:@B89=#P+2     [SET PR. POINTER›420 J:*MOVE›430 R:›440 R:BE CAREFUL IN TYPING LINE 330›450 R:AFTER THE EQUAL SIGN, TYPE:›460 R:SPACE,INVERSE KEY(ATARI LOGO)›470 R:NINE,RIGHT BRACKET,ESCAPE,ESCAPE›480 R:ESCAPE,CONTROL AND INSERT,›490 R:RIGHT BRACKET,9,INVERSE (LOGO),›500 R:SPACE,(COMMENT IS OPTIONAL)›