gis_4

<html xmlns="http://www.w3.org/1999/xhtml">
    <head>
        <title>OpenLayers Map</title>

        <!-- The openlayers script -->
        <script src="http://www.openlayers.org/api/OpenLayers.js"></script>
        <script type="text/javascript">
            var lon = 18.64542;
            var lat = 54.34766;
            var zoom = 5;
            var map;
            var mercator = new OpenLayers.Projection("EPSG:900913");
            var wgs84 = new OpenLayers.Projection("EPSG:4326");
            var apiKey = "ApTJzdkyN1DdFKkRAE6QIDtzihNaf6IWJsT-nQ_2eMoO4PN__0Tzhl2-WgJtXFSp";
            var options = { projection: mercator, displayProjection: wgs84};


            var key_1 = "Akfa1sYcVtoKuqqWVZQToev5sN8uSdHQniY_MR3Oag1C0XTwUKeugVkotCVu6Bm4";
            var key_2 = "AkThMGyqUS_pj-Ih4a_E6a3_ngjFEG5am6n_2P3e8VmVQImi9Y2A00wQaSK1CjfO";
            var key_3 = "AvYTwp8zlmKKND4xJ4Y2OCDo4X_H1l6aUyt99R0ku_-l_u09frPH0AtxK-p4H108";

            var bing_drogi =new OpenLayers.Layer.Bing({name: "drogi",
                                                    key: key_1,
                                                    type: "Road"});

            var bing_aerial =new OpenLayers.Layer.Bing({name: "satelitarna",
                                                    key: key_2,
                                                    type: "Aerial"});

            var bing_labels =new OpenLayers.Layer.Bing({name: "labels",
                                                    key: key_3,
                                                    type: "AerialWithLabels"});

            var warstwa_WMS =new OpenLayers.Layer.WMS("Warstwa WMS",
                                                      "https://sedac.ciesin.columbia.edu/geoserver/wms",
                                                      {layers: 'aglands:aglands-pastures-2000',
                                                      transparent: true},
                                                      {isBaseLayer: false});


            var kontr_skala =new OpenLayers.Control.PanZoomBar();

            var aktualna_sk =new OpenLayers.Control.ScaleLine();

            var okienko_okolicy =new OpenLayers.Control.OverviewMap();

            var ruch =new OpenLayers.Control.KeyboardDefaults();

            var kursor =new OpenLayers.Control.MousePosition();


            function init(){
                map = new OpenLayers.Map('map');

                var osm = new OpenLayers.Layer.OSM("Simple OSM Map");

                map.addLayers([osm, bing_drogi, bing_aerial, bing_labels]);
                map.zoomIn();

                map.addControl(kontr_skala);
                map.addControl(aktualna_sk);
                map.addControl(okienko_okolicy);
                map.addControl(ruch);
                map.addControl(kursor);


                map.setCenter(new OpenLayers.LonLat(lon, lat).transform(wgs84, mercator), zoom);
                map.addLayer(warstwa_WMS);

            }

        </script>
    </head>
    <body onload="init()">
            <div id="map"></div>
    </body>
</html>