.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

do b,5
 nop
enddo




do hl,1000h-1
 nop
enddo

do ix,50
 nop
enddo

do iy,4041
 nop
enddo


; while loop

while a=0
 nop
endwhile

while (hl)=0 and b<5
 nop
endwhile

while a<=6
 nop
endwhile

while a in ['a'..'z','0'..'9',';',']','[']
 nop
endwhile

; repeat loop

repeat
 nop
until z

repeat
 nop
until h=0 or b=0

repeat
 nop
until not a in [1,100,'a',"a",7..89] and b<>0

repeat
 nop
until not[c=0 or b<h or (hl)<=(ix+9) and l<e]

; if construktions

if z
 nop
endif

if p
 nop
else
 nop
endif

if z and c
 nop
endif

if a=0 and b<=(hl)
 nop
endif

if (hl)=(ix+9) and b in ['a'..'f','0'..'9']
 nop
else
 nop
endif


; loops

loop
 nop
 exitif a=0
 nop
 exitif b in [2..8]
 nop
 exitif not a in [9,'a']
 nop
 if a=0
  nop
  exit
 else
  nop
 endif
endloop


; nested statements


if a=0
 if b=1
  if (hl)<=8
   nop
  else
   if b=0
    nop
   else
    nop
   endif
  endif
 endif
endif

;
; elseifconstructions

if a='a'
 nop
elseif a='b'
 nop
elseif a='c'
 nop
else
 nop	;default
endif


if a in [3,4]
 nop
elseif a in [6..9]
 nop
elseif a in ['a'..'z']
 nop
endif	;no default

;
;

; direkt conditions

if z
 if c
  if p
   if ov
    if nv
     if pe
      if po
       if m
        if nc 
         if nz
          nop
         endif
        endif
       endif
      endif
     endif
    endif
   endif
  endif
 endif
endif





end