Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren INFO - FAQ - CC2-Forum - CCPro-Forum

Kürzer: SLOWMODE erkennen im BASIC Programm Kategorie: C-Control I V1.1 (von das |_ Team - 10.05.2024 21:57)

Als Antwort auf SLOWMODE erkennen im BASIC Programm von das |_ Team - 10.05.2024 17:20

das |_ Team nutzt:  CC1-Unit V1.1, CC1-M-Unit V1.1, CC1-Station V1.1, Open-Micro, Open-Mini, Open-Midi, Open-Macro, Open-Maxi, Open-Mini M-Unit, Open-Mini Station, C-Control 2

Kann man natürlich auch kürzer schreiben. 2 Bytes werden eingespart, bei gleicher Funktionalität. Oder sogar 4 Bytes, wenn man die Redundanz via byte[24] nicht benötigt.   Function IsSlowmode 'sys &h91 &h5c9d, &hcc12, &hae10, &h7b02, &h5f0b 'Funktionsergebnis via Stack sys &h91 &h5c9d, &hcc12, &hbfb8, &hae10, &h7b02, &h5f0b 'Funktionsergebnis via Stack, sowie auch in BASIC USerbyte Nr.24 (Kurze Version) RETURN 'AS05 Assembler for M6805 [1.44].  Copyright 1994-2015, Frank A. Kingswood                                                Page    1 '------------------------------------------------ L:\LBIT-F~1\SRC-856\isSLOWM1.a05 ------------------------------------------------ ' '13 lines read, no errors in pass 1. '0091 =                        org $91 ' '0091 :                       isSlowmode:                ;Wird Prozessor derzeit im Slowmode betrieben? '0091 : 5f               [ 4]   clrx                     ;Rueckgabe '0' falls Slowmode nicht aktiv '0092 : 0b7b02           [10]   brclr 5,$7b,Slowmode_No ' '0095 :                       Slowmode_Yes: '0095 : ae10             [ 2]   ldx#16                   ;Rueckgabe '16' via Rechenstack zur direkten Verwendung '                                                        ;in Funktionen, sowie auch im BASIC Userbyte Nr.24 '0097 :                       Slowmode_No: '0097 : bfb8             [ 5]   stx$b8                   ;sowie auch in BASIC Userbyte Nr. 24 '0099 : cc125c           [ 4]   jmp $125c '009c : 9d               [ 2]   nop '                               nop '-------------------------------------------- Memory Usage Map ('x'=used, '-'=unused) --------------------------------------------- ' '0080 : ---------------- -xxxxxxxxxxxx--- ---------------- ---------------- ' 'No errors in pass 2. 'sys &h91 &h5c9d, &hcc12, &hbfb8, &hae10, &h7b02, &h5f0b 'Funktionsergebnis via Stack, sowie auch in BASIC USerbyte Nr.24 (Kurze Version) 'AS05 Assembler for M6805 [1.44].  Copyright 1994-2015, Frank A. Kingswood                                                Page    1 '------------------------------------------------ L:\LBIT-F~1\SRC-856\isSLOWM1.a05 ------------------------------------------------ ' '13 lines read, no errors in pass 1. '0091 =                        org $91 ' '0091 :                       isSlowmode:                ;Wird Prozessor derzeit im Slowmode betrieben? '0091 : 5f               [ 4]   clrx                     ;Rueckgabe '0' falls Slowmode nicht aktiv '0092 : 0b7b02           [10]   brclr 5,$7b,Slowmode_No ' '0095 :                       Slowmode_Yes: '0095 : ae10             [ 2]   ldx#16                   ;Rueckgabe '16' via Rechenstack zur direkten Verwendung '                                                        ;in Funktionen, sowie auch im BASIC Userbyte Nr.24 '0097 :                       Slowmode_No: '                              ; stx$b8                   ;sowie auch in BASIC Userbyte Nr. 24 '0097 : cc125c           [ 4]   jmp $125c '009a : 9d               [ 2]   nop '                               nop '-------------------------------------------- Memory Usage Map ('x'=used, '-'=unused) --------------------------------------------- ' '0080 : ---------------- -xxxxxxxxxx----- ---------------- ---------------- ' 'No errors in pass 2. 'sys &h91 &h5c9d, &hcc12, &hae10, &h7b02, &h5f0b 'Funktionsergebnis via Stack

Antwort schreiben

Bisherige Antworten:

Re: Kürzer: SLOWMODE erkennen im BASIC Programm (von Dietmar - 10.05.2024 22:05)
    Re: Kürzer: SLOWMODE erkennen im BASIC Programm (von das |_ Team - 11.05.2024 1:11)