›;cartoon.asm›› proc››cartoonnum db 0››cartoon› inc cartoonnum› lda cartoonnum› and #1› bne :nocartoon› lda cartoonnum› and #%110› tax› lda cartoontab,x› sta :vc› lda cartoontab+1,x› sta :vc+1›:vc equ *+1› jmp $FFFF››cartoontab› dw cartoon1› dw cartoon2,cartoon3,cartoon4››:nocartoon› rts››