// Advertisements
var AD_AUSSIE_HOME_LOANS_120x240  = 1;
var AD_AUSSIE_HOME_LOANS_125x125  = 2;
var AD_AUSSIE_HOME_LOANS_468x60   = 3;
var AD_AMEX_392x60                = 4;
var AD_AMEX_125x125               = 5;
var AD_WEIGHT_LOSS_120x60         = 6;
var AD_WEIGHT_LOSS_468x60         = 7;
var AD_ROSES_ONLY_728x90          = 8;
var AD_ROSES_ONLY_134x60          = 9;
var AD_RED_BALLOON_DAYS_1_468x60  = 10;
var AD_RED_BALLOON_DAYS_2_468x60  = 11;
var AD_RED_BALLOON_DAYS_3_468x60  = 12;
var AD_RED_BALLOON_DAYS_3_128x600 = 13;
// Valentine's day specials 2005
var AD_VALDAY_ROSES_ONLY_468x60   = 14;
var AD_VALDAY_RED_BAL_DAYS_468x60 = 15;
var AD_MEGAN_RENEE_FLORAL_DESIGN  = 16;

function Advertisement(paiAdvertisements)
{
    var iAdId = 0;
    if (isArray(paiAdvertisements))
    {
        var iRandomNumber = Math.round((Math.random() * paiAdvertisements.length) + 0.5) - 1;
        iAdId = paiAdvertisements[iRandomNumber];
    }
    else
        iAdId = paiAdvertisements;

    switch (iAdId)
    {
        case AD_AUSSIE_HOME_LOANS_120x240:
            Image ("http://dgmaustralia.com/m/Aussiemortgage/i.asp?A=30961&I=14851", "tour", 
                   "http://dgmaustralia.com/m/Aussiemortgage/b.asp?A=30961&I=14851", 125, 240, "Aussie Home Loans", true)
            break;
        case AD_AUSSIE_HOME_LOANS_125x125:
            Image ("http://dgmaustralia.com/m/Aussiemortgage/i.asp?A=30961&I=14855", "tour", 
                   "http://dgmaustralia.com/m/Aussiemortgage/b.asp?A=30961&I=14855", 125, 125, "Aussie Home Loans", true)
            break;
        case AD_AUSSIE_HOME_LOANS_468x60:
            Image ("http://dgmaustralia.com/m/Aussiemortgage/i.asp?A=30961&I=14861", "tour", 
                   "http://dgmaustralia.com/m/Aussiemortgage/b.asp?A=30961&I=14861", 468, 60, "Aussie Home Loans", true)
            break;
        case AD_AMEX_392x60:
            Image ("http://dgmaustralia.com/m/amexau/i.asp?A=30961&I=12410", "tour", 
                   "http://dgmaustralia.com/m/amexau/b.asp?A=30961&I=12410&C=spctpg17", 392, 60, "AMEX", true)
            break;
        case AD_AMEX_125x125:
            Image ("http://dgmaustralia.com/m/amexau/i.asp?A=30961&I=12407", "tour", 
                   "http://dgmaustralia.com/m/amexau/b.asp?A=30961&I=12407&C=spctpg17", 125, 125, "AMEX", true)
            break;
        case AD_WEIGHT_LOSS_120x60:
            Image ("http://dgmaustralia.com/m/weightlossAU/i.asp?A=30961&I=6439", "tour", 
                   "http://dgmaustralia.com/m/weightlossAU/b.asp?A=30961&I=6439", 125, 60, "Weight Loss", true)
            break;
        case AD_WEIGHT_LOSS_468x60:
            Image ("http://dgmaustralia.com/m/weightlossAU/i.asp?A=30961&I=6440", "tour", 
                   "http://dgmaustralia.com/m/weightlossAU/b.asp?A=30961&I=6440", 468, 60, "Weight Loss", true)
            break;
        case AD_ROSES_ONLY_728x90:
            Image ("http://dgmaustralia.com/m/RosesAU/i.asp?A=30961&I=8256", "tour", 
                   "http://dgmaustralia.com/m/RosesAU/b.asp?A=30961&I=8256", 728, 90, "Roses Only", true)
            break;
        case AD_ROSES_ONLY_134x60:
            Image ("http://dgmaustralia.com/m/RosesAU/i.asp?A=30961&I=6313", "tour", 
                   "http://dgmaustralia.com/m/RosesAU/b.asp?A=30961&I=6313", 125, 60, "Roses Only", true)
            break;
        case AD_RED_BALLOON_DAYS_1_468x60:
            Image ("http://dgmaustralia.com/m/RedBalloonAU/i.asp?A=30961&I=9293", "tour", 
                   "http://dgmaustralia.com/m/RedBalloonAU/b.asp?A=30961&I=9293", 468, 60, "Red Balloon Days", true)
            break;
        case AD_RED_BALLOON_DAYS_2_468x60:
            Image ("http://dgmaustralia.com/m/RedBalloonAU/i.asp?A=30961&I=8422", "tour", 
                   "http://dgmaustralia.com/m/RedBalloonAU/b.asp?A=30961&I=8422", 468, 60, "Red Balloon Days", true)
            break;
        case AD_RED_BALLOON_DAYS_3_468x60:
            Image ("http://dgmaustralia.com/m/RedBalloonAU/i.asp?A=30961&I=9781", "", 
                   "http://dgmaustralia.com/m/RedBalloonAU/b.asp?A=30961&I=9781&C=spctpg14", 468, 60, "Red Balloon Days", true)
            break;
        case AD_RED_BALLOON_DAYS_3_128x600:
            Image ("http://dgmaustralia.com/m/RedBalloonAU/i.asp?A=30961&I=11500", "", 
                   "http://dgmaustralia.com/m/RedBalloonAU/b.asp?A=30961&I=11500", 125, 600, "Red Balloon Days", true)
            break;
        case AD_VALDAY_ROSES_ONLY_468x60:
            Image ("http://dgmaustralia.com/m/RosesAU/i.asp?A=30961&I=6210", "tour", 
                   "http://dgmaustralia.com/m/RosesAU/b.asp?A=30961&I=6210", 468, 60, "Roses Only Valentine\'s Day Special", true)
            break;
        case AD_VALDAY_RED_BAL_DAYS_468x60:
            Image ("http://dgmaustralia.com/m/RedBalloonAU/i.asp?A=30961&I=9782", "tour", 
                   "http://dgmaustralia.com/m/RedBalloonAU/b.asp?A=30961&I=9782&C=spctpg14", 468, 60, "Red Balloon Days Valetine\'s Day Special", true)
            break;
        case AD_MEGAN_RENEE_FLORAL_DESIGN:
            var Advertisement = new Layer("MeganReneeFloral", "Advertisment", "center")
            Advertisement.SetDimensions(468, 180);
            Advertisement.BeginLayer();
                Image("http://members.ozemail.com.au/~mrfd/images/header.gif", "",
                      "http://www.ozemail.com.au/~mrfd", 700, 80, "Megan Renee Floral Design", true);
                Heading("10% discount off all floral designs for Valentines Day when you mention you were referred by 'Our Day'.", 3);
                Link("www.ozemail.com.au/~mrfd", "http://www.ozemail.com.au/~mrfd");
                Breaks(1);
                Text("Phone: (03) 9822 6022");
            Advertisement.EndLayer();
            break;
        default:
            alert("Programming error: Invalid advertisement passed into this window.");
            break;

    }
}