iceberg JJ\Lÿ õ"iceberg" éb(8,8) ñn=º(¥*8+4) ( ëi=1Ìn 27ñb(º(¥*8+1),º(¥*8+1))=42* <ói Fñsx=º(¥*8+1) Pñsy=º(¥*8+1) Zúb(sx,sy)É0Ëì70F dñb(sx,sy)=90Z nñyx=º(¥*8+1) xñyy=º(¥*8+1) ‚úb(yx,yy)É0Ëì110n Œñb(yx,yy)=89Y –û  ëy=1Ì8 ªëx=1Ì8 ´úb(x,y)=0Ëì210Ò ¾ õÂ(b(x,y)); È ì220Ü Òõ"."; Üõ" "; æóx ðõ úóy ñb(yx,yy)=0 õ"direction (n,s,e,w) "; îd$ "ñyy=yy+(d$="s"ÆyyÉ8) ,ñyy=yy-(d$="n"ÆyyÉ1) 6ñyx=yx+(d$="e"ÆyxÉ8) @ñyx=yx-(d$="w"ÆyxÉ1) Júb(yx,yy)=90ZËì500ô Túb(yx,yy)=42*Ëì600X ^ñb(yx,yy)=89Y hñb(sx,sy)=0 rñsx=sx+¼(yx-sx) |ñsy=sy+¼(yy-sy) †úb(sx,sy)=89YËì500ô úb(sx,sy)=42*Ëì700¼ šñb(sx,sy)=90Z ¤ ì150– ôõ"you've been caught" þ ì800  Xõ"you've hit an iceberg" b ì800  ¼õ"you're safe - he's hit one"  â ¬