1000

Fritz · Postby **Fritz** » Sun Nov 16, 2008 2:28 am

first post

Bocaj Claw · Postby **Bocaj Claw** » Sun Nov 16, 2008 2:43 am

Fourth post.

TyVulpine · Postby **TyVulpine** » Sun Nov 16, 2008 2:46 am

Fourth post.

MuffinSticks · Postby **MuffinSticks** » Sun Nov 16, 2008 2:51 am

Fourth, maybe? I can't count.

Baconsticks · Postby **Baconsticks** » Sun Nov 16, 2008 3:00 am

Liz · Postby **Liz** » Sun Nov 16, 2008 5:19 am

I don't get it.

EDIT: Oh.

osprey · Postby **osprey** » Sun Nov 16, 2008 6:41 am

hO TIDE.

Angstwolf · Postby **Angstwolf** » Sun Nov 16, 2008 9:24 pm

I don't get it.

EDIT: I still don't get it.

klimt · Postby **klimt** » Sun Nov 16, 2008 10:35 pm

good for you.

Moddex · Postby **Moddex** » Mon Nov 17, 2008 12:22 am

Am I missing something?

MuffinSticks · Postby **MuffinSticks** » Mon Nov 17, 2008 4:52 am

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

Doc Sigma · Postby **Doc Sigma** » 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?)

LewisTheTank · Postby **LewisTheTank** » 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!)

Tom Flapwell · Postby **Tom Flapwell** » Mon Nov 17, 2008 9:33 pm

Bummer, I never used that code.

Define Cynical Fan Forums

1000

Who is online