// Dienstkalender Konrads-Apotheke, Fr. // // (c) 2001 WebSnake.ORG // var apo_n=32; days_n=new Array(12); days_n[0]=31; days_n[1]=28; days_n[2]=31; days_n[3]=30; days_n[4]=31; days_n[5]=30; days_n[6]=31; days_n[7]=31; days_n[8]=30; days_n[9]=31; days_n[10]=30; days_n[11]=31; months=new Array(12); months[0]="Januar"; months[1]="Februar"; months[2]="März"; months[3]="April"; months[4]="Mai"; months[5]="Juni"; months[6]="Juli"; months[7]="August"; months[8]="September"; months[9]="Oktober"; months[10]="November"; months[11]="Dezember"; apo_first=0; apo_name=new Array(apo_n); apo_name[0]="Unterlinden-Apotheke, Unterlinden 2, Tel.: 3 43 00
Hirsch-Apotheke, Carl-Kirstner-Str. 2, Tel.: 49 22 88"; apo_name[1]="Engel-Apotheke, Herrenstr.5, Tel.: 3 45 65
Marien-Apotheke, Carl-Kirstner-Str. 50 Tel.: 49 47 11"; apo_name[2]="Bernlapp-Apotheke, Reutebachgasse 2, Tel.: 5 38 27
Rieselfeld-Apotheke, Rieselfeldallee 16, Tel.: 45 62 30
easyApotheke Freiburg im Hof, Bismarckallee 16, Tel.: 2 96 77 80"; apo_name[3]="Karls-Apotheke, Leopoldring 5, Tel.: 3 44 22
Falken-Apotheke, Sonnenbergstr. 1, Tel.: 6 52 80"; apo_name[4]="Hof-Apotheke, Kaiser-Joseph-Str. 179, Tel.: 3 98 29
Blasius-Apotheke, Zähringer-Str. 332, Tel.: 5 33 52
Bären-Apotheke im Breisgau-Center, Tel.: 40 11 98 40"; apo_name[5]="AVIE Berthold-Apotheke beim Cinemaxx, Bertoldstr. 48, Tel.: 3 69 81
Feldberg-Apotheke, Badenweiler Str. 2, Tel.: 48 47 48
Apotheke im Kaufland, Waldkircher Str. 57, Tel.: 50 36 44 0"; apo_name[6]="Loretto-Apotheke, Günterstal Str. 52, Tel.: 7 48 84
Kandel-Apotheke, Alte Bundesstr. 80, Tel.: 58 02 10
Lehener-Apotheke, Breisgauerstr. 31, Tel.: 8 10 10"; apo_name[7]="City-Apotheke, Schiffstr. 5-9, Tel.: 3 47 74
Aeskulap-Apotheke, Breisacher-Str. 52, Tel.: 27 34 10"; apo_name[8]="Löwen-Apotheke, Kaiser-Joseph-Str. 205, Tel.: 3 34 31
Am Basler Tor-Apotheke, Christoph-Mang-Str. 18 Tel.: 40 94 00"; apo_name[9]="Schelkes-Apotheke, Kaiser-Joseph-Str. 214, Tel.: 2 52 32
Komtur-Apotheke, Zähringer Str. 23, Tel.: 50 42 30"; apo_name[10]="Glocken-Apotheke, Schusterstr. 5, Tel.: 3 64 69
Rats-Apotheke, Feldbergstr. 7, Tel.: 58 38 98
K+K-Apotheke im Vauban, Paula Modersohnplatz 3, Tel.: 88 85 70 80"; apo_name[11]="Am Zähringer Tor-Apotheke, Bernhardstr. 2, Tel.: 3 42 20
Bären-Apotheke, Lehener-Str. 21, Tel.: 27 36 55"; apo_name[12]="Am Seepark-Apotheke, Hofackerstr. 92, Tel.: 80 69 33
Alemannen-Apotheke, Gewerbestr. 21, Tel.: 58 18 15
Schauinsland-Apotheke, Moosmattenstraße 5, Tel.: 6 00 81 86"; apo_name[13]="An der Kronenbrücke-Apotheke, Schreiberstr. 20, Tel.: 3 54 10
Apotheke am Kastanienhof, Alte Bundesstr. 27a, Tel.: 58 05 08
VitaVia Apotheke am Glashaus, Rieselfeldalleee 39, Tel.: 45 68 77 50"; apo_name[14]="Holzmarkt-Apotheke, Kaiser-Joseph-Str. 255, Tel.: 3 13 21
Fontane-Apotheke, Bugginger Str. 54, Tel.: 4 17 03"; apo_name[15]="Zasius-Apotheke, Günterstalstr. 39, Tel.: 7 32 80
Konrads-Apotheke, Emmendinger Str. 16, Tel.: 27 49 13"; apo_name[16]="Hubertus-Apotheke, Rotteckring 4, Tel.: 3 45 00
Jahn-Apotheke, Schwarzwaldstr. 146, Tel.: 70 39 20"; apo_name[17]="Hornus-Apotheke, Hornusstr. 67, Tel.: 5 56 46 55
Frida-Apotheke, Ferdinand-Weiß-Str. 119, Tel.: 28 62 77"; apo_name[18]="Stühlinger-Apotheke, Klarastr. 58/60, Tel.: 27 32 22
Hexental-Apotheke, Dorfstr. 5, Tel.: 40 33 66
Dreikönig-Apotheke, Dreikönigstr. 9, Tel.: 7 57 55"; apo_name[19]="Immental-Apotheke, Urbanstr. 2, Tel.: 2 62 61
Haslach-Apotheke, Carl-Kistner-Str. 33, Tel.: 49 40 00
Apotheke im ZO, Schwarzwaldstr. 78, Tel.: 8 88 79 79"; apo_name[20]="Schwabentor-Apotheke, Oberlinden 22, Tel.: 3 42 43
Landwasser-Apotheke, Auwaldstr. 90, Tel.: 1 60 66"; apo_name[21]="Brunnen-Apotheke, Bertoldstr. 8, Tel.: 3 29 99
Katharinen-Apotheke, Meraner Weg 1, Tel.: 49 15 15"; apo_name[22]="Zähringer-Apotheke, Habsburgerstr. 114, Tel.: 3 98 28
Weingarten-Apotheke, Krozinger Str. 7, Tel.: 48 42 00"; apo_name[23]="Bromberg-Apotheke, Talstr. 20, Tel.: 70 00 00
Mooswald-Apotheke, Elsässer Str. 46, Tel.: 8 22 85"; apo_name[24]="Urban-Apotheke, Hauptstr. 58, Tel.: 3 98 96 30
Vogtshof-Apotheke, Andreas-Hofer Str. 65, Tel.: 4 24 65"; apo_name[25]="Herdern-Apotheke, Habsburgerstr. 59, Tel.: 51 50 50
Markgrafen-Apotheke, Markgrafenstr. 68, Tel.: 49 22 86"; apo_name[26]="Am Theater-Apotheke, Bertoldstr. 31, Tel.: 3 92 12
Schönberg-Apotheke, Blumenstr. 22, Tel.: 49 17 39"; apo_name[27]="Sonnen-Apotheke, Günterstalstr. 5, Tel.: 7 19 22
St. Barbara-Apotheke, Lindenmattenstr. 40, Tel.: 61 12 60"; apo_name[28]="Lederle-Apotheke, Guntramstr. 17, Tel.: 28 88 70
Sundgau-Apotheke, Sundgauallee 55, Tel.: 8 58 89"; apo_name[29]="Breisgau-Apotheke, Eisenbahnstr. 64, Tel.: 2 42 88
Am Bischofskreuz-Apotheke, Am Bischofskreuz 5, Tel.: 8 21 96"; apo_name[30]="Bahnhof-Apotheke, Bismarkallee 10, Tel.: 2 54 84
Waldsee-Apotheke, Schwarzwaldstr. 127, Tel.: 3 25 24"; apo_name[31]="K + K -Apotheke, Hexentalstr. 7, Tel.: 45 94 50
Pinocchio-Apotheke, Günterstalstr. 11, Tel.: 70 75 155"; function print_kal(monat) { dat_start=new Date(2003,6,23); akt_date=new Date(); akt_month=akt_date.getMonth(); akt_month=akt_month+monat; akt_year=akt_date.getYear(); if (akt_year<2000) {akt_year=akt_year+1900;} if (akt_month==12) { akt_month=0; akt_year=akt_year+1; } fst_date=new Date(akt_year,akt_month,1); fst_day=fst_date.getDay(); dat_diff=fst_date.getTime()-dat_start.getTime(); dat_tage=Math.floor(dat_diff/(1000*60*60*24)); apo_count=dat_tage+apo_first-Math.floor(dat_tage/apo_n)*apo_n; if (apo_count>apo_n) { apo_count=apo_count-apo_n; } if (fst_day == 0) { fst_day=7 } with (document) { write(""); write("
"); write(months[akt_month] + " " + akt_year+ "
"); write("
"); write(""); for (i=0;i<=5;i++) { write(""); for (j=0;j<7;j++) { day=(i*7+j-fst_day+2); if (day>0 && day<=days_n[akt_month]) { write(""); apo_count++; if (apo_count==apo_n) { apo_count=0 } } else {write (""); } } write(""); } write("
MoDiMiDoFrSaSo
" + day + "
"); } } function print_apo(dd,mm,yy,nummer) { apoWindow=open("","displayWindow","height=180,width=490,directories=off,menubar=off"); apoWindow.document.open(); with (apoWindow.document) { write("Apotheken-Notdienst"); write("Notdienst am " + dd + ". " + months[mm] + " " + yy + ":

