.model huge
.code
public       _SHIP
_SHIP      proc far
ARG x:WORD,y:WORD,CPG:WORD
push bp
mov bp,sp
push si
push di
	mov ax,y
	mov bl,80
	mul bl
	add ax,x
	 mov cx,ax
	mov dx,03C5H
	mov bx,cx
	mov ax,CPG
	mov es,ax
	mov ax,x
	mov ah,al
.386
mov al,1
out dx,al
add bx,244
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov word ptr es:[bx],11308
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6683
add bx,80
mov word ptr es:[bx],6938
add bx,80
mov word ptr es:[bx],6700
add bx,79
mov word ptr es:[bx],11290
inc bx
inc bx
mov byte ptr es:[bx],44
add bx,78
mov word ptr es:[bx],11289
inc bx
inc bx
mov byte ptr es:[bx],44
add bx,78
mov dword ptr es:[bx],422325274
add bx,79
mov dword ptr es:[bx],741087513
add bx,4
mov word ptr es:[bx],6425
add bx,74
mov byte ptr es:[bx],25
inc bx
inc bx
mov word ptr es:[bx],6425
add bx,4
mov word ptr es:[bx],6169
add bx,74
mov dword ptr es:[bx],404232217
add bx,5
mov dword ptr es:[bx],421074975
add bx,75
mov dword ptr es:[bx],421074969
add bx,4
mov dword ptr es:[bx],421009695
add bx,4
mov byte ptr es:[bx],24
mov bx,cx
mov al,2
out dx,al
add bx,164
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov word ptr es:[bx],11308
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],26
add bx,80
mov byte ptr es:[bx],26
add bx,80
mov word ptr es:[bx],6682
add bx,79
mov word ptr es:[bx],6683
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,78
mov word ptr es:[bx],6682
inc bx
inc bx
mov byte ptr es:[bx],25
add bx,78
mov word ptr es:[bx],6682
inc bx
inc bx
mov byte ptr es:[bx],44
add bx,75
mov byte ptr es:[bx],44
add bx,3
mov dword ptr es:[bx],422320428
add bx,77
mov byte ptr es:[bx],44
inc bx
inc bx
mov dword ptr es:[bx],741092377
add bx,4
mov word ptr es:[bx],6425
inc bx
inc bx
mov byte ptr es:[bx],44
add bx,72
mov dword ptr es:[bx],521738521
add bx,6
mov word ptr es:[bx],6168
add bx,74
mov dword ptr es:[bx],421075224
add bx,5
mov dword ptr es:[bx],404232223
add bx,75
mov dword ptr es:[bx],404232216
add bx,5
mov dword ptr es:[bx],404232217
mov bx,cx
mov al,4
out dx,al
add bx,164
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],27
add bx,79
mov word ptr es:[bx],11308
add bx,81
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],26
add bx,80
mov byte ptr es:[bx],26
add bx,79
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6682
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,78
mov word ptr es:[bx],6682
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,78
mov word ptr es:[bx],6444
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,77
mov dword ptr es:[bx],739912729
add bx,6
mov byte ptr es:[bx],44
add bx,72
mov dword ptr es:[bx],739842348
add bx,4
mov word ptr es:[bx],11308
inc bx
inc bx
mov byte ptr es:[bx],25
inc bx
inc bx
mov byte ptr es:[bx],44
add bx,73
mov word ptr es:[bx],6169
add bx,4
mov dword ptr es:[bx],421074975
add bx,75
mov dword ptr es:[bx],521738521
add bx,5
mov dword ptr es:[bx],421075224
add bx,75
mov dword ptr es:[bx],421009688
add bx,5
mov dword ptr es:[bx],404232216
mov bx,cx
mov al,8
out dx,al
add bx,244
mov byte ptr es:[bx],31
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],44
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],30
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],29
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],28
add bx,80
mov byte ptr es:[bx],27
add bx,80
mov byte ptr es:[bx],28
add bx,79
mov word ptr es:[bx],11308
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6939
add bx,80
mov word ptr es:[bx],6682
add bx,80
mov word ptr es:[bx],6683
add bx,80
mov word ptr es:[bx],11290
add bx,80
mov word ptr es:[bx],11308
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,78
mov word ptr es:[bx],11308
inc bx
inc bx
mov byte ptr es:[bx],26
add bx,77
mov dword ptr es:[bx],422325273
add bx,79
mov dword ptr es:[bx],741087770
add bx,4
mov word ptr es:[bx],6681
add bx,76
mov word ptr es:[bx],6425
add bx,4
mov word ptr es:[bx],6169
add bx,3
mov byte ptr es:[bx],25
add bx,72
mov dword ptr es:[bx],521738521
add bx,5
mov dword ptr es:[bx],421075225
add bx,75
mov dword ptr es:[bx],404232216
add bx,4
mov dword ptr es:[bx],404297759
add bx,4
mov byte ptr es:[bx],24
mov bx,cx
pop di
pop si
pop bp
ret
_SHIP      endp
end