maxi
[Besucher]
Unregistered user



05.11.2006
20:16
Obscured by Clouds      [2746]
  Hier können wir über dieses Album diskutieren

<< Prev  [1  [2  [3  [4 [5]   [6  [7  [8  [9 Next >>

Kailash
[Besucher]



29.05.2007
09:13 Uhr
@ Boernix

und einsen werden besser bewertet

Wie meinst du das?

Rick Wakeman (Yes): "When the first list was being drawn up in the rock 'n' roll book of Genesis, it would have been: In the beginning, God created Pink Floyd."

mars behind moon
[blofeldspieler]



29.05.2007
09:52 Uhr
@ Kailash

ich auch mehr , seit züri - muss immer an den kopftuch eines forumteilnehmer denken  

----------------------------


Et vous... déshabillez-vous!...singt Mylenè Farmer

Pottel
[Besucher]

Unregistered user



29.05.2007
12:53 Uhr
Absolutely Curtains rules, F§$%§ing rules!
und das ganze ist einfach von eine unbekannte schönheit!



dry floyd is good floyd as well!

marcie
[Bärli]



29.05.2007
14:57 Uhr
@ Pottel

Ja, Absolutely Curtains ist irgendwie magisch, seltsam und von einer Schönheit ganz anders als meinetwegen Dark Side oder so!


@ Kailash+Robert

Schön, dass Ihr das auch so seht!




der marci
____________________________
day after day, love turns grey
like the skin of a dying man.

Boernix
[Forumsbrot]



29.05.2007
16:26 Uhr
@ Kailash: Habe da eine Extra Excel Formel entwickelt. Nehmen wir mal an es sind 10 Songs. 3 Einser und 7 Zweier and rechne ich 3x1 = 3 + 7x2 14 + 3x1,5 = 4.5. Das teile ich durch 13. und es kommt ein Schnitt von 1,654. hätte ich nur den normalen Notendurchschnitt genommen, wären es 1,7. Und die Songanzahl wird mit einbezogen, indem pro Song 0,009 Punkte abgezogen werden. Wäre bei dem Album 0,09, also eine Gesamtnote von 1,564.

So sieht die Formel aus:

=(((E519*0,5)+(F519*1)+(G519*2)+(H519*3)+(I519*4)+(J519*5)+(K519*6)+(Q519*1,5))/(D519+Q519))-(D519*0,009)

(Frag mich nicht, ob ich die noch einmal hinbekäme, wenn ich die aus versehen löchen würde)...



  

mars behind moon
[blofeldspieler]



29.05.2007
16:28 Uhr
@ Boernix



----------------------------


Et vous... déshabillez-vous!...singt Mylenè Farmer

Boernix
[Forumsbrot]



29.05.2007
17:27 Uhr
@ mars behind moon: Nein, der hat ne andere Formel erstellt...




marcie
[Bärli]



29.05.2007
17:41 Uhr
@ Boernix

Ihr seid ja alle total krank hier!   





der marci
____________________________
day after day, love turns grey
like the skin of a dying man.

Kailash
[Besucher]



29.05.2007
18:20 Uhr
@ Boernix

Und das ist ein Teil meiner Formel, habe ich vor Jahren mal in Turbo Pascal gemacht. ;-)

var Wahl : Char;
var Typ, I : string;
var A, D, E, F, G, H, J, K, L, M, N, O, P, Q, R, S, T, U, V, W, FR, NW, W1,
    Ys, Ws, Us, Wd, Xd, Ud, Yd, WM, W2, X1, X2, Ad, kW, P1, P2, Gd, WV, WL,
    XL1, XL2, AW, PLB2, Di, LB, XA, ON, OM,     TR, W4, K1, W6, W7, FL, M1,
    J1, N1, Q1, X3, X4, F1, F2, F3, C0, C1, C2, C3 : Real;
var HF, VF : Word;
Var B, X, Y, Y1, Txt, Neu, Dru, Lbe : Integer;
Var C, Z : Byte;
const  MX = 639;


function Za : Real;
var Code : Integer; var Z : Real;
begin Val(I,Z,Code); Za:= Z;
  if Code>0 then begin Melde(' !!!',4); I:='#'; end;
end;

function Asn (VA : Real) : Real;
begin   if (VA < 1) AND (VA > -1) then Asn:= ArcTan(VA/Sqrt(1-VA*VA));
         if VA = 1 then Asn:= 90; if VA =-1 then Asn:=-90;  end;

function OP (VA : Real) : Real; begin OP:= O*VA*Sqrt(P-VA*VA); end;


function AT : Real;
  begin  W2:= W1+2*Pi/Z; W6:= W1+W4; W7:= W2+W4;
   M:= Sin(W1); J:= Asn(E/R*M); N:= Sin(W2); Q:= Asn(E/R*N);
   FL:= K-OP(N)+OP(M)-U*Q+U*J+O/2*Sin(2*W2)-O/2*Sin(2*W1);
   M1:= Sin(W6); J1:= Asn(E/R*M1); N1:= Sin(W7); Q1:= Asn(E/R*N1);
   if M1=0 then X1:= R   else X1:= R*Sin(Pi-W6+J1)/M1;
   if N1=0 then X2:= R+E else X2:= R*Sin(Pi-W7+Q1)/N1;
   X3:= 1-Sqr(X1-T/2)/Sqr(X1); X4:= 1-Sqr(X2-T/2)/Sqr(X2);
   F1:= (K1-OP(M1)+OP(M)-U*J1+U*J+O/2*Sin(2*W6)-O/2*Sin(2*W1))*X3;
   F2:= (K1-OP(N1)+OP(N)-U*Q1+U*Q+O/2*Sin(2*W7)-O/2*Sin(2*W2))*X4;
   F3:= S/2*(X1+X2-T)/Cos(W4); AT:= FL-F1+F2-F3; end;

procedure Tang;
  begin  A:= AT;
   if A> C0 then begin W1:= W1-Pi/18;   C0:= A; Tang; end else C0:= 1E38;
   if A> C1 then begin W1:= W1+Pi/180;  C1:= A; Tang; end else C1:= 1E38;
   if A> C2 then begin W1:= W1-Pi/1800; C2:= A; Tang; end else C2:= 1E38;
   if A> C3 then begin W1:= W1+Pi/18000;C3:= A; Tang; end
            else begin WM:= W1*180/Pi-0.01; A:= C3; end;
  Str(WM:1:2,I);OutTextXY(X,Round(169*F+B),'Winkel W bei max. A = '+I+'ø');
end;
procedure Rad;
  begin  W:= Pi/Z; M:= Sin(W); J:= Asn(E/R*M); WM:= 180-180/Z;
   A:= K+E*E*M*Sqrt(P-M*M)+R*R*J+O*Sin(2*W)-S*(R*Sin(W+J)/M-T/2);
   Ys:= Asn(E/R*Sin(W1)); Ys:= -R*Cos(Pi-W1+Ys);
  Str(Ys:1:2,I); OutTextXY(X,Round(151*F+B),'Ys = '+I+' mm'); end;

[ Berechnung ]
if C= 18 then Tang else Rad;
  V:=A*L*Z*FR*NW*6/1E10; G:= D*Pi*FR/6E4; H:= (2*D-T)*Pi*FR/6E4;

procedure TDruecke;
  begin
  [ Abfrage und Rechnung ]
   repeat I:= 'Winkel Wd in Grad = '; Abfr(7); Wd:= Za;
    Str(WM:1:2,I); if Wd>= WM then Melde('Geht nicht Wd >= ' + I ,5); Delay(30000);
   until (Wd > 0) AND (WM > Wd);
   W1:= Wd*Pi/180; AD:= AT; Str(Ad:1:2,I); end;
  
repeat  Wahl:= UpCase(ReadKey);
  if Wahl= 'W' Then Begin Ton;
   repeat I:= 'Winkel Wd in Grad = '; Abfr(7); Wd:= Za;
    Str(WM:1:2,I); if Wd>= WM then Melde('Geht nicht Wd >= ' + I ,5); Delay(30000);
   until (Wd > 0) AND (WM > Wd);
   W1:= Wd*Pi/180; Ud:= Asn(E/R*Sin(W1)); Yd:= -R*Cos(Pi-W1+Ud);
  end;
      Str( R:1:2,I); if Yd>= R  then Melde ('Geht nicht Yd >= ' + I ,5); Delay(30000);
    Str(YS:1:2,I); if Yd<= Ys then Melde ('Geht nicht Yd <= ' + I ,5); Delay(30000);
   until (R > Yd) AND (Yd > Ys) AND (I <> '#');
   if Yd= E then Wd:= 90 else Wd:= 180*ArcTan(Sqrt(R*R-Yd*Yd)/(E-Yd))/Pi;
   if Wd<= 0 then Wd:= -Wd else Wd:= 180-Wd;
   W1:= Wd*Pi/180;
  end;
until (Wahl='W') OR (Wahl='Y');
  W2:= W1+2*Pi/Z; M:=Sin(W1); N:= Sin(W2); J:= Asn(E/R*M); Q:= Asn(E/R*N);
  if M=0 then x1:=R   else X1:= R*Sin(Pi-W1+J)/M; OM:= O*M*Sqrt(P-M*M);
  if N=0 then X2:=R+E else X2:= R*Sin(Pi-W2+Q)/N; ON:= O*N*Sqrt(P-N*N);
  Ad:= K-OP(N)+OP(M)-U*Q+U*J+O/2*Sin(2*W2)-O/2*Sin(2*W1)-S/2*(X1+X2-T);
  Str(Yd:1:2,I); OutTextXY(X,Round(277*F+B),'Yd = '+ I + ' mm');
  Str(Ad:1:2,I);  end; [ TDruecke ]
[ k-Wert ];
  repeat I:= 'kappa 1-Isotherm < 1.4-Isentrop = '; Abfr(7); kW:= Za;
    until (kW >= 1) AND (kW <= 1.4);
  OutTextXY(X,Round(295*F+B

Boernix
[Forumsbrot]



29.05.2007
18:23 Uhr
@ Kailash: Kann man damit auch Durchschnittsnoten berechnen?



Ich hatte mich mal vor Jahren mit Basic und Pascal befasst, ich guckte kurz in die Bücher, sagte "häh " und legte die Bücher wieder ins Regal...



Beatles           Revolver
Pink Floyd   The wall
Beatles           Abbey Road
Beatles   White Album
Pink Floyd   Wish you were here
Beatles           Sgt. Pepper
Talk Talk   Spirit of Eden
Pink Floyd   Animals
Roger Waters   Amused to death
Jethro Tull   Thick as a brick
Beatles           Magical Mystery Tour
Who           Quadrophenia
Paul McCartney   Chaos an creation in the backyard
Thin Lizzy   Jailbreak
Rush           Hold your fire
Peter Gabriel   Up
Rush           Permanent waves
Simon & Garfunkel Sounds of silence
Nick Cave   No more shall we part
Peter Gabriel   Ovo
Bathers, The   Sunpowder
Marillion   Marbles
Tori Amos   Under the pink
Radiohead   O.k. Computer
Rush           Signals
Bruce Springsteen Born to run
Pavlo´s Dog   Pampered menial
Beatles   Let it be
Kate Bush   Hounds of love
Travis           The invisible band
Morrissey   Ringleader of the tormentors
Tori Amos   Little earthquakes
Beatles           Rubber Soul
Neil Diamond   12 Songs
John Lennon   Plastic Ono Band
Marillion   Brave
Who           Who´s next
Pavlo´s Dog   At the sound of the bell
Rush           Moving pictures
Kate Bush   The dreaming
Sarah McLachlan   Surfacing
Dave Matthews BandBefore these crowded streets
Paul McCartney   Band on the run
Jackie Leven   Creatures of light and darkness
Rush           Power windows
Talk Talk   The colour of spring
Porcupine Tree   Lightbulp sun
U 2           The joshua tree
Pink Floyd   The final cut
Simon & Garfunkel Bookends
Dire Straits   Love over gold
Peter Gabriel   IV
Rush           Test for echo
Decemberists   Picaresque
Marillion   Misplaced childhood
Eloy           Colours
Bob Dylan   Desire
Sarah McLachlan   Touch
Who           Who are you
Pete Townshend   White city
Simon & Garfunkel Parsley,Sage,Rosemary&Thyme
Depeche Mode   Black celebration
Depeche Mode   Ultra
Tim Buckley   Goodbye and hello
Renaissance   Sheherazade and other stories
Cat Stevens   Tea for the Tillerman
U 2           The unforgetable fire
Pink Floyd   The dark side of the moon
Rush           Grace under pressure
Van Morrison   Common one
Pretty Things   Parachute
Dream Theater   Metropolis II Scenes from a memory
Pete Townshend   The iron man
Neil Young   Sleep with angels
Midge Ure   Breathe
Genesis           The lamb lies down on broadway
Led Zeppelin   III
Elton John   Captain Fantastic
Peter Gabriel   Us
Depeche Mode   Songs of faith and devotion
R.E.M.           Automatic for the people
Simon & Garfunkel Bridge over troubled water
Pete Townshend   All the best cowboys have...
Led Zeppelin   Physical graffiti
Jackie Leven   Defending ancient spring
John Lennon   Imagine
Blackfield   II  
Puressence   Only forever
Jackie Leven   Forbidden songs of the dying west
Beatles           Help
Jethro Tull   Songs from the wood
Be Bop Deluxe   Futurama
Waterboys   This is the sea
Nick Cave   The boatsman´s call
Marc Cohn   Dto.
Nits           Ting
Tears For Fears   The seeds of love
Loreena McKennitt The mask and the mirror
Who           Tommy
Walkabouts   Devil´s road
Van Morrison   Veedon fleece
Smiths           Strangeways, here we come
Tori Amos   Boys for Pele
King Crimson   In the wake of Poseidon
Elton John   Dto.
Jackie Leven   Fairytales for hard men
Page & Plant   Walking into clarksdale
Jackie Leven   Shinig brother, shining sister
Bap           Zwesche Salzjeback un Bier
Paul McCartney   Venus and Mars
Jane           Together
Kate Bush   Never for ever
Konstantin Wecker Genug ist nicht genug
Genesis           Foxtrot
Rush           A farewell to kings
Depeche Mode   Violator
King Crimson   In the court of the crimson king
Deine Lakaien   Forest enter exit
U 2

Kailash
[Besucher]



29.05.2007
18:28 Uhr
@ Boernix


Kann man damit auch Durchschnittsnoten berechnen?

Nein, integrale Flächen.

Rick Wakeman (Yes): "When the first list was being drawn up in the rock 'n' roll book of Genesis, it would have been: In the beginning, God created Pink Floyd."

Boernix
[Forumsbrot]



29.05.2007
18:48 Uhr
@ Kailash: Naja, wie unten zu sehen benötigt meine Top 150 auch ne ganz schöne Fläche, ob die integral ist - zumindes integriert, in den Text...

Obscured by clouds ist nicht dabi, wo wir wieder bei Thema sind, aber wo die steht, ist etwas tiefer ja aufgeführt...

<< Prev  [1  [2  [3  [4 [5]   [6  [7  [8  [9 Next >>

    [Übersicht]-> [Alben - einzeln besprochen]-> [Obscured by Clouds]

Dies ist ein Angebot von www.Bruder-Franziskus.de  -  Impressum