.include #system
   .include #stddef
   .include #macros
   .include #cio
   .include #string

_string1 == $F0
_string2 == $F2
_tmp1    == $F4

start:
   PRINT    0,"Starting the STRING test",255,@p1+@p3+@s2
   STRCPY   buf,"Deutscher Meister",@p1+@s2
   STRLEN   buf
   PRINT    0,buf,_tmp1,@p1+@p2+@special
   PUTC     0,155,@p1+@p2+@special
   STRCAT   buf," wird nur der VfL",@p1+@s2+@special
   STRLEN   buf
   PRINT    0,buf,_tmp1,@p1+@p2+@special
   PUTC     0,155,@p1+@p2+@special
   PRINT    0,"Done"
   rts

buf:  .ds   128