;cartoon.asm››     proc››cartoon3›  lda #0›  sta scrollflag›  sta pirx›  sta fishx›  sta crabx›  lda #198›  sta fishy›  lda #193›  sta piry›  lda #255›  sta pird›  lda #1›  sta scrollpos+1›  lda #0›  sta scrollpos›  inc scrollflag›  ldx #0›  stx fishd›:lp1›  stx fishx›  txa›  sec›  sbc #24›  bcc :nopir1›  sta pirx›:nopir1›  lda 20›  cmp 20›  beq *-2›  and #8›  lsr a›  lsr a›  lsr a›  sta autotail›  inx›  bne :lp1›  lda 20›  cmp 20›  beq *-2›  lda 20›  cmp 20›  beq *-2›  ldx #1›  stx fishd›  stx pird›  stx bigcflag›  lda #127›  sta fishy›  lda #193›  sta piry›  lda #203-16›  sta craby›  ldx #254›:lp9›  stx pirx›  txa›  clc›  adc #24›  bcs :nof1›  sta crabx›  cmp #127›  bcc :nof1›  sta fishx›:nof1›  lda 20›  cmp 20›  beq *-2›  lda fishx›  cmp #130›  bcc :mm1›  lda 20›  and #8›  lsr a›  lsr a›  lsr a›  sta autotail›:mm1›  dex›  bne :lp9››  lda #0›  sta autotail›  sta bigcflag›  lda #0›  sta 20›:lp2›  lda 20›  cmp #180›  bne :lp2›  rts››  eproc››