W 7/EG

Class _7EG Dim Marco as new PersonAtISH() Dim Florian as new PersonAtISH() Dim Emaunuel as new PersonAtISH() Imports from Xcode Fabian as new PersonAtISH() Dim Yannick as new PersonAtISH() Dim Pascal as new PersonAtISH() Dim Marius as new PersonAtISH() Dim Eike as new PersonAtISH() Marco.Instrument = „Klavier“ Marco.Hobbies = „Tennis“ and „Tischkicker“ and „programmieren“ and „Musik hören“ and „Rubik’s Cubes“ and „Konsolen“ and „Stämme“ Marco.Charakter = „gechillt“ Marco.Lieblingsfächer = „Informatik + Mathe“ Florian.Instrument = „Geige“ Florian.Hobbies = „Herr der Ringe + Universum“ and „programmieren“ and „PC-Spiele“ and „Schach“ and „Herr der Ringe Spiele“ and „Badminton“ Florian.Charakter = „Hobbit“ Florian.Lieblingsfächer = „Mathe + Info“ Emanuel.Instrument = „Klavier“ Emanuel.Hobbies = „Schwimmen“ and „Badminton“ Emanuel.Politik = „Junge Union“ Emanuel.Charakter = „ganz ganz ordentlich und ganz ganz engagiert“ Emanuel.Lieblingsfächer = „Chemie“ Fabian.Instrument = „Geige“ Fabian.Hobbies = „Über Windows lästern“ and „Apple“ and „Rubik’s Cubes“ and „programmieren“ and „Sprachen“ and „Billiard“ Fabian.Hobbies &= „Schach“ and „Fotographie“ and „lesen“ and „Tanzen“ Fabian.Politik = „Junge Liberale“ Fabian.Charakter = „kreatives Chaos“ Fabian.Lieblingsfächer = „Sprachen“ Yannick.Instrument = „Klavier“ Yannick.Hobbies = „Tischkicker“ and „Badminton“ and „Volleyball“ and „Fußball“ and „Chinesisch sprechen, aber keiner verstehts“ Yannick.Hobbies &= „Chinesisch kochen“ and „Rubik’s Cubes“ and „Tanzen“ Yannick.Charakter = „süß-sauer“ Yannick.Lieblingsfächer = „Sport“ Pascal.Instrument = „Cello“ Pascal.Hobbies = „Fußball“ and „Astronomie“ and „Portugiesisch“ and „Rubik’s Cubes“ and „Musik“ Pascal.Charakter = „redet gern“ Pascal.Lieblingsfächer = „Mathe“ Marius.Hobbies = „4EG“ and „Fitnessraum“ and „zocken“ and „boxen“ and „Fußball“ and „Todesfinger“ Marius.Hauptnahrungsmittel = „Proteinshake“ Marius.Charakter = „Was geht aaaaaaab!!“ Marius.Lieblingsfächer = „Sport + Spanisch“ Eike.Instrument = „Posaune“ Eike.Hobbies = "Metal" Eike.Hobbies &= „zocken“ and „Rubik’s Cubes“ and „Plattdüütsch“ and „Scrubs“ and „Basketball“ and „Karate“ Eike.Charakter = „kwümpl“ Eike.Lieblingsfächer = „Physik“ Dim Zimmer1 as new Zimmer(Marco,Florian) Dim Zimmer2 as new Zimmer(Emanuel,Fabian) Dim Zimmer3 as new Zimmer(Yannick,Pascal) Dim Zimmer4 as new Zimmer(Marius,Eike) If Fernseher.läuft Then Programm = „MTV“ or „VIVA“ or „Pro7“ or „PS3“ End If Sub TelefonKlingelt() Handles Telefon.Klingelt If Florian.IsInWG() Then Florian.RennZuTelefon() Else Zufall.GehZuTelefon() End If End Sub Sub TürKlingelt() Handles Tür.Klingelt If Florian.IsInWG() Then Florian.RennZuTür() Else Zufall.GehZuTür() End If End Sub End Class

7 EG

ACH WAS! Hier die Vorstellung: