TPUQ` ? $~3DUfs`LwbSSeaField6SSystem O FieldSizeR OFreeCellROShip1ROShip2ROShip3ROShip4ROBusyCellR2OPastMoveRdOHitR ONotAvailRP GameSpace   R  R dP Direction,, ,ORightDir,ODownDir,PPosVal s RP GameFieldPtr P GameFieldj hM&QXcoor*QYcoor&*Q WorkSpace> RInit1 h**RDoneQ RGetCell **RSetCell + **>R PutOnePart(| hR IsAvailable0 MrR PutNewShip8, r,R SetUpField@ R DrawFieldHH  P HumanFieldPtr P HumanFieldj+= h=R DrawFieldPe  PComputerFieldPtrz bP ComputerFieldj hR DrawFieldX  SCrt~3DUfs`LwbQInitX">*QInitY" >*QSelf>QSelfhQOx" *QOy" *QSelfW5iQOx"*QOy" *QVal" FQSelfQOx"QOy" QVal" QSelf QOx" QOy" QSelfQi*Qj*6QOx"MQOy"MQShipSize" MQdir" M,GQSelfMXQixM*oQiyM*QiM*QflagMr( 8  QSelfQrx*Qry*Qd,Qi QjR QSelf o QSelf=Qi=*Qj=* QSelfQi*Qj* (08@HP?L=3HEbY_(m(   SeaFieldSystemCrt6v# SEAFIELD.PAS>XY  h_` de op wx 1111 # M%  @>    + =% $ * !!!! $ % $ * %, ; U1ht"F~&F &EWdPPF] U1h]U~ |~  ~ |~ ~FN f ~&EFF]U1~|)~ #~ |~ ^ N f~&]] U1^ F ȊF ~&]FHPF HP~W<u:F 0HF1;F*FFFPFFPF P~WF;FuۊFFF] UFNFF:FrQFN PF PFPFFPFPFPFP~WtF:Fu~u]U1] U~&P&EP&P&E @@PPP1FFWFRPP~ u1FFPF@@PWFRP1PW1P1FFN f~&E<uW.P1P<uW1P1P<uW2P1P<uW3P1P<uW4P1Pb