045 
            07.12.2008, 00:52 Uhr 
            holm 
            
  
 
  | 
          Hrrrm...
  Mönsch Rüdiger...
  >;---  hd_sl  ------------------------------------------------------ >; Kopfselektierung >; A: Kopfnummer 0...max, Test auf Richtigkeit muss vorher erfolgen >;------------------------------------------------------------------ >hd_sl    rrca >    rrca >    rrca >    rrca >    ld    b,a >    ld    a,(dsk_c1) >    and    0fh        ;Loeschen der HS-Bits >    or    b        ;neue HS-Bits >    ld    (dsk_c1),a >    out    (DSKC1),a >    ret
  .. U8000 Crossassembler? ... wohl eher nicht.
  Aber mit einem U880 Simulator im Zielboard evtl.
  Gruß,
  Holm -- float R,y=1.5,x,r,A,P,B;int u,h=80,n=80,s;main(c,v)int c;char **v; {s=(c>1?(h=atoi(v[1])):h)*h/2;for(R=6./h;s%h||(y-=R,x=-2),s;4<(P=B*B)+ (r=A*A)|++u==n&&putchar(*(((--s%h)?(u<n?--u%6:6):7)+"World! \n"))&& (A=B=P=u=r=0,x+=R/2))A=B*2*A+y,B=P+x-r;} |