XProfan

Cls
' ANWENDUNG AUF ALLEINIGE GEFAHR DES USERS! KEINE GEWÄHR!
' Meine Konfiguration: Profan11.2a, Win7-64 und dessen Calc.exe
declare pid&,R$
'run "calc.exe"
pid&=@WinExec("calc.exe",1)
'Fenster-Modus (hier 1)
' 0 - verbirgt und deaktiviert das Fenster (~SW_HIDE)
' 1 - aktiviert das Fenster und zeigt es in seiner ursprünglichen Größe (~SW_SHOWNORMAL)
' 2 - aktiviert das Fenster und verkleinert es zum Symbol (~SW_SHOWMINIMIZED)
' 3 - aktiviert das Fenster und zeigt es größtmöglich an (~SW_SHOWMAXIMIZED)
' 4 - zeigt das Fenster in seiner normalen Größe, das gegenwärtig aktive Fenster bleibt aktiv (~SW_SHOWNOACTIVE)
' 5 - aktiviert das Fenster und zeigt es in aktueller Größe (~SW_SHOW)
' 6 - deaktiviert das Fenster und verkleinert es zum Symbol
' 7 - verkleinert das Fenster zum Symbol, das gegenwärtig aktive Fenster bleibt aktiv (~SW_SHOWMINNOACTIVE)
' 8 - Zeigt das Fenster im aktuellen Zustand, das gegenwärtig aktive Fenster bleibt aktiv (~SW_SHOWNA)
' 9 - gleiche Wirkung wie Modus 1 (~SW_RESTORE)

if pid&=0

    print "Exec-Fehler"
    beep
    waitinput

else

    clearclip
    print "Process-ID: ",pid&
    waitinput 300
    @SendString(pid&,"%2")
    waitinput 300
    @SendString(pid&,"1234{+}1{ENTER}")
    waitinput 300
    'Plus + = UMSCHALTTASTE (SHIFT)
    'Caret ^ = STRG-TASTE
    'Prozent % = ALT-TASTE
    'Tilde ~
    'Klammern ( )
    '+,^,%-Zeichen selbst: In geschweifte Klammern {+}
    'Geschw.Klammern selbst: {{} und {}}
    'Spezielle Tasten, die keine Zeichen darstellen: {Codetext}:
    '@SendString(W%,"Das ist die Eingabe! {ENTER}"

    repeat

        '    waitinput 40
        @SendString(pid&,"^c")
        '    waitinput 40
        R$=GetClip$()

    until R@@@edbc5df4-7053-49e0-b37c-1d8e021c951e@@@

    gt;0
    @SendString(pid&,"%{F4}")
    print R$

endif

