Dovol\u00edm si dnes prida\u0165 jeden prevzat\u00fd \u010dl\u00e1nok o mo\u017enosti detekcie procesora Z80 pod\u013ea registra Q.<\/p>\n\n\n\n\n\n\n\n
Na procesoroch kompatibiln\u00fdch so Zilogom Z80 existuje register Q, ktor\u00fd sl\u00fa\u017ei ako ke\u0161 a oznamuje \u010di nastala zmena pr\u00edznakov poslednou vykonanou in\u0161trukciou. Je to nepr\u00edstupn\u00fd vn\u00fatorn\u00fd register, ktor\u00fd ovplyv\u0148uj\u00fa nedokumentovan\u00e9 pr\u00edznaky vo v\u00fdstupe in\u0161trukci\u00ed SCF a CCF. Toto spr\u00e1vanie m\u00f4\u017ee by\u0165 pou\u017eit\u00e9 na detekciu procesora Z80 od NECu, ktor\u00fd nie je 100% kompatibiln\u00fd so Zilogom a be\u017ene sa pou\u017e\u00edva v po\u010d\u00edta\u010doch Sinclair a Timex.<\/p>\n\n\n\n
\n \n ; Detekcia NEC Z80\n ; Rui Ribeiro 2019\n ;\n ; PRINT USR 50000\n ;\n ; vr\u00e1ti:\n ;\n ; 0 pre NEC\n ; 1 pre Z80 kompatibiln\u00fd so Zilogom\n ;\n\n ORG 50000\n\n LD BC,1 ; BC = 1 - Z80 nie NEC\n XOR A ; A = 0\n LD D,A ; D = A\n DEC D ; A-1 = $FF Q = 1\n NOP ; Q = 0\n CCF ; X = 1 a Y = 1 ak je to Zilog alebo in\u00fd kompatibiln\u00fd\n ; X = 0 a Y = 0 ak je to NEC Z80\n\n PUSH AF\n POP DE ; ulo\u017ei F do E\n\n LD A,E\n AND $28 ; 00101000 - test X a Y\n\n RET NZ ; n\u00e1vrat ak je to Z80 a nie NEC\n\n DEC BC ; Z80 je NEC, BC = 0\n RET<\/pre>\n\n\n\nPou\u017eit\u00edm tejto rutiny pomocou PRINT USR 50000 zist\u00edte \u010di je procesor alebo emul\u00e1tor Zilog kompatibiln\u00fd. N\u00e1vratov\u00e1 hodnota 1 znamen\u00e1 100% kompatibilitu, hodnota 0 signalizuje NEC alebo in\u00fd nekompatibiln\u00fd procesor.<\/p>\n\n\n\n
Pozn\u00e1mka: V\u010faka Miguelovi Capelovi za otestovanie rutiny na spektr\u00e1ckych a timex\u00e1ckych Z80-tk\u00e1ch – menovite Z80A Mostek, NEC, Zilog a SGS.<\/p>\n\n\n\n
Autor: Rui F Ribeiro<\/a>
Zdroj: https:\/\/planetasinclair.blogspot.com\/2019\/12\/dica-usar-registo-q-do-z80-detectar-z80.html<\/a><\/p>\n\n\n\n<\/p>\n","protected":false},"excerpt":{"rendered":"
Dovol\u00edm si dnes prida\u0165 jeden prevzat\u00fd \u010dl\u00e1nok o mo\u017enosti detekcie procesora Z80 pod\u013ea registra Q.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[6],"tags":[],"class_list":["post-930709","post","type-post","status-publish","format-standard","hentry","category-tema-3-software-php"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p5aqy8-3U7r","jetpack_likes_enabled":true,"jetpack-related-posts":[],"_links":{"self":[{"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/posts\/930709","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/sindik.at\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=930709"}],"version-history":[{"count":4,"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/posts\/930709\/revisions"}],"predecessor-version":[{"id":930713,"href":"https:\/\/sindik.at\/index.php?rest_route=\/wp\/v2\/posts\/930709\/revisions\/930713"}],"wp:attachment":[{"href":"https:\/\/sindik.at\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=930709"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/sindik.at\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=930709"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/sindik.at\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=930709"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}