Include ">fight";

[ Sailing i j;
    j=0;
    if (random(hostilefreq)==1) 
    {
	LowerWindowSetup(1);
	j=random(shipsize/10+guns)+1;
        print j," hostile ship";
	if (j>1)
	    print "s";
	print " approaching, Taipan!!";
	Beep2512();
	ShortPause();
	j=Fight(1,j);
	if (j==0) return -1;
    }
    if (((j==0) && (random(4+8*li)==1)) || j==2)
    {
	LowerWindowSetup(1);
	print "Li Yuen's pirates, Taipan!!^";
	Beep2521();
	MedPause();
	if(li) 
	{
	    print "^Good joss!! They let us be!!";
	    Beep2521();
	    MedPause();
	}
	else
	{
	    LowerWindowSetup(1);
	    j=random(shipsize/5+guns)+5;
	    print j, " ships of Li Yuen's pirate fleet, Taipan!!";
	    Beep2512();
	    MedPause();
	    j=Fight(2,j);
	    if (j==0) return -1;
	}
    }
    if(random(10)==1) 
    {
	LowerWindowSetup(1);
	print "Storm, Taipan!!";
       	Beep2521();
	MedPause();
	if(random(30)==1) 
	{
	    print "^^   I think we're going down!!";
	    Beep2521();
	    MedPause();
	    j=((dam2/2)*3)/shipsize;
	    if(j&&random(j)~=1) 
	    {
	    	print "^^We're going down, Taipan!!";
	    	Beep2512();
		return -1;
	    }
	}
	print "^^    We made it!!";
	Beep2521();
	MedPause();
	if(random(3)==1)
    	{
	    do
	    	j=random(7);
	    until (j~=i);
	    LowerWindowSetup(1);
	    print "We've been blown off course to ", (string)
	    	locnames-->j;
	    MedPause();
	    i=j;
    	}
    }
    return i;
];