waitinput
end
'[]Rechner-Tastenkombinationen (calc.exe von Win7)
' -------------------------------------------------
' MODUS
' ALT+1 Umschalten in den Standardmodus
' ALT+2 Umschalten in den wissenschaftlichen Modus
' ALT+3 Umschalten in den Programmierermodus
' ALT+4 Umschalten in den Statistikmodus
' STRG+E Öffnen von Datumsberechnungen
' STRG+H Ein- oder Ausschalten des Berechnungsverlaufs
' STRG+U Öffnen der Einheitenumrechnung
' ALT+C Berechnen oder Lösen von Datumsberechnungen und Arbeitsblättern
' F1 Öffnen der Rechner-Hilfe
' EINGABEN UND MEMO
' STRG+Q Verwenden der Schaltfläche Memo=Memo-Wert: M-
' STRG+P Verwenden der Schaltfläche Memo=Memo+Wert:M+
' STRG+M Verwenden der Schaltfläche Memo-Store: MS
' STRG+R Verwenden der Schaltfläche Memo-Recall: MR
' STRG+L Verwenden der Schaltfläche Memo-Clear: MC
' % Verwenden der Schaltfläche %
' F9 Verwenden der Schaltfläche Vorzeichenwechsel: +/-
' / Verwenden der Schaltfläche /
' * Verwenden der Schaltfläche *
' + Verwenden der Schaltfläche +
' - Verwenden der Schaltfläche -
' R Verwenden der Schaltfläche 1/x
' @ Verwenden der Wurzelschaltfläche
' 0-9 Verwenden der Zahlenschaltflächen (0-9)
' = Verwenden der Schaltfläche {Enter}: =
' . Verwenden der Schaltfläche , (Dezimaltrennzeichen, Komma)
' RÜCKTASTE Verwenden der Schaltfläche {Lösche letzten Tastendruck}
' ESC Verwenden der Schaltfläche CLEAR: C
' ENTF Verwenden der Schaltfläche CANCELERROR: CE
' BERECHNUNGSVERLAUF
' STRG+UMSCHALT+D Löschen des Berechnungsverlaufs
' F2 Bearbeiten des Berechnungsverlaufs
' NACH-OBEN-TASTE Navigation nach oben im Berechungsverlauf
' NACH-UNTEN-TASTE Navigation nach unten im Berechungsverlauf
' ESC Abbrechen der Bearbeitung des Berechnungsverlaufs
' EINGABETASTE Neuberechnen des Berechnungsverlaufs nach der Bearbeitung
' WISSENSCHAFTLICH
' F3 Auswählen von Deg im wissenschaftlichen Modus
' F4 Auswählen von Rad im wissenschaftlichen Modus
' F5 Auswählen von Grad im wissenschaftlichen Modus
' I Verwenden der Schaltfläche Inv im wissenschaftlichen Modus
' D Verwenden der Schaltfläche Mod im wissenschaftlichen Modus
' STRG+S Verwenden der Schaltfläche sinh im wissenschaftlichen Modus
' STRG+O Verwenden der Schaltfläche cosh im wissenschaftlichen Modus
' STRG+T Verwenden der Schaltfläche tanh im wissenschaftlichen Modus
' ( Verwenden der Schaltfläche ( im wissenschaftlichen Modus
' ) Verwenden der Schaltfläche ) im wissenschaftlichen Modus
' N Verwenden der Schaltfläche Log-n: ln im wissenschaftlichen Modus
' ; Verwenden der Schaltfläche Ganzteil: Int im wissenschaftlichen Modus
' S Verwenden der Schaltfläche sin im wissenschaftlichen Modus
' O Verwenden der Schaltfläche cos im wissenschaftlichen Modus
' T Verwenden der Schaltfläche tan im wissenschaftlichen Modus
' M Verwenden der Schaltfläche dms im wissenschaftlichen Modus
' P Verwenden der Pi-Schaltfläche im wissenschaftlichen Modus
' V Verwenden der Schaltfläche F-E im wissenschaftlichen Modus
' X Verwenden der Schaltfläche Exp im wissenschaftlichen Modus
' Q Verwenden der Schaltfläche x^2 im wissenschaftlichen Modus
' Y Verwenden der Schaltfläche x^y im wissenschaftlichen Modus
' # Verwenden der Schaltfläche x^3 im wissenschaftlichen Modus
' L Verwenden der Schaltfläche Log10: log im wissenschaftlichen Modus
' ! Verwenden der Schaltfläche Faktorielle: n! im wissenschaftlichen Modus
' STRG+Y Verwenden der Schaltfläche y.Wurzel_x im wissenschaftlichen Modus
' STRG+B Verwenden der Schaltfläche 3.Wurzel_x im wissenschaftlichen Modus
' STRG+G Verwenden der Schaltfläche 10^x im wissenschaftlichen Modus
' A-F Verwenden der Schaltflächen A-F im wissenschaftlichen Modus
' PROGRAMMIEREN
' F5 Auswählen von Hex im Programmierermodus
' F6 Auswählen von Dez im Programmierermodus
' F7 Auswählen von Okt im Programmierermodus
' F8 Auswählen von Bin im Programmierermodus
' F12 Auswählen von Qword im Programmierermodus
' F2 Auswählen von Dword im Programmierermodus
' F3 Auswählen von Word im Programmierermodus
' F4 Auswählen von Byte im Programmierermodus
' K Verwenden der Schaltfläche RoR im Programmierermodus
' J Verwenden der Schaltfläche RoL im Programmierermodus
' < Verwenden der Schaltfläche Lsh im Programmierermodus
' > Verwenden der Schaltfläche Rsh im Programmierermodus
' % Verwenden der Schaltfläche Mod im Programmierermodus
' ( Verwenden der Schaltfläche ( im Programmierermodus
' ) Verwenden der Schaltfläche ) im Programmierermodus
' | Verwenden der Schaltfläche Or im Programmierermodus
' ^ Verwenden der Schaltfläche Xor im Programmierermodus
' ~ Verwenden der Schaltfläche Not im Programmierermodus
' & Verwenden der Schaltfläche And im Programmierermodus
' A-F Verwenden der Schaltflächen A-F im wissenschaftlichen Modus
' LEERTASTE Umschalten des Bitwerts im Programmierermodus
' STATISTIK
' A Verwenden der Mittelwertschaltfläche im Statistikmodus
' STRG+A Verwenden der Schaltfläche für den Mittelwert der Quadrate im Statistikmodus
' S Verwenden der Summenschaltfläche im Statistikmodus
' STRG+S Verwenden der Schaltfläche für die Summe der Quadrate im Statistikmodus
' T Verwenden der Schaltfläche s n-1 im Statistikmodus
' STRG+T Verwenden der Schaltfläche s n im Statistikmodus
' D Verwenden der Schaltfläche CAD im Statistikmodus