Re: Cantering MOOSE / anyone do gaits?

In article <34C...@freent.toronto.on.ca>, llizard writes:
>In article <CJ9...@xemu.demon.co.uk>, Dave Bird wrote:
>> 
>> Enclosed is an amination of a moose cantering; to view, save and
>> browse as an HTML file.
>> 
>> Has anyone done an animation of animals showing all the real-life
>> four legged walking patterns ("gaits"), which can all be observed
>> in domestic cats if you have cats at home.
>> (A) SLOW WALK.  The legs  act in diagonally opposite pairs:
>> 1. LeftRear forward 2 RightFront  3 RightRear 4 RightFront,
>> in four time units the animal is one pace forward.
>>
>>[snip other gaits..........]
>
>You should really turn the poor thing around so it doesn't suddenly and
>inexplicably beam itself back to the starting point.

Can the Basic below be done in JavaScript i.e. the array stores
not FRAMES but LINES, and a frame is built dynamically from lines
(don't know how slow this would be), thus eliminating lots of
frames which are just the same object 4,8,12 etc spaces rightwards?
The animation shows a little dog doing the slow quadruped walk.

ANIM8.BAS
=========
NROW = 7: CLS
DIM PK$(NROW)
GOSUB 1200
STOP
REM MMM                                                     MMM
REM M  +++++++++++++++++++++++++++++++++++++++++++++++++++++  M
REM MMM                                                     MMM
1200 NDELAY = 5000: REM version three animation player
FOR IREPT = 1 TO 10: NTOP = 57: LB = 24: CLS
  FR$ = "": BK$ = "                                        "
  FOR IPLAC = 1 TO NTOP STEP 4: JPLAC = NTOP - IPLAC: RESTORE
    FOR IFRAM = 1 TO 4: CLS : PRINT IPLAC, NTOP, JPLAC
      FOR R = 1 TO NROW: READ A$
        IF IPLAC < LB THEN A$ = RIGHT$(A$, IPLAC) ELSE IF JPLAC < LB       
                                         THEN A$ = LEFT$(A$, JPLAC)
        PRINT FR$; A$; BK$
      NEXT R: FOR DLY = 1 TO NDELAY: NEXT DLY
    NEXT IFRAM:
  IF IPLAC > LB THEN FR$ = FR$ + "    ": IF LEN(BK$) > 4 
                                         THEN BK$ = MID$(BK$, 4)
  NEXT IPLAC: NDELAY = NDELAY - 450
NEXT IREPT
RETURN
REM ----
REM ..........Data statements........................
REM  Walk[1] single legs advance in cyclic order ---+
REM  0000000000111111111122222 W[1]
REM  0123456789012345678901234
DATA "\\            /\       "
DATA " \\__________/  @--o   "
DATA " |               ===   "
DATA " |  _________    .''   "
DATA " | |+\       | |+|     "
DATA " | |\#\      | |+|     "
DATA ".|_|.'-'    .|_|-'     "
REM  0000000000111111111122222 W[2]
REM  0123456789012345678901234
DATA "  |\           /\      "
DATA "   \\_________/  @--o  "
DATA "   |              ===  "
DATA "   |  ________    .''  "
DATA "   | |+|      | |+|    "
DATA "  / /\+\      \#\/     "
DATA " .|_|'-'    ___|_|     "
REM  0000000000111111111122222 W[3]
REM  0123456789012345678901234
DATA "  |\           /\      "
DATA "   \\_________/  @--o  "
DATA "   |              ===  "
DATA "   |  ________    .''  "
DATA "   \ \+|      | |+|    "
DATA "    \#\\      \ \/     "
DATA "  ___\_\     _|_|      "
REM  0000000000111111111122222 W[4]
REM  0123456789012345678901234
DATA "    \\           /\    "
DATA "     \\_________/  @--o"
DATA "     |              ==="
DATA "     |  _________   .''"
DATA "     \ \+|       | |+| "
DATA "     | |+|       | |#| "
DATA "    _\_\'      ..|_|-' "
END

~~~~~~~~~~~~~~~~~~~~~~~~JAVASCRIPT~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Does JavaScript have basic-style string variables, concatenate,
and left$/right$/mid$?  can you do a bitwise and of variables??

    var max=0;  //function to set up a list of strings
    function tlist(){ max=tlist.arguments.length;
        for(i=0;i<max;i++) this[i]=tlist.arguments[i];
    }
    list1=new tlist(
      "\\            /\       \r\n", //W[1]
      " \\__________/  @--o   \r\n",
      " |               ===   \r\n",
      " |  _________    .''   \r\n",
      " | |+\       | |+|     \r\n",
      " | |\#\      | |+|     \r\n",
      ".|_|.'-'    .|_|-'     \r\n",
      "                       \r\n",
      "  |\           /\      \r\n", //W[2]
      "   \\_________/  @--o  \r\n",
      "   |              ===  \r\n",
      "   |  ________    .''  \r\n",
      "   | |+|      | |+|    \r\n",
      "  / /\+\      \#\/     \r\n",
      " .|_|'-'    ___|_|     \r\n",
      "                       \r\n",
      "                       \r\n",
      "  |\           /\      \r\n", //W[3]
      "   \\_________/  @--o  \r\n",
      "   |              ===  \r\n",
      "   |  ________    .''  \r\n",
      "   \ \+|      | |+|    \r\n",
      "    \#\\      \ \/     \r\n",
      "  ___\_\     _|_|      \r\n",
      "                       \r\n", 
      "    \\           /\    \r\n", //W[4]
      "     \\_________/  @--o\r\n",
      "     |              ===\r\n",
      "     |  _________   .''\r\n",
      "     \ \+|       | |+| \r\n",
      "     | |+|       | |#| \r\n",
      "    _\_\'      ..|_|-' \r\n"
    );

 There are 0x08 lines in a frame, * 0x04 frames (=0x20),
 * 0x10 steps of fourspace advance (=0x200) in an 0x40 char line.



                                            |~/           |~/
~~|;'^';-._.-;'^';-._.-;'^';-._.-;'^';-._.-;||';-._.-;'^';||_.-;'^'0-|~~
P |      Woof Woof, Glug Glug               ||____________||      0  | P
O |   Who Drowned the Judge's Dog?          | . . . . . . . '----. 0 | O
O |         answers on                  *---|_______________  @__o0  | O
L |{a href="news:alt.religion.scientology"}{/a}_____________|/_______| L
and{a href="http://www.xemu.demon.co.uk/clam/lynx/q0.html"}{/a}XemuSP4(:)

Related ASCII art in the Gallery

Explore these categories from our collection of 11,000+ artworks:

 ,_)/
   (-'
 .-'\
  "'\'"""""'),
     )/---,(
PjP / \  / |

      (_V__V_)
        (oo)
 /-------\/
"| _____||
 ||     ||
  ^^     ^^

 |\__/,|   (`\
 |_ _  |.--.) )
 ( T   )     /
(((^_(((/(((_/

Make your own ASCII art

Turn images, text or 3D into ASCII, or draw your own – right in your browser.