 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 1 - 10/29/2019 21:37:32


       1/    6000 :                             ORG  6000h
       2/    6000 :                     		
       3/    6000 : AA01                		WORD 0AA01h			;header
       4/    6002 : 0000                		Word 0
       5/    6004 : 0000                		Word 0
       6/    6006 : 600C                        WORD  PROG				;Pointer to 1st program
       7/    6008 : 0000                        Word 0
       8/    600A : 0000                		Word 0
       9/    600C : 0000                PROG    WORD  0				;1st entry 0=only
      10/    600E : 6022                        WORD  RUNLIB		;Start Ofr Program
      11/    6010 : 1000                        BYTE  16			;Text Length
      12/    6012 : 4348 4942 4941 4B55         BYTE  "CHIBIAKUMAS.COM"		;Text Message
                    4D41 532E 434F 4D00 
      13/    6022 :                     		
      14/    6022 :                     Runlib
      15/    6022 :                     
      16/    6022 :                     
      17/    6022 : =8300H              WRKSP   EQU     8300h
      18/    6022 :                     
      19/    6022 : =83F0H              CursorX equ 	83F0h
      20/    6022 :                     
      21/    6022 : =8C00H              VDPWD   EQU     8C00h           ;* VDP RAM write data
      22/    6022 : =8C02H              VDPWA   EQU     8C02h           ;* VDP RAM read/write address
      23/    6022 :                     
      24/    6022 :                     
      25/    6022 : 0300 0000           START   LIMI    0               ;* disable interrupts
      26/    6026 : 02E0 8300                   LWPI    WRKSP           ;* set default workspace
      27/    602A :                     
      28/    602A :                     		
      29/    602A :                     ; set VDP RAM start address (low and high byte)
      30/    602A :                     
      31/    602A : 0200 4020                   LI      R0,4020h
      32/    602E : 06C0                	    SWPB    R0
      33/    6030 : D800 8C02                   MOVB    R0,@VDPWA		;L
      34/    6034 : 06C0                        SWPB    R0
      35/    6036 : D800 8C02                   MOVB    R0,@VDPWA		;H
      36/    603A :                     
      37/    603A : 0200 0000           		li r0,0000h
      38/    603E : D800 83F0           		movb r0,@CursorX
      39/    6042 :                     		
      40/    6042 : 020F FF15           		li r15,0ff15h
      41/    6046 :                     
      42/    6046 : 06A0 609E           		bl @NewLine
      43/    604A : 06A0 609E           		bl @NewLine
      44/    604E : 0420 612C           		blwp @Monitor
      45/    6052 :                     		
      46/    6052 : 06A0 609E           		bl @NewLine
      47/    6056 :                     		
      48/    6056 : 0204 6000           		li r4,06000h
      49/    605A : 0205 0010           		li r5,00010h
      50/    605E :                     		
      51/    605E : 06A0 6112           		bl @ramdump
      52/    6062 :                     		
      53/    6062 : 06A0 609E                   bl @NewLine
      54/    6066 : 06A0 609E           		bl @NewLine
      55/    606A :                     		
      56/    606A :                     		
      57/    606A : 0201 614A           		LI      R1,HELLOWORLD   ;* ascii string address
      58/    606E :                     NEXTCHAR
      59/    606E : D031                        MOVB *R1+,R0
 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 2 - 10/29/2019 21:37:32


      60/    6070 :                     		 
      61/    6070 : 0202 00FF           		li r2,255
      62/    6074 : 9080                		Cb r0,r2
      63/    6076 : 1303                		jeq LOOPBACK
      64/    6078 :                     		
      65/    6078 :                     		
      66/    6078 : 06A0 6082           		bl @PrintChar
      67/    607C : 10F8                        Jmp NEXTCHAR
      68/    607E :                     
      69/    607E :                     LOOPBACK
      70/    607E : 10FF                        JMP LOOPBACK            ;* stop and do nothing
      71/    6080 :                     
      72/    6080 :                     PrintCharR3:		
      73/    6080 : C003                	mov r3,r0
      74/    6082 :                     PrintChar:
      75/    6082 : 0280 6000           	ci r0,6000h
      76/    6086 : 1102                	jlt PrintCharOk
      77/    6088 :                     	
      78/    6088 : 0220 E000           	ai r0,0E000h ;-32
      79/    608C :                     PrintCharOk:
      80/    608C :                     	;sb r2,r0
      81/    608C : D800 8C00           	movb r0,@VDPWD     ;* put next char on screen
      82/    6090 :                     	
      83/    6090 : D020 83F0           	movb @CursorX,r0
      84/    6094 : 0220 0100           	ai r0,0100h		;Inc 1 byte
      85/    6098 : D800 83F0           	movb r0,@CursorX
      86/    609C :                     	
      87/    609C : 045B                	B *R11
      88/    609E :                     NewLine:
      89/    609E : D020 83F0           	movb @CursorX,r0
      90/    60A2 :                     	
      91/    60A2 :                     NewLineb:
      92/    60A2 : 0201 0100           	li r1,0100h
      93/    60A6 : D801 8C00           	movb r1,@VDPWD     ;* put next char on screen
      94/    60AA :                     	
      95/    60AA :                     	
      96/    60AA : B001                	ab r1,r0		;Inc 1 byte
      97/    60AC : 0240 1F00           	andi r0,1F00h
      98/    60B0 : 16F8                	jne NewLineb
      99/    60B2 :                     	;li r0,0000h
     100/    60B2 : D800 83F0           	movb r0,@CursorX    ;* put next char on screen
     101/    60B6 :                     	
     102/    60B6 :                     	
     103/    60B6 :                     	
     104/    60B6 : 045B                	B *R11	
     105/    60B8 :                     	
     106/    60B8 :                     ShowHex:
     107/    60B8 : 0220 3000           		ai r0,3000h				;0
     108/    60BC : 0280 3A00           		ci r0,3A00h
     109/    60C0 : 1102                		jlt ShowHexDigitOk
     110/    60C2 : 0220 0700           		ai r0,0700h				;Letters
     111/    60C6 :                     ShowHexDigitOk:
     112/    60C6 : 0460 6082           		b @PrintChar
     113/    60CA :                     		
     114/    60CA :                     ShowHexDigit:
     115/    60CA : C28B                	mov r11,r10
     116/    60CC : C002                		mov r2,r0
     117/    60CE : 0240 F000           		andi r0,0F000h
     118/    60D2 : 0940                		srl r0,4
     119/    60D4 : 06A0 60B8           		bl @ShowHex
 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 3 - 10/29/2019 21:37:32


     120/    60D8 : 0A42                		sla r2,4
     121/    60DA : 045A                	B *R10
     122/    60DC :                     ShowReg:
     123/    60DC : C24B                	mov r11,r9
     124/    60DE : 0200 5220           		li r0,"R "
     125/    60E2 : 06A0 6082           		bl @PrintChar
     126/    60E6 :                     		
     127/    60E6 : C001                		mov r1,r0
     128/    60E8 : 06A0 60B8           		bl @ShowHex
     129/    60EC : 0203 3A20           		li r3,": "
     130/    60F0 : 06A0 6080           		bl @PrintCharR3
     131/    60F4 : 06C3                		swpb r3
     132/    60F6 :                     ShowHex4b:		
     133/    60F6 : 06A0 60CA           		bl @ShowHexDigit
     134/    60FA : 06A0 60CA           		bl @ShowHexDigit
     135/    60FE : 06A0 60CA           		bl @ShowHexDigit
     136/    6102 : 06A0 60CA           		bl @ShowHexDigit
     137/    6106 : 06A0 6080           		bl @PrintCharR3
     138/    610A : 0459                	B *r9
     139/    610C :                     ShowHex4:		
     140/    610C : C24B                	mov r11,r9
     141/    610E : 0460 60F6           	b @ShowHex4b
     142/    6112 :                     		;li r4,06000h
     143/    6112 :                     		;li r5,00010h
     144/    6112 :                     		
     145/    6112 :                     ramdump:
     146/    6112 : C20B                	mov r11,r8
     147/    6114 : C084                	mov r4,r2
     148/    6116 : 0203 3A20           	li r3,": "
     149/    611A : 06A0 610C           	bl @ShowHex4
     150/    611E : 06C3                	swpb r3
     151/    6120 :                     ramdumpAgain:		
     152/    6120 : C0B4                	mov *r4+,r2
     153/    6122 : 06A0 610C           	bl @ShowHex4
     154/    6126 : 0605                	dec r5
     155/    6128 : 16FB                	jne ramdumpAgain
     156/    612A :                     	
     157/    612A : 0458                	b *r8
     158/    612C :                     Monitor:
     159/    612C : 8320                	word 8320h
     160/    612E : 6130                	word DoMonitor	
     161/    6130 :                     	
     162/    6130 :                     	
     163/    6130 :                     DoMonitor:
     164/    6130 : C14D                		mov r13,r5
     165/    6132 : 0206 0000           		li r6,0000h
     166/    6136 :                     DoMonitorAgain:		
     167/    6136 : C0B5                		mov *r5+,r2
     168/    6138 : C046                		mov r6,r1
     169/    613A : 06A0 60DC           		bl @ShowReg
     170/    613E : 0226 0100           		ai r6,0100h
     171/    6142 : 0286 1000           		ci r6,1000h 
     172/    6146 : 16F7                		jne DoMonitorAgain
     173/    6148 : 0380                	RTWP
     174/    614A :                     
     175/    614A :                     
     176/    614A :                     
     177/    614A :                     	
     178/    614A :                     HELLOWORLD
     179/    614A : 4845 4C4C 6F20 576F         BYTE "HELLo WoRLD!123:@"     ;* string data
 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 4 - 10/29/2019 21:37:32


                    524C 4421 3132 333A 
                    4000                
     180/    615C : FF00                        BYTE 255
     181/    615E : 4845 4C4C 6F20 576F 		BYTE "HELLo WoRLD!123:@"     ;* string data
                    524C 4421 3132 333A 
                    4000                
     182/    6170 :                     
     183/    6170 :                             END
 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 5 - 10/29/2019 21:37:32


  symbol table (* = unused):
  ------------------------

