1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. Conan10

Beiträge von Conan10

  • Bestimmten Teil wiederholen

    • Conan10
    • 27. Oktober 2008 um 17:24

    Hallo alle zusammen

    Habe folgendes Problem, wo ich mir den Kopf drüber zerbreche ?( . Und zwar soll der Script an einer bestimmten Stelle in der If-Schleife wieder zu einem bestimmten Stelle springen. Ich habe viel von goto gehört, aber das es jetzt nicht mehr geht. Kennt jemand noch eine andere Alternative.

    Kurze Angabe von wo nach wo:

    Spoiler anzeigen
    [autoit]


    Global $H = "H"
    Global $He = "He"
    ;....
    Msgbox(1,"","")

    [/autoit] [autoit][/autoit] [autoit]

    EA1 = Inputbox("","","","") <- Nach hier

    [/autoit] [autoit][/autoit] [autoit]

    If $EA1 = $H Then
    MsgBox (1, "Wasserstoff", "Wasserstoff: Ordnungszahl:1, Gasförmig, Atommasse: 1,01u")

    ElseIf $EA1 = $HGanz Then
    MsgBox (1, "Wasserstoff", "Wasserstoff(H): Ordnungszahl:1, Gasförmig, Atommasse: 1,01u")
    ;...

    [/autoit] [autoit][/autoit] [autoit]

    Else
    $EA1= $Exit1
    MsgBox (1, "","")
    Exit <- Von hier

    [/autoit] [autoit][/autoit] [autoit][/autoit]
  • PSI

    • Conan10
    • 26. Oktober 2008 um 16:40

    Werde versuchen es umzusetzen Danke für die Idee ;)

  • portable Autoit

    • Conan10
    • 26. Oktober 2008 um 12:40

    Danke haste wirklich Toll gemacht. :thumbup: So was hab ich schon gesucht. :thumbup:

  • PSI

    • Conan10
    • 25. Oktober 2008 um 14:05

    Update!!

    Version: 1.2

    Features:
    -Eingabe von Namen jetzt auch möglich ;)

    PSI_1.2

  • PSI

    • Conan10
    • 22. Oktober 2008 um 18:01

    Update!!

    Version: 1.1 ;)

    Features:
    -Ordnungszahlen
    -Neue Elemente

    PSI 1.1

  • PSI

    • Conan10
    • 19. Oktober 2008 um 14:21

    So hab den Script nochmal hinzugefügt. Auch wollte ich nochmal darauf hinweisen das das bild eigentlich nur als hilfe für diejenigen sein sollte die die Abkürzungen nicht mehr wußten.Hab ausversehen vergessen das dazu zu schreiben *sorry*

  • PSI

    • Conan10
    • 18. Oktober 2008 um 20:02

    Wollte euch mal mein erstes komplett von mir geschriebenes AutoIt Programm vorstellen. Es heißt voll ausgeschrieben Periodensysteminformationsprogramm(Kurzschreibung: PSI). Es soll vorallem Schüler und Leuten helfen die das Periodensystem der Element in Chemie nicht auswendig lernen wollen(Atommasse,Ordnungszahl, u.s.w.). Es zeigt im Moment zwar nur den Namen, Aggragatzustand, Atommasse und Radioaktivität (falls vorhanden) an, aber ich werde es bestimmt noch mit mehr Informationen versorgen. ;) Ein kleines Problem besteht zwar(Man kann im Moment nur Abkürzungen von Elementen verwenden) ^^ , aber das werde ich auch hinkriegen.

    Geplant sind im moment die Ordnungszahlen und die Eingabe vom kompletten Namen.

    Der Link zum Programm:

    http://cid-4b3c5f417a0b793b.skydrive.live.com/self.aspx/Tools/PSI|_1.0.exe

    Bitte um eure Meinung ;)


    EDIT: Hier dann der Skript. Er ist zwar sehr umständlich aber funktioniert. ^^

    Spoiler anzeigen
    [autoit]

    HotKeySet ("F12","Exit1")

    [/autoit] [autoit][/autoit] [autoit]

    Global $Exit1 = "Exit"
    Global $H = "H"
    Global $He = "He"
    Global $Li = "Li"
    Global $Be = "Be"
    Global $B = "B"
    Global $C = "C"
    Global $N = "N"
    Global $O = "O"
    Global $F = "F"
    Global $Ne = "Ne"
    Global $Na = "Na"
    Global $Mg = "Mg"
    Global $Al = "Al"
    Global $Si = "Si"
    Global $P = "P"
    Global $S = "S"
    Global $Cl = "Cl"
    Global $Ar = "Ar"
    Global $K = "K"
    Global $Ca = "Ca"
    Global $Sc = "Sc"
    Global $Ti = "Ti"
    Global $V = "V"
    Global $Cr = "Cr"
    Global $Mn = "Mn"
    Global $Fe = "Fe"
    Global $Co = "Co"
    Global $Ni = "Ni"
    Global $Cu = "Cu"
    Global $Zn = "Zn"
    Global $Ga = "Ga"
    Global $Ge = "Ge"
    Global $As = "As"
    Global $Se = "Se"
    Global $Br = "Br"
    Global $Kr = "Kr"
    Global $Rb = "Rb"
    Global $Sr = "Sr"
    Global $Y = "Y"
    Global $Zr = "Zr"
    Global $Nb = "Nb"
    Global $Mo = "Mo"
    Global $Tc = "Tc"
    Global $Ru = "Ru"
    Global $Rh = "Rh"
    Global $Pd = "Pd"
    Global $Ag = "Ag"
    Global $Cd = "Cd"
    Global $In = "In"
    Global $Sn = "Sn"
    Global $Sb = "Sb"
    Global $Te = "Te"
    Global $I = "I"
    Global $Xe = "Xe"
    Global $Cs = "Cs"
    Global $Ba = "Ba"
    Global $La = "La"
    Global $Ce = "Ce"
    Global $Pr = "Pr"
    Global $Nd = "Nd"
    Global $Pm = "Pm"
    Global $Sm = "Sm"
    Global $Eu = "Eu"
    Global $Gd = "Gd"
    Global $Tb = "Tb"
    Global $Dy = "Dy"
    Global $Ho = "Ho"
    Global $Er = "Er"
    Global $Tm = "Tm"
    Global $Yb = "Yb"
    Global $Lu = "Lu"
    Global $Hf = "Hf"
    Global $Ta = "Ta"
    Global $W = "W"
    Global $Re = "Re"
    Global $Os = "Os"
    Global $Ir = "Ir"
    Global $Pt = "Pt"
    Global $Au = "Au"
    Global $Hg = "Hg"
    Global $Tl = "Tl"
    Global $Pb = "Pb"
    Global $Bi = "Bi"
    Global $Po = "Po"
    Global $At = "At"
    Global $Rn = "Rn"
    Global $Fr = "Fr"
    Global $Ra = "Ra"
    Global $Ac = "Ac"
    Global $Th = "Th"
    Global $Pa = "Pa"
    Global $U = "U"
    Global $Np = "Np"
    Global $Pu = "Pu"
    Global $Am = "Am"
    Global $Cm = "Cm"
    Global $Bk = "Bk"
    Global $Cf = "Cf"
    Global $Es = "Es"
    Global $Fm = "Fm"
    Global $Md = "Md"
    Global $No = "No"
    Global $Lr = "Lr"
    Global $Rf = "Rf"
    Global $Db = "Db"
    Global $Sg = "Sg"
    Global $Bh = "Bh"
    Global $Hs = "Hs"
    Global $Mt = "Mt"
    Global $Ds = "Ds"

    [/autoit] [autoit][/autoit] [autoit]

    WinMinimizeAll ()
    MsgBox (1, "Willkommen", "Willkommen und vielen Dank das sie mein Periodensysteminformationsprogramm benutzen. Für Bewertungen (egal ob negativ, positiv oder sonstiges) bitte eine E-Mail an Conan10@live.de")
    While (2)

    $EA1 = InputBox ("Periodensysteminformation","Bitte geben sie die Abkürzung eines Elements ein, z.B. Cl für Chlor. Exit zum Beenden. Hinweis: Angaben in Klammern bei Atommasse = Kein zuverlässiger Messwert verfügbar", "","")
    If $EA1 = $H Then
    MsgBox (1, "Wasserstoff", "Wasserstoff: Gasförmig, Atommasse: 1,01u")

    ElseIf $EA1 = $He Then
    MsgBox (1, "Helium", "Helium: Gasförmig, Atommasse: 4u")

    ElseIf $EA1 = $Li Then
    MsgBox (1, "Lithium", "Lithium: Fest, Atommasse: 6,94u")

    ElseIf $EA1 = $Be Then
    MsgBox (1, "Beryllium", "Beryllium: Fest, Atommasse: 9,01u")

    ElseIf $EA1 = $B Then
    MsgBox (1, "Bor", "Bor: Fest, Atommasse: 10,81u")

    ElseIf $EA1 = $C Then
    MsgBox (1, "Kohlenstoff", "Kohlenstoff: Fest, Atommasse: 12,01u")

    ElseIf $EA1 = $N Then
    MsgBox (1, "Stickstoff", "Stickstoff: Gasförmig, Atommasse: 14,01u")

    ElseIf $EA1 = $O Then
    MsgBox (1, "Sauerstoff", "Sauerstoff: Gasförmig, Atommasse: 15,999u")

    ElseIf $EA1 = $F Then
    MsgBox (1, "Fluor", "Flour: Gasförmig, Atommasse: 18,998u")

    ElseIf $EA1 = $Ne Then
    MsgBox (1, "Neon", "Neon: Gasförmig, Atommasse: 20,18u")

    ElseIf $EA1 = $Na Then
    MsgBox (1, "Natrium", "Natrium: Fest, Atommasse: 22,99u")

    ElseIf $EA1 = $Mg Then
    MsgBox (1, "Magnesium", "Magnesium: Fest, Atommasse: 24,31u")

    ElseIf $EA1 = $Al Then
    MsgBox (1, "Aluminium", "Aluminium: Fest, Atommasse: 26,98u")

    ElseIf $EA1 = $Si Then
    MsgBox (1, "Silicium", "Silicium: Fest, Atommasse: 28,09u")

    ElseIf $EA1 = $P Then
    MsgBox (1, "Phosphor", "Phosphor: Fest, Atommasse: 30,97u")

    ElseIf $EA1 = $S Then
    MsgBox (1, "Schwefel", "Schwefel: Fest, Atommasse: 32,07u")

    ElseIf $EA1 = $Cl Then
    MsgBox (1, "Chlor", "Chlor: Gasförmig, Atommasse: 35,45u")

    ElseIf $EA1 = $Ar Then
    MsgBox (1, "Argon", "Argon: Gasförmig, Atommasse: 39,95u")

    ElseIf $EA1 = $K Then
    MsgBox (1, "Kalium", "Kalium: Fest, Atommasse: 39,10u")

    ElseIf $EA1 = $Ca Then
    MsgBox (1, "Calcium", "Calcium: Fest, Atommasse: 40,08u")

    ElseIf $EA1 = $Sc Then
    MsgBox (1, "Scandium", "Scandium: Fest(unter Normalbedingungen), Atommasse: 44,96u")

    ElseIf $EA1 = $Ti Then
    MsgBox (1, "Titan", "Titan: Fest(unter Normalbedingungen), Atommasse: 47,88u")

    ElseIf $EA1 = $V Then
    MsgBox (1, "Vanadium", "Vanadium: Fest(unter Normalbedingungen), Atommasse: 50,94u")

    ElseIf $EA1 = $Cr Then
    MsgBox (1, "Chrom", "Chrom: Fest(unter Normalbedingungen), Atommasse: 52,0u")

    ElseIf $EA1 = $Mn Then
    MsgBox (1, "Mangan", "Mangan: Fest(unter Normalbedingungen), Atommasse: 54,94u")

    ElseIf $EA1 = $Fe Then
    MsgBox (1, "Eisen", "Eisen: Fest(unter Normalbedingungen), Atommasse: 55,85u")

    ElseIf $EA1 = $Co Then
    MsgBox (1, "Cobalt", "Cobalt: Fest(unter Normalbedingungen), Atommasse: 58,93")

    ElseIf $EA1 = $Ni Then
    MsgBox (1, "Nickel", "Nickel: Fest(unter Normalbedingungen), Atommasse: 58,7u")

    ElseIf $EA1 = $Cu Then
    MsgBox (1, "Kupfer", "Kupfer: Fest(unter Normalbedingungen), Atommasse: 63,55u")

    ElseIf $EA1 = $Zn Then
    MsgBox (1, "Zink", "Zink: Fest(unter Normalbedingungen), Atommasse: 65,38u")

    ElseIf $EA1 = $Ga Then
    MsgBox (1, "Gallium", "Gallium: Fest, Atommasse: 69,72u")

    ElseIf $EA1 = $Ge Then
    MsgBox (1, "Germanium", "Germanium: Fest, Atommasse: 72,61")

    ElseIf $EA1 = $As Then
    MsgBox (1, "Arsen", "Arsen: Fest, Atommasse: 74,92")

    ElseIf $EA1 = $Se Then
    MsgBox (1, "Selen", "Selen: Fest, Atommasse: 78,96")

    ElseIf $EA1 = $Br Then
    MsgBox (1, "Brom", "Brom: Flüssig, Atommasse: 79,90u")

    ElseIf $EA1 = $Kr Then
    MsgBox (1, "Krypton", "Krypton: Gasförmig, Atommasse: 83,80u")

    ElseIf $EA1 = $Rb Then
    MsgBox (1, "Rubidium", "Rubidium: Fest, Atommasse: 85,47u")

    ElseIf $EA1 = $Sr Then
    MsgBox (1, "Strontium", "Strontium: Fest, Atommasse: 87,52u")

    ElseIf $EA1 = $Y Then
    MsgBox (1, "Yttrium", "Yttrium: Fest(unter Normalbedingungen), Atommasse: 88,91u")

    ElseIf $EA1 = $Zr Then
    MsgBox (1, "Zirconium", "Zirconium: Fest(unter Normalbedingungen), Atommasse: 91,22u")

    ElseIf $EA1 = $Nb Then
    MsgBox (1, "Niob", "Niob: Fest(unter Normalbedingungen), Atommasse: 92,91u")

    ElseIf $EA1 = $Mo Then
    MsgBox (1, "Molybdän", "Molybdän: Fest(unter Normalbedingungen), Atommasse: 95,94u")

    ElseIf $EA1 = $TC Then
    MsgBox (1, "Technetium", "Technetium: Fest(unter Normalbedingungen), Atommasse: (98)u, ACHTUNG:Radioaktiv!!")

    ElseIf $EA1 = $Ru Then
    MsgBox (1, "Ruthenium", "Ruthenium: Fest(unter Normalbedingungen), Atommasse: 101,07u")

    ElseIf $EA1 = $Rh Then
    MsgBox (1, "Rohdium", "Rohdium: Fest(unter Normalbedingungen), Atommasse: 102,91u")

    ElseIf $EA1 = $Pd Then
    MsgBox (1, "Palladium", "Palladium: Fest(unter Normalbedingungen), Atommasse: 106,42u")

    ElseIf $EA1 = $Ag Then
    MsgBox (1, "Silber", "Silber: Fest(unter Normalbedingungen), Atommasse: 107,87u")

    ElseIf $EA1 = $Cd Then
    MsgBox (1, "Cadmium", "Cadmium: Fest(unter Normalbedingungen), Atommasse: 112,41u")

    ElseIf $EA1 = $In Then
    MsgBox (1, "Indium", "Indium: Fest, Atommasse: 114,82u")

    ElseIf $EA1 = $Sn Then
    MsgBox (1, "Zinn", "Zinn: Fest, Atommasse: 118,71u")

    ElseIf $EA1 = $Sb Then
    MsgBox (1, "Antimon", "Antimon: Fest, Atommasse: 121,76u")

    ElseIf $EA1 = $Te Then
    MsgBox (1, "Tellur", "Tellur: Fest, Atommasse: 127,60u")

    ElseIf $EA1 = $I Then
    MsgBox (1, "Iod", "Iod: Fest, Atommasse: 126,90u")

    ElseIf $EA1 = $Xe Then
    MsgBox (1, "Xenon", "Xenon: Gasförmig, Atommasse: 131,29u")

    ElseIf $EA1 = $Cs Then
    MsgBox (1, "Cäsium", "Cäsium: Fest, Atommasse: 132,91u")

    ElseIf $EA1 = $Ba Then
    MsgBox (1, "Barium", "Barium: Fest, Atommasse: 137,33u")

    ElseIf $EA1 = $La Then
    MsgBox (1, "Lanthan", "Lanthan: Fest, Atommasse: 138,91u")

    ElseIf $EA1 = $Ce Then
    MsgBox (1, "Cer", "Cer: Fest, Atommasse: 140,12u")

    ElseIf $EA1 = $Pr Then
    MsgBox (1, "Praseodym", "Praseodym: Fest, Atommasse: 144,24u")

    ElseIf $EA1 = $Nd Then
    MsgBox (1, "Neodym", "Neodym: Fest, Atommasse: 144,24u")

    ElseIf $EA1 = $Pm Then
    MsgBox (1, "Promethium", "Promethium: Fest(unter Normalbedingungen), Atommasse: (145)u, ACHTUNG:Radioaktiv!!")

    ElseIf $EA1 = $Sm Then
    MsgBox (1, "Samarium", "Samarium: Fest, Atommasse: 150,36u")

    ElseIf $EA1 = $Eu Then
    MsgBox (1, "Europium", "Europium: Fest, Atommasse: 151,97u")

    ElseIf $EA1 = $Gd Then
    MsgBox (1, "Gadolinium", "Gadolinium: Fest, Atommasse: 157,97u")

    ElseIf $EA1 = $Tb Then
    MsgBox (1, "Terbium", "Terbium: Fest, Atommasse: 158,93u")

    ElseIf $EA1 = $Dy Then
    MsgBox (1, "Dysprosium", "Dysprosium: Fest, Atommasse: 162,50u")

    ElseIf $EA1 = $Ho Then
    MsgBox (1, "Holmium", "Holmium: Fest, Atommasse: 164,93u")

    ElseIf $EA1 = $Er Then
    MsgBox (1, "Erbium", "Erbium: Fest, Atommasse: 167,26u")

    ElseIf $EA1 = $Tm Then
    MsgBox (1, "Thulium", "Thulium: Fest, Atommasse: 168,93u")

    ElseIf $EA1 = $Yb Then
    MsgBox (1, "Ytterbium", "Ytterbium: Fest, Atommasse: 173,04u")

    ElseIf $EA1 = $Lu Then
    MsgBox (1, "Lutetium", "Lutetium: Fest, Atommasse: 174,97")

    ElseIf $EA1 = $Hf Then
    MsgBox (1, "Hafnium", "Hafnium: Fest, Atommasse: 178,49")

    ElseIf $EA1 = $Ta Then
    MsgBox (1, "Tantal", "Tantal: Fest, Atommasse: 180,95u")

    ElseIf $EA1 = $W Then
    MsgBox (1, "Wolfram", "Wolfram: Fest, Atommasse: 183,84u")

    ElseIf $EA1 = $Re Then
    MsgBox (1, "Rhenium", "Rhenium: Fest, Atommasse: 186,21u")

    ElseIf $EA1 = $Os Then
    MsgBox (1, "Osmium", "Osmium: Fest, Atommasse: 190,23u")

    ElseIf $EA1 = $Ir Then
    MsgBox (1, "Iridium", "Iridium: Fest, Atommasse: 192,22u")

    ElseIf $EA1 = $Pt Then
    MsgBox (1, "Platin", "Platin: Fest, Atommasse: 195,08u")

    ElseIf $EA1 = $Au Then
    MsgBox (1, "Gold", "Gold: Fest, Atommasse: 196,97u")

    ElseIf $EA1 = $Hg Then
    MsgBox (1, "Quecksilber", "Quecksilber: Flüssig, Atommasse: 200,59u")

    ElseIf $EA1 = $Tl Then
    MsgBox (1, "Thallium", "Thallium: Fest, Atommasse: 204,38u")

    ElseIf $EA1 = $Pb Then
    MsgBox (1, "Blei", "Blei: Fest, Atommasse: 207,20u")

    ElseIf $EA1 = $Bi Then
    MsgBox (1, "Bismut", "Bismut: Fest, Atommasse: 208,98u")

    ElseIf $EA1 = $Po Then
    MsgBox (1, "Polonium", "Polonium: Fest, Atommasse: (209)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $AT Then
    MsgBox (1, "Astat", "Astat: Fest, Atommasse: (210)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Rn Then
    MsgBox (1, "Radon", "Radon: Fest, Atommasse: (222)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Fr Then
    MsgBox (1, "Francium", "Francium: Fest, Atommasse: (223)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Ra Then
    MsgBox (1, "Radium", "Radium: Fest, Atommasse: (226)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Ac Then
    MsgBox (1, "Actinium", "Actinium: Fest, Atommasse: 227,03u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Th Then
    MsgBox (1, "Thorium", "Thorium: Fest, Atommasse: 232,04u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Pa Then
    MsgBox (1, "Protactinium", "Protactinium: Fest, Atommasse: 231,03, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $U Then
    MsgBox (1, "Uran", "Uran: Fest, Atommasse: 238,03u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Np Then
    MsgBox (1, "Neptunium", "Neptunium: Fest, Atommasse: (237), ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Pu Then
    MsgBox (1, "Plutonium", "Plutonium: Fest, Atommasse: (244)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Am Then
    MsgBox (1, "Americum", "Americum: Fest, Atommasse: (243)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Cm Then
    MsgBox (1, "Curium", "Curium: Fest, Atommasse: (247)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Bk Then
    MsgBox (1, "Berkelium", "Berkelium: Fest, Atommasse: (247)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Cf Then
    MsgBox (1, "Californium", "Californium: Fest, Atommasse: (251)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Es Then
    MsgBox (1, "Einsteinium", "Einsteinium: Fest, Atommasse: (252)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Fm Then
    MsgBox (1, "Fermium", "Fermium: Fest, Atommasse: (257)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Md Then
    MsgBox (1, "Mendelevium", "Mendelevium: Fest, Atommasse: (258)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $No Then
    MsgBox (1, "Nobelium", "Nobelium: Fest, Atommasse: (259)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Lr Then
    MsgBox (1, "Lawrencium", "Lawrencium: Fest, Atommasse: (260)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Rf Then
    MsgBox (1, "Rutherfordium", "Rutherfordium: Fest, Atommasse: (261)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Db Then
    MsgBox (1, "Dubnium", "Dubnium: Fest, Atommasse: (262)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Sg Then
    MsgBox (1, "Seaborgium", "Seaborgium: Fest, Atommasse: (263)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Bh Then
    MsgBox (1, "Bohrium", "Bohrium: Fest, Atommasse: (262)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Hs Then
    MsgBox (1, "Hassium", "Hassium: Fest, Atommasse: (265)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Mt Then
    MsgBox (1, "Meitnerium", "Meitnerium: Fest, Atommasse: (266)u, ACHTUNG: Radioaktiv!!!")

    ElseIf $EA1 = $Ds Then
    MsgBox (1, "Darmstadtium", "Darmstadtium: Fest, Atommasse: (269)u, ACHTUNG: Radioaktiv!!!")

    Else
    $EA1= $Exit1
    MsgBox (1, "Vielen Dank!!","Vielen Dank das sie mein Programm benutzt haben. Ursachen für das Beenden des Programmes könnten sein: -Falsche Eingabe -Manuelles Beenden")
    Exit

    [/autoit] [autoit][/autoit] [autoit]

    EndIf
    WEnd
    Func Exit1 ()
    Exit
    EndFunc

    [/autoit]


    P.S.: Geplant werden auch noch mehr Informationen, die auch durch das Periodensystem nicht erkennbar sind. :D

  • Fehlermeldung oder Beendeter Script

    • Conan10
    • 15. Oktober 2008 um 18:36

    Danke

  • Fehlermeldung oder Beendeter Script

    • Conan10
    • 15. Oktober 2008 um 18:15

    Danke für die rasche Antwort

  • Fehlermeldung oder Beendeter Script

    • Conan10
    • 15. Oktober 2008 um 17:46

    Wie müsste ich das dann umschreiben damit es mit beiden einzelnt funktioniert mit Komma?

  • Fehlermeldung oder Beendeter Script

    • Conan10
    • 15. Oktober 2008 um 17:28

    Hi alle zusammen. Ich brauche nochmal eure Hilfe und zwar will ich das Periodensystem umsetzen, so das man den Namen oder die Abkürzung eingeben kann und der Script dann Informationen dazu ausgibt. Nur hab ich das Problem das kurz nach der Inputbox der Script sich beendet oder wenn ich das mit Else mache eine Fehlermeldung für die Exitzeile bekomme. ^^ Könnte mir jemand helfen :?:

    Danke schon mal im voraus

    Conan10


    Spoiler anzeigen
    [autoit]

    HotKeySet ("F12","Exit1")
    ;Variablen:
    Global $Exit = "0" & "Exit"
    Global $H = "H" & "Wasserstoff"
    Global $He = "He" & "Helium"
    ;....

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox (1, "Willkommen", "Willkommen und vielen Dank das sie das Periodensysteminformationsprogramm benutzen.")
    $EA1 = InputBox ("Periodensysteminformation","Bitte geben sie den Namen oder die Abkürzung eines Elements ein, z.B. Cl oder Chlor", "","")
    If $EA1 = $H Then
    MsgBox (1, "Wasserstoff", "Wasserstoff: Gasförmig, Atommasse: 1,01u")

    [/autoit] [autoit][/autoit] [autoit]

    ElseIf $EA1 = $He Then
    MsgBox (1, "Helium", "Helium: Gasförmig, Atommasse: 4u")
    ;...... geht immer so weiter

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    EndIf

    [/autoit] [autoit][/autoit] [autoit]

    Func Exit1 ()
    Exit
    EndFunc

    [/autoit]
  • Script nach PC Neustart weiterführen

    • Conan10
    • 13. Oktober 2008 um 18:40

    Danke für die Hilfe :thumbup: . Habe es mittlerweile hinbekommen.

  • Script nach PC Neustart weiterführen

    • Conan10
    • 13. Oktober 2008 um 16:25

    Hi alle zusammen. Hab erst for kurzem mit AutoIT angefangen und habe da eine Frage.

    Lässt sich ein Script irgendwie auch nach einem Neustart fortfahren? Also nach dem Befehl shutdown und der Pc wiederhochgefahren wird soll ein Script weitermachen. Danke im Voraus für Alle die helfen.

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™