home *** CD-ROM | disk | FTP | other *** search
/ Magic Disk 64 / Magic_Disk_64_88-08_1988_-_de_Side_A.d64 / 7.20 < prev    next >
Text File  |  2023-02-26  |  762b  |  10 lines
  1. X         v-p
  2.  
  3.           CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCokay  lda #J(data) <l-a   {$60}     sta $fb      < v     {$60}     lda{$60}#G(data) < 
  4.  
  5.     {$60}{$60}{$60}{$60}{$60}{$60}sta $fc      <h            {$60}     lda #J(ende) <l-e       {$60}     sta $f9      <              {$60}{$60}{$60}{$60}{$60}{$60}lda #G(ende) < 
  6.  
  7.     {$60}{$60}{$60}{$60}{$60}{$60}sta $fa      <h                                                    {$60}{$60}{$60}{$60}{$60}{$60}ldy #$00     <z; :      loop  lda ($fb),y  <z        {$60}{$60}{$60}{$60}{$60}{$60}jsr $eddd    <           {$60}{$60}{$60}{$60}{$60}{$60}jsr inccount <z; 
  8.  1 : {$60}{$60}{$60}{$60}{$60}{$60}bcc loop     <w,     {$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60} e    {$60}     jsr savecont <w ,      {$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}{$60}p
  9.  
  10.