*ARCHITECTURE :  i386-unknown-win32 - | *BIGENDIAN :                      0 - |
*BRANCHEXT :                      0 - | *BUILDT99 :                       1 - |
*CASESENSITIVE :                  0 - | *CONSTPI :        3.141592653589793 - |
 CURSORX :                     83F0 - | *DATE :                  10/29/2019 - |
 DOMONITOR :                   6130 C |  DOMONITORAGAIN :              6136 C |
*FALSE :                          0 - | *FULLPMMU :                       1 - |
*HAS64 :                          1 - | *HASDSP :                         0 - |
*HASFPU :                         0 - | *HASPMMU :                        0 - |
 HELLOWORLD :                  614A C | *INEXTMODE :                      0 - |
*INLWORDMODE :                    0 - | *INMAXMODE :                      0 - |
*INSRCMODE :                      0 - | *INSUPMODE :                      0 - |
*LISTON :                         1 - |  LOOPBACK :                    607E C |
*MACEXP :                         7 - | *MOMCPU :                      9900 - |
*MOMCPUNAME :               TMS9900 - |  MONITOR :                     612C C |
*NESTMAX :                      100 - |  NEWLINE :                     609E C |
 NEWLINEB :                    60A2 C |  NEXTCHAR :                    606E C |
*PACKING :                        0 - | *PADDING :                        1 - |
 PRINTCHAR :                   6082 C |  PRINTCHAROK :                 608C C |
 PRINTCHARR3 :                 6080 C |  PROG :                        600C C |
 RAMDUMP :                     6112 C |  RAMDUMPAGAIN :                6120 C |
*RELAXED :                        0 - |  RUNLIB :                      6022 C |
 SHOWHEX :                     60B8 C |  SHOWHEX4 :                    610C C |
 SHOWHEX4B :                   60F6 C |  SHOWHEXDIGIT :                60CA C |
 SHOWHEXDIGITOK :              60C6 C |  SHOWREG :                     60DC C |
*START :                       6022 C | *TIME :                    21:37:32 - |
*TRUE :                           1 - |  VDPWA :                       8C02 - |
 VDPWD :                       8C00 - | *VERSION :                     142F - |
 WRKSP :                       8300 - |

     55 symbols
     30 unused symbols

 AS V1.42 Beta [Bld 145] - source file TestT99.asm - page 6 - 10/29/2019 21:37:32


  codepages:
  ----------

STANDARD (0 changed characters)


0.00 seconds assembly time

    183 lines source file
      2 passes
      0 errors
      0 warnings
