File: hola.asm

package info (click to toggle)
pasmo 0.5.3-4
  • links: PTS
  • area: main
  • in suites: squeeze
  • size: 892 kB
  • ctags: 1,805
  • sloc: cpp: 8,508; asm: 3,020; sh: 790; makefile: 627
file content (61 lines) | stat: -rw-r--r-- 535 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
 
;	hola.asm

		
   
;bdos:	equ 5

	org 5
bdos:

	org 100H

	if defined CPM86
	; Install a call to bdos in the cp/m bdos call address
	ld a,0CDh
	ld (5),a
	ld a,0E0h
	ld (6),a
	ld a,0C3h
	ld (7),a
	endif

	ld bc,2565
;	scf
	ccf
sigue:	push bc

	call sayhello

;	ld a, 1
;otro:
;	dec a
;	defb 214, 1; SUB 1
;	jp nz, otro

	pop bc
	dec c
;	jr nz, sigue
	jp nz, sigue
;	djnz sigue

	ld c, 0
	call bdos

	halt

sayhello:
	ld c, 9
	ld de, hola
	call bdos

;	ret

	ld c, 2
	dec c
	ret nz

	call 0

hola:	defb 'Hola, mundo.', 13, 10, '$'

	end