Mais um blog inútil.

Maio 16, 2010

Arvorezinha 68K Assembly

Filed under: Arvorezinha,Assembly,Coding,Useless — falso @ 23:36

Hoje devido aos posts de hoje do falco sobre arvorezinhas ganhei um pouco de moral e fui à procura de arquitecturas que ainda não tivesse feito em assembly e lembrei-me dos Motorola 68K, os que eram usados nos MACs antigos.
Decidi então meter as mãos à obra, e fui procurar um emulador/simulador ou algo do género para este processador e achei o Easy68K que é um três-em-um, Editor, Assembler e Debugger.
Fiquem bem e joguem muito.

* -------------------------------------------can never fail-
* Program    : arvorezinha
* Written by : Pedro de Oliveira
* Date       : 16/05/2010
* Description: Implementação da arvorezinha em 68K assembly 
*-----------------------------------------------------------
        ORG     $1000
START:                          ; first instruction of program

main:
        MOVE.B  #5,d7           ; maximo de linhas/asteriscos
                                ; está a usar o RFC standard 5
        MOVE.B  #0,d5           ; inicializa o counter1 (d5) a 0

ciclo1:
        CMP.B   d5,d7           ; verifica se chegamos o fim
                                ; comparando o counter1 ao maximo
        BEQ     final           ; se for igual salta para o fim
	
        MOVE.B  #0,d6           ; inicializa o counter2 (d6) a 0

ciclo2:
        CMP.B   d5,d6           ; compara o counter1 com o counter2
        BEQ     estrela         ; se for igual
        BLT     estrela         ; ou menor imprime um asterisco
	
        LEA     newline,a1      ; imprime uma newline
        JSR     print
	
        ADD     #1,d5           ; incrementa o counter1
        JMP     ciclo1          ; salta para o ciclo1

estrela:
        LEA     _estrel,a1      ; imprime um asterisco
        JSR     print
	
        ADD     #1,d6           ; incrementa o counter2
        JMP     ciclo2          ; salta para o ciclo2

final:
        MOVE.B  #9,D0
        TRAP    #15             ; halt simulator

print:
        MOVE.B  #14,d0
        TRAP    #15
        RTS

* Variables and Strings

_estrel	DC.B    '*',0
newline DC.B    $0D,$0A,0

        END     START           ; last line of source

3 comentários a “Arvorezinha 68K Assembly”

  1. falco diz:

    Venham mais!!!

    Estou a estranhar que os Mac fags, que não tenham postado arvorezinhas em Objective-C e em AppleScript. Estão a falhar!!! Vá mostrem lá toda a vossa dedicação à maçã mordida, façam-nos "roer de inveja".

  2. Armorfist diz:

    Venham mais!!!

    Estou a estranhar que os Mac fags, que não tenham postado arvorezinhas em Objective-C e em AppleScript. Estão a falhar!!! Vá mostrem lá toda a vossa dedicação à maçã mordida, façam-nos "roer de inveja".

Comentar

widgeon
widgeon
widgeon
widgeon