"); write(""+apo_name[nummer]+"

"); write("dieses Fenster schließen"); write("

provided by WebSnake.ORG Database Server
"); } apoWindow.document.close(); } function print_today() { dat_start=new Date(2003,6,23); akt_date=new Date(); akt_day=akt_date.getDate(); akt_month=akt_date.getMonth(); akt_year=akt_date.getYear(); akt_hour=akt_date.getHours(); akt_minute=akt_date.getMinutes(); akt_old=0; if (akt_year<2000) {akt_year=akt_year+1900;} dat_diff=akt_date.getTime()-dat_start.getTime(); dat_tage=Math.floor(dat_diff/(1000*60*60*24)); apo_count=dat_tage+apo_first-Math.floor(dat_tage/apo_n)*apo_n; if (apo_count>apo_n) { apo_count=apo_count-apo_n; } if ( (akt_hour<8) || (akt_hour==8 && akt_minute < 30)) { apo_count=apo_count-1; akt_old=1} if ( apo_count < 0 ) {apo_count = apo_n;} with (document) { write("Notdienst heute " + akt_day + ". " + months[akt_month] + " " + akt_year + " "); if (akt_old == 1) { write(" (bis 8:30h) :"); } else { write(":"); } write("
" + apo_name[apo_count] + ""); } }