Skriptbeispiel für [Flags().X]:
Dieses Skript zeigt eine Verwendung eines Bitfeldes zur Speicherung eines Zeitablaufs.
*** Aufzeichnen einer Klickfolge Anzeigefenster 'Flags-Test' (B=98, H=36) Anzeige-Element Button: 'Klick mich!' (ID='cmdKlick', X=32, Y=2, B=22, H=8, deaktiviert) Anzeige-Element Button: 'Start' (ID='cmdStart', X=4, Y=2, B=22, H=8) Anzeige-Element Zeichenfläche: (ID='ZF1', X=4, Y=12, B=90, H=10, umrandet) Anzeige-Element Button: 'Neu zeichnen' (ID='cmdRedraw', X=60, Y=2, B=22, H=8) Warte endlos...
:: Anzeige_Element(cmdStart)_Klick Wenn Wahr: '("[.Element(cmdStart).Text]" = "Start")' *** Start! Setze in [.Element(cmdStart).Text]: 'Stopp' Setze in [.Element(cmdKlick).Aktiv]: '1'
Zeichne auf Fenster '.ZF1': Linie (Erst löschen) Setze in [Flags.Löschen]: '' Setze in [Zähler]: '0' Aufruf 'Tick' (Hintergrund, ständig, Intervall '0,1) Sonst *** Stopp! Aufruf 'Tick' (Hintergrund, ständig, abschalten!) Setze in [.Element(cmdStart).Text]: 'Start' Setze in [.Element(cmdKlick).Aktiv]: '0'
Meldung "Tests: [Zähler]¶Anzahl Klicks: [Flags.AnzahlGesetzt]" (Titel: 'Auswertung', Info, OK) Ende Wenn Zurück
:: Anzeige_Element(cmdKlick)_Klick Setze in [Flags.Flag([Zähler])]: '1' Zurück
:: Tick *** Diagramm erweitern und Zähler+1 Zeichne auf Fenster '.ZF1': Linie (X=[Zähler], Y=[Flags.Flag([Zähler])]*3, B=0, H=2, Dicke '2') Setze in [Zähler]: '[Zähler]+1' (berechnen) Aufruf 'Anzeige_Element(cmdStart)_Klick', wenn Wahr: '[Zähler]>99' Zurück
:: Anzeige_Element(cmdRedraw)_Klick *** gespeichertes Ergebnis mit Zufallsfarben neu zeichnen Zeichne auf Fenster '.ZF1': Linie (Erst löschen) Schleife Ab ([Tests] von 0 bis [Zähler]) Zeichne auf Fenster '.ZF1': Linie (X=[Tests], Y=[Flags.Flag([Tests])]*3, B=0, H=2, Farbig, Dicke '2') Schleife Bis Zurück
|
Beispiel als cX2Web-Code:
**cX402FEA 1799F9S214 1CMQkwCQkg QXVmemVpY2 huZW4gZWlu ZXIgS2xpY2 tmb2xnZQ0K MzkJMAkJIE ZsYWdzLVRl c3QJVzk4CU gzNg0KMzgJ MAkJIEtsaW NrIG1pY2gh CUljbWRLbG ljawlYMzIJ WTIJVzIyCU g4CUENCjM4 CTAJCSBTdG FydAlJY21k U3RhcnQJWD QJWTIJVzIy CUg4DQozOA kwCQkgCUla RjEJWDQJWT EyCVc5MAlI MTAJOQlKDQ ozOAkwCQkg TmV1IHplaW NobmVuCUlj bWRSZWRyYX cJWDYwCVky CVcyMglIOA 0KMzEJMAkJ RQ0KMAkwCQ 0KMTkJMAkJ IEFuemVpZ2 VfRWxlbWVu dChjbWRTdG FydClfS2xp Y2sNCjI5CT AJCSAoIlsu RWxlbWVudC hjbWRTdGFy dCkuVGV4dF 0iID0gIlN0 YXJ0IikNCj EJMAkJIFN0 YXJ0IQ0KMj IJMAkJIFN0 b3BwCT0uRW xlbWVudChj bWRTdGFydC kuVGV4dA0K MjIJMAkJID EJPS5FbGVt ZW50KGNtZE tsaWNrKS5B a3Rpdg0KMA kwCQ0KMTUJ MAkJWglRLl pGMQlMDQoy MgkwCQkgCT 1GbGFncy5M 9nNjaGVuDQ oyMgkwCQkg MAk9WuRobG VyDQo0NAkw CQkgVGljaw muCUkJUwlW MCwxDQoxNw kwCQkgDQox CTAJCSBTdG 9wcCENCjQ0 CTAJCSBUaW NrCa4JSQlT CVYwDQoyMg kwCQkgU3Rh cnQJPS5FbG VtZW50KGNt ZFN0YXJ0KS 5UZXh0DQoy MgkwCQkgMA k9LkVsZW1l bnQoY21kS2 xpY2spLkFr dGl2DQowCT AJDQozCTAJ CU02NAlCMA lUQXVzd2Vy dHVuZwkgVG VzdHM6IFta 5GhsZXJdtk FuemFobCBL bGlja3M6IF tGbGFncy5B bnphaGxHZX NldHp0XQ0K MTgJMAkNCj Q1CTAJDQow CTAJDQoxOQ kwCQkgQW56 ZWlnZV9FbG VtZW50KGNt ZEtsaWNrKV 9LbGljaw0K MjIJMAkJID EJPUZsYWdz LkZsYWcoW1 rkaGxlcl0p DQo0NQkwCQ 0KMAkwCQ0K MTkJMAkJIF RpY2sNCjEJ MAkJIERpYW dyYW1tIGVy d2VpdGVybi B1bmQgWuRo bGVyKzENCj E1CTAJCVEu WkYxCVhbWu RobGVyXQlZ W0ZsYWdzLk ZsYWcoW1rk aGxlcl0pXS ozCVcwCUgy CUQyCUwNCj IyCTAJCSBb WuRobGVyXS sxCT1a5Ghs ZXIJQw0KND QJMAkJIEFu emVpZ2VfRW xlbWVudChj bWRTdGFydC lfS2xpY2sJ rlta5GhsZX JdPjk5DQo0 NQkwCQkgCa 4NCjAJMAkN CjE5CTAJCS BBbnplaWdl X0VsZW1lbn QoY21kUmVk cmF3KV9LbG ljaw0KMQkw CQkgZ2VzcG VpY2hlcnRl cyBFcmdlYm 5pcyBtaXQg WnVmYWxsc2 ZhcmJlbiBu ZXUgemVpY2 huZW4NCjE1 CTAJCVoJUS 5aRjEJTA0K MzMJMAkJWl Rlc3RzCVMw CUVbWuRobG VyXQ0KMTUJ MAkJUS5aRj EJWFtUZXN0 c10JWVtGbG Fncy5GbGFn KFtUZXN0c1 0pXSozCVcw CUgyCUNybm QoMTQpCUQy CUwNCjM0CT AJDQo0NQkw CQkgCa4JVj ENCjAJMAkN Cg===* |
cX-Webseite: http://www.clickexe.de