Define Cynical Fan Forums

Posted: **Sun Nov 16, 2008 2:28 am**

first post

Posted: **Sun Nov 16, 2008 2:43 am**

Fourth post.

Posted: **Sun Nov 16, 2008 2:46 am**

Fourth post.

Posted: **Sun Nov 16, 2008 2:51 am**

Fourth, maybe? I can't count.

Posted: **Sun Nov 16, 2008 3:00 am**

Posted: **Sun Nov 16, 2008 5:19 am**

I don't get it.

EDIT: Oh.

Posted: **Sun Nov 16, 2008 6:41 am**

hO TIDE.

Posted: **Sun Nov 16, 2008 9:24 pm**

I don't get it.

EDIT: I still don't get it.

Posted: **Sun Nov 16, 2008 10:35 pm**

good for you.

Posted: **Mon Nov 17, 2008 12:22 am**

Am I missing something?

Posted: **Mon Nov 17, 2008 4:52 am**

What's not to get? It's not like this thread is complicated, jeez.

Posted: **Mon Nov 17, 2008 6:40 pm**

Fourth post.

Forth post!

Code: Select all

CODE inner_loop      ( addr1 addr2 Nmax lower_limit -- )  ( f: x -- x)
          fld FSIZE FSTACK_MEMORY                \ f: -> fpu:
          mov ecx, ebx                           \ ecx = r2
          pop eax                                \ eax = Nmax
                                                 ( addr1 ebx=addr2)
          push edx                               ( addr1 edx ebx)
          mov edx, 4 [esp]                       \ edx = addr1)
                                          \ begin loop
       L$1:  fld [ebx] [edi]                     ( fpu: aa m[addr2]
          fmul st, st(1)                         ( fpu: aa m2*aa)
          fld [edx] [edi]                        ( fpu: aa m2*aa m1)
          fxch st(1)                             ( fpu: aa m1 m2*aa)
          fsubp st(1), st                        ( fpu: aa m1-m2*aa)
          fstp  [edx] [edi]                      ( fpu: aa)
          add [edx], # 8                         \ increment addresses
          add [ebx], # 8
          inc ecx                                \ add 1 to loop variable
          cmp eax, ecx                           \ test for done
          jl  L$1                                \ loop if I <Nmax> f:
          next,
       END-CODE

(...worst pun ever?)

Posted: **Mon Nov 17, 2008 8:29 pm**

Fourth post.
Forth post!

Code: Select all
CODE inner_loop ( addr1 addr2 Nmax lower_limit -- ) ( f: x -- x) fld FSIZE FSTACK_MEMORY \ f: -> fpu: mov ecx, ebx \ ecx = r2 pop eax \ eax = Nmax ( addr1 ebx=addr2) push edx ( addr1 edx ebx) mov edx, 4 [esp] \ edx = addr1) \ begin loop L$1: fld [ebx] [edi] ( fpu: aa m[addr2] fmul st, st(1) ( fpu: aa m2*aa) fld [edx] [edi] ( fpu: aa m2*aa m1) fxch st(1) ( fpu: aa m1 m2*aa) fsubp st(1), st ( fpu: aa m1-m2*aa) fstp [edx] [edi] ( fpu: aa) add [edx], # 8 \ increment addresses add [ebx], # 8 inc ecx \ add 1 to loop variable cmp eax, ecx \ test for done jl L$1 \ loop if I <Nmax> f: next, END-CODE
(...worst pun ever?)

I GOT IT! (Not hilarious but indeed worth the bother!)

Posted: **Mon Nov 17, 2008 9:33 pm**

Bummer, I never used that code.

Define Cynical Fan Forums

1000

1000