.z80
		; test strukta
		; combinations
		; version 1.4 options


	rlca 
	rlca 
	rlca 
	rlca 	;multiple commands on one line
	rlca 
	rlca 
	rlca 
	rlca 	;two methods



		; do loops

;1 	do b,5
	LD b,5
.L1:
	nop
;1 	enddo
	DEC B
	JP NZ,.L1




;1 	do hl,1000h-1
	LD hl,1000h-1
.L2:
	nop
;1 	enddo
	DEC HL
	LD A,H
	OR L
	JP NZ,.L2

;1 	do ix,50
	LD ix,50
.L3:
	nop
;1 	enddo
	DEC IX
	DEFB 0DDH
	LD A,H
	DEFB 0DDH
	OR L
	JP NZ,.L3

;1 	do iy,4041
	LD iy,4041
.L4:
	nop
;1 	enddo
	DEC IY
	DEFB 0FDH
	LD A,H
	DEFB 0FDH
	OR L
	JP NZ,.L4


		; while loop

;1 	while a=0
.L5:
	OR A
	JP NZ,.L6
	nop
;1 	endwhile
	JP .L5
.L6:

;1 	while (hl)=0 and b<5
.L7:
	LD A,(hl)
	OR A
	JP NZ,.L8
	LD A,b
	CP 5
	JP NC,.L8
	nop
;1 	endwhile
	JP .L7
.L8:

;1 	while a<=6
.L9:
	CP 6
	JR Z,.L11
	JP NC,.L10
.L11:
	nop
;1 	endwhile
	JP .L9
.L10:

;1 	while a in ['a'..'z','0'..'9',';',']','[']
.L12:
	CP 'z'+1
	JR NC,.L15
	CP 'a'+0
	JP NC,.L14
.L15:
	CP '9'+1
	JR NC,.L16
	CP '0'+0
	JP NC,.L14
.L16:
	CP ';'
	JP Z,.L14
	CP ']'
	JP Z,.L14
	CP '['
	JP Z,.L14
	JP .L13
.L14:
	nop
;1 	endwhile
	JP .L12
.L13:

		; repeat loop

;1 	repeat
.L17:
	nop
;1 	until z
	JP NZ,.L17

;1 	repeat
.L18:
	nop
;1 	until h=0 or b=0
	LD A,h
	OR A
	JP Z,.L19
	LD A,b
	OR A
	JP NZ,.L18
.L19:

;1 	repeat
.L20:
	nop
;1 	until not a in [1,100,'a',"a",7..89] and b<>0
	CP 1
	JP Z,.L20
	CP 100
	JP Z,.L20
	CP 'a'
	JP Z,.L20
	CP "a"
	JP Z,.L20
	CP 89+1
	JR NC,.L21
	CP 7+0
	JP NC,.L20
.L21:
	LD A,b
	OR A
	JP Z,.L20

;1 	repeat
.L22:
	nop
;1 	until not[c=0 or b<h or (hl)<=(ix+9) and l<e]
	LD A,c
	OR A
	JP Z,.L22
	LD A,b
	CP h
	JP C,.L22
	LD A,(ix+9)
	CP (hl)
	JP C,.L23
	LD A,l
	CP e
	JP C,.L22
.L23:

		; if construktions

;1 	if z
	JP NZ,.L24
	nop
;1 	endif
.L24:

;1 	if p
	JP M,.L25
	nop
;1 	else
	JP .L26
.L25:
	nop
;1 	endif
.L26:

;1 	if z and c
	JP NZ,.L27
	JP NC,.L27
	nop
;1 	endif
.L27:

;1 	if a=0 and b<=(hl)
	OR A
	JP NZ,.L28
	LD A,(hl)
	CP b
	JP C,.L28
	nop
;1 	endif
.L28:

;1 	if (hl)=(ix+9) and b in ['a'..'f','0'..'9']
	LD A,(hl)
	CP (ix+9)
	JP NZ,.L29
	LD A,b
	CP 'f'+1
	JR NC,.L31
	CP 'a'+0
	JP NC,.L30
.L31:
	CP '9'+1
	JR NC,.L32
	CP '0'+0
	JP NC,.L30
.L32:
	JP .L29
.L30:
	nop
;1 	else
	JP .L33
.L29:
	nop
;1 	endif
.L33:


		; loops

;1 	loop
	PUSH HL
	LD HL,.L34
	EX (SP),HL
.L35:
	nop
;2 	exitif a=0
	OR A
	RET Z
	nop
;2 	exitif b in [2..8]
	LD A,b
	CP 8+1
	JR NC,.L36
	CP 2+0
	RET NC
.L36:
	nop
;2 	exitif not a in [9,'a']
	CP 9
	JP Z,.L37
	CP 'a'
	JP Z,.L37
	RET 
.L37:
	nop
;2 	if a=0
	OR A
	JP NZ,.L38
	nop
;3 	exit
	RET
;2 	else
	JP .L39
.L38:
	nop
;2 	endif
.L39:
;1 	endloop
	JP .L35
.L34:


		; nested statements


;1 	if a=0
	OR A
	JP NZ,.L40
;2 	if b=1
	LD A,b
	CP 1
	JP NZ,.L41
;3 	if (hl)<=8
	LD A,8
	CP (hl)
	JP C,.L42
	nop
;3 	else
	JP .L43
.L42:
;4 	if b=0
	LD A,b
	OR A
	JP NZ,.L44
	nop
;4 	else
	JP .L45
.L44:
	nop
;4 	endif
.L45:
;3 	endif
.L43:
;2 	endif
.L41:
;1 	endif
.L40:

		;
		; elseifconstructions

;1 	if a='a'
	CP 'a'
	JP NZ,.L46
	nop
;1 	elseif a='b'
	JP .L47
.L46:
	CP 'b'
	JP NZ,.L48
	nop
;1 	elseif a='c'
	JP .L47
.L48:
	CP 'c'
	JP NZ,.L49
	nop
;1 	else
	JP .L50
.L49:
	nop 	;default
;1 	endif
.L50:
.L47:


;1 	if a in [3,4]
	CP 3
	JP Z,.L52
	CP 4
	JP Z,.L52
	JP .L51
.L52:
	nop
;1 	elseif a in [6..9]
	JP .L53
.L51:
	CP 9+1
	JR NC,.L56
	CP 6+0
	JP NC,.L55
.L56:
	JP .L54
.L55:
	nop
;1 	elseif a in ['a'..'z']
	JP .L53
.L54:
	CP 'z'+1
	JR NC,.L59
	CP 'a'+0
	JP NC,.L58
.L59:
	JP .L57
.L58:
	nop
;1 	endif 	;no default
.L57:
.L53:

		;
		;

		; direkt conditions

;1 	if z
	JP NZ,.L60
;2 	if c
	JP NC,.L61
;3 	if p
	JP M,.L62
;4 	if ov
	JP Z,.L63
	JP C,.L63
;5 	if nv
	JR Z,.L65
	JP NC,.L64
.L65:
;6 	if pe
	JP PO,.L66
;7 	if po
	JP PE,.L67
;8 	if m
	JP P,.L68
;9 	if nc 
	JP C,.L69
;10 	if nz
	JP Z,.L70
	nop
;10 	endif
.L70:
;9 	endif
.L69:
;8 	endif
.L68:
;7 	endif
.L67:
;6 	endif
.L66:
;5 	endif
.L64:
;4 	endif
.L63:
;3 	endif
.L62:
;2 	endif
.L61:
;1 	endif
.L60:





	end