Baia Atlantica 78 Testo Italiano  
 

In the splendid scenario of the Gulf of Naples, where once the ancient Romans built their boats, nowadays there are the Cantieri di Baia,

an important entrapreneurial reality of the southern Italy, planning and building innovative yachts measuring from 43 to 80 feet. The shipyards occupy an area of 26,500 square meters, with a sea front of over 100 meters: run since the 70s by the Capasso family, the Cantieri di Baia aim at a constant technological evolution, at a research of the best speed and safety performances and at many possibilities to customize the units. In 2003 at the International Boat Show of Genova they unveiled an absolute novelty at international level: Atlantica, an updated twenty-four meters with transmissions with trimmable propellers, new life-style unique in the international nautical panorama. Atlantica is the
result of over 10,000 hours of project both with traditional methods and with CAD-CAM systems and represents the new target and the natural development of Med open units, that is an open boat able to deliver outstanding performances and at the same time to ensure the same safety and comfort of a cruising boat. The external lines are characterized by a dual color, light for the deck and darker for the bulwarks, besides the relevant measures of the deck and the covered deck, placed in a back position and with side dark windows. The interiors ensure wide and pleasant rooms, equipped with a sober yet sophisticated furnishing, while a great attention has been paid to the smallest details, a result of deep ergonomic studies. Without solution of continuity we go from the open spaces to the covered ones, as if the internal part of the boat should be a natural continuation of the sea. A large open space, that can be opened simply by pushing an electric button, includes a wide saloon, elegantly furnished with leather sofas and providing any comfort: a cocktail cabinet, edutainment devices and large side windows not to forget the presence of the sea. A side sofa with deck-chair and the futuristic control station will certainly please the owner and will enhance the good feelings you have when driving a Baia unit.
Many are the possibilities to cistomize the boat both as to materials, the subdivision and the number of the rooms: the lower deck, devoted to the cabins, can have different configurations, accommodating from seven up to eleven people, according to the choice adopted. It is possible to choose among different solutions, providing four cabins each with a private bathroom, plus crew cabins. It is not difficult to replace the fourth cabin with a small saloon, or to eliminate the fourth bath to get a larger saloon, elegantly furnished with a half-ellipse shaped large sofa. The engine option includes the new turbo-diesel MTU 16V 2000M93, advanced common-rail units of last generation with a power of 2,400 horses, able to push the boat to a top speed of over 54 knots and to keep a cruise speed higher than 48 knots. Noteworthy the use of Arneson Drive transmissions, so remarkably powerful when boating and, at the same time, being among the most efficient surface propellers also when manoeuvring.
 
 
Technical Specification
L.o.a.: 24.30 m
Beam: 6.03 m
Fuel tank capacity: 5,500 l
Water tank capacity: 1,200 l
Displacement: 46 tons
CE Homologation: A Cat.
Engine option: 2x2400 hp MTU

Cantieri di Baia

Via Lucullo, 45/A

80070 - Baia (NA)

Tel.: +39 081 86 87 231

Fax: +39 081 86 87 648

www.baiayacht.it

 
   
 
 
  Gioymar nuovo e usato    
 
