0 Members and 1 Guest are viewing this topic.
I've almost memorized it already
Quote from: Ashbad on January 21, 2011, 04:08:11 pmI've almost memorized it alreadyI'm gonna print that so I can remember it all the time, I don't feel like memorizing it.
Very nice. As a side note:Code: [Select]0->B->C->DFor(A,0,15)Pt-Off(0,A,{o}A)EndDispGraphShould give the same thing. (except for the randomness of whatever is in B, C, and D){o}=o
0->B->C->DFor(A,0,15)Pt-Off(0,A,{o}A)EndDispGraph
For(F,0,15F->{F*12+L6}End
For(F,0,15F->{*12+L6}End
ClrDrawFor(F,0,15F->{*12+L6}EndDispGraph
Don't forget to "last answer" optimize Code: [Select]For(F,0,15F->{*12+L6}End
0->FWhile -16F->{*12+L6}F+1->FEnd
Code: [Select]0->FWhile -16F->{*12+L6}F+1->FEndcan't hurt to save a byte
Quote from: nemo on January 22, 2011, 06:44:35 pmCode: [Select]0->FWhile -16F->{*12+L6}F+1->FEndcan't hurt to save a byteOMG. That's insane!I should just write it in ASM and post the hex.
xor ald (plotsScreen), ainc ald (plotsScreen+12), ainc ald (plotsScreen+24), ainc ald (plotsScreen+36), ainc ald (plotsScreen+48), ainc ald (plotsScreen+60), ainc ald (plotsScreen+72), ainc ald (plotsScreen+84), ainc ald (plotsScreen+96), ainc ald (plotsScreen+108), ainc ald (plotsScreen+120), ainc ald (plotsScreen+132), ainc ald (plotsScreen+144), ainc ald (plotsScreen+156), ainc ald (plotsScreen+168), ainc ald (plotsScreen+180), a
ld bc,12ld a,0ld hl,plotsScreenld (hl),ainc aadd hl,bccp 16jr z,$-5 ;or maybe 6
ld b,15 ld hl,plotsscreen+12*15 ld de,-12loop: ld (hl),b add hl,de djnz loop ld (hl),b
16Lbl L-1ā{*12+Lā}If {}Goto LEnd
ld hl,17*12+3+plotSScreen ;$940F ld de,-12 ld b,lloop: ld (hl),b add hl,de djnz loop ld (hl),b