{"id":1314,"date":"2011-03-15T23:19:12","date_gmt":"2011-03-15T23:19:12","guid":{"rendered":"http:\/\/www.ollmetzer.com\/?p=1314"},"modified":"2011-03-15T23:19:12","modified_gmt":"2011-03-15T23:19:12","slug":"ha-ich-kann-es-noch","status":"publish","type":"post","link":"https:\/\/www.ollmetzer.com\/?p=1314","title":{"rendered":"HA &#8211; Ich kann es noch&#8230;"},"content":{"rendered":"<p>\u00dcber 20 Jahre ist es her, dass ich es zum letzten Mal getan habe, aber ich kann es noch. Einer kleine Finger\u00fcbung in 6502 Assembler. <a href=\"http:\/\/www.c64-wiki.de\/index.php\/Speicherbelegungsplan\" title=\"C64 Speicherbelegungsplan\" target=\"c64wiki\" >Memorymap<\/a> und <a href=\"http:\/\/www.theweb.dk\/KickAssembler\/Links.php\" title=\"Kick Assembler\" target=\"kickass\" >KickAss<\/a> sei dank&#8230;<\/p>\n<pre style=\"border:1px solid grey;padding:5px;background:#eeeeee;font-size:0.8em;\">.pc =$0801\r\n\r\n\/\/ 2011 SYS 2062\r\nbasicstart:    .byte 12, 8, 219, 7, 158, 32\r\n               .byte 50, 48, 54, 50, 0, 0, 0\r\n\r\n               lda #$00\r\n               sta $d020 \/\/ Border black\r\n               sta $d021 \/\/ Background black\r\n\r\n\/\/ Address of screen($0400) in zeropage $03\/$04\r\n               lda #$00\r\n               sta $03\r\n               lda #$04\r\n               sta $04\r\n\r\n\/\/ Address of gamefield in Zeropage $05\/$06\r\n               lda #&lt; Gamefield\r\n               sta $05\r\n               lda #&gt; Gamefield\r\n               sta $06\r\n\r\n               ldx #$00\r\nrowloop:       ldy #$00\r\ncolloop:       lda ($05),y\r\n               sta ($03),y\r\n               iny\r\n               cpy #$0b\r\n               bne colloop\r\n\/\/ next row: add 32 to source and 40 to target\r\n               clc\r\n               lda $03\r\n               adc #$28\r\n               sta $03\r\n               lda $04\r\n               adc #$00\r\n               sta $04\r\n               clc\r\n               lda $05\r\n               adc #$20\r\n               sta $05\r\n               lda $06\r\n               adc #$00\r\n               sta $06\r\n\r\n               inx\r\n               cpx #$0b\r\n               bne rowloop\r\n               rts\r\n\r\nGamefield:\r\n               .text \"+---------+                +---+\"\r\n               .text \"!         !     +-----+    !   !\"\r\n               .text \"!         !     !     +----+   !\"\r\n               .text \"!         !     !              !\"\r\n               .text \"!         !     !     +----+   !\"\r\n               .text \"!         !     +-----+    !   !\"\r\n               .text \"!         +---+            ++ ++\"\r\n               .text \"!             !             ! ! \"\r\n               .text \"!         +-+ +-------------+ ! \"\r\n               .text \"!         ! !                 ! \"\r\n               .text \"+---------+ +-----------------+ \"\r\n               .text \"01234567890123456789012345678901\"<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u00dcber 20 Jahre ist es her, dass ich es zum letzten Mal getan habe, aber ich kann es noch. Einer kleine Finger\u00fcbung in 6502 Assembler. Memorymap und KickAss sei dank&#8230; .pc =$0801 \/\/ 2011 SYS 2062 basicstart: .byte 12, 8, 219, 7, 158, 32 .byte 50, 48, 54, 50, 0, 0, 0 lda #$00 sta [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[9],"tags":[],"class_list":["post-1314","post","type-post","status-publish","format-standard","hentry","category-development"],"_links":{"self":[{"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=\/wp\/v2\/posts\/1314","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1314"}],"version-history":[{"count":0,"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=\/wp\/v2\/posts\/1314\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1314"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1314"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ollmetzer.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1314"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}