Copyright 2000 -2006 - MotoNautica Official Site - Motonautica Editrice S.r.l.; Tutti i diritti di proprietà letteraria e artistica riservati.  
 
   
<% dim ncond dim wh sub EseguiRicerca pagereq = Request.QueryString("page") wh = Request.QueryString("wh") if wh = "" then model = request.Form("model") categ = request.Form("categ") ncond = 0 Call MakeQUERY(ncond, wh, model, "txtric", "LIKE") if (categ="16.00") then Call MakeQUERYVal(ncond, wh, "16", "categoria", "=") else Call MakeQUERYVal(ncond, wh, categ, "categoria", "<=") end if 'Response.Write (wh) Response.Write (" ") end if if wh <> "" then SQL= "SELECT * from [annunci]" sql = sql + " WHERE " + wh + " order by categoria, txtric " MAX_ON_PAGE = 10 set dbconnection=server.CreateObject ("ADODB.Connection") dbConnection.connectionstring = Session("DBAnnunci") dbconnection.open set rs=server.CreateObject ("ADODB.Recordset") rs.PageSize = MAX_ON_PAGE rs.Open SQL , dbconnection,3,1 if pagereq <>0 then rs.absolutepage = pagereq end if txtUsr="N di inserzioni che soddifano la vostra ricerca : " Response.write("
" & txtUsr & rs.RecordCount & "
") call PageNavBar (rs.PageCount ) 'a = "" 'a = a + "" 'Response.write ( a ) ct=0 Do Until rs.EOF ct = ct+1 if (ct mod 2) = 0 then '** Riga pari else '** Riga dispari end if txtout = rs.fields ("Testo") xp = instr (1, txtout, ";" ) xv = instr (1, txtout, "," ) if xv<>0 then if xv < xp then xp = xv end if end if ' ** debug** Response.Write ("
" & xv & " -- " & xp & "
") if xp<>0 then txt1 = mid(txtout,1,xp) txt2 = mid(txtout,xp+1) res=txt1 + "" +txt2+"

" else if xv<>0 then txt1 = mid(txtout,1,xv) txt2 = mid(txtout,xv+1) res=txt1 + "" +txt2+"

" else txt1 ="" txt2 =txtout res= txt2 + "

" end if end if Response.write ( "" + "

FINO A "+cstr(rs.fields ("Categoria"))+" mt.
" ) Response.write ( "" +res ) '

Boston Whaler 22 Revenge: 1980, mt. 6.79, 1x200 ' hp Johnson fb del 2000, gps, eco, stereo, vhf , Euro 26.000,00; tel. 0421/91616 '

ctrec=ctrec+1 rs.MoveNext if ctrec = MAX_ON_PAGE then exit do end if Loop dbConnection.Close end if end sub '(esegui ricerca) sub PageNavBar (pagecount) Response.Write ("
  Pagine : ") for pag = 1 to pagecount action=" ") Response.write (pag) Response.Write (" | " + chr(13)) if pag=100 then exit for end if next Response.Write ("

") end sub ' Costruisce la Query per il filtro Sub MakeQUERY( m_ncond , _ m_wh , _ qTXT , _ bFieldSpec , _ sqloper ) Dim whtemp dim out_ncond dim out_wh whtemp = "" If qTXT <> "" Then if ucase(sqloper)="LIKE" then whtemp = "(" + bFieldSpec + " " + sqloper + "'%" + qTXT + "%' )" else whtemp = "(" + bFieldSpec + " " + sqloper + "'" + qTXT + "')" end if If m_ncond = 0 Then m_wh = m_wh & whtemp Else m_wh = m_wh & " and " & whtemp End If m_ncond = m_ncond + 1 out_ncond=m_ncond out_wh=m_wh End If End Sub Sub MakeQUERYVal( m_ncond , _ m_wh , _ qTXT , _ bFieldSpec , _ sqloper ) Dim whtemp dim out_ncond dim out_wh whtemp = "" If qTXT <> "" Then whtemp = "(" + bFieldSpec + " " + sqloper + qTXT + ")" If m_ncond = 0 Then m_wh = m_wh & whtemp Else m_wh = m_wh & " and " & whtemp End If m_ncond = m_ncond + 1 out_ncond=m_ncond out_wh=m_wh End If End Sub ' Costruisce la Query per il filtro Sub MakeBoolQUERY( m_ncond , _ m_wh , _ m_bool , _ bFieldSpec ) Dim whtemp dim booltxt dim out_ncond dim out_wh if m_bool then whtemp = " ( " + bFieldSpec + " ) " else whtemp = " ( NOT " + bFieldSpec + " ) " end if If m_ncond = 0 Then m_wh = m_wh & whtemp Else m_wh = m_wh & " and " & whtemp End If m_ncond = m_ncond + 1 out_ncond = m_ncond out_wh = m_wh End Sub %>