basecar:=plot([[-9,9]]):baseoftaxi := plot ([[-9,5],[9,5],[9,18],[-9,18]],filled=true,color=yellow):body:=plot([[0,0],[12,0],[12,5],[0,5],[0,0]],filled=true,color=yellow):spokes:=plot([[[-2,0],[2,0]],[[0,-2],[0,2]],[[2,0],[0,2],[-2,0],[0,-2],[2,0]]],thickness=2,color=grey):rim:=circle([0,0],2,thickness=2,color=black):wheel:=display([spokes,rim]):top:=plot([[3,5],[3,9],[10,9],[10,5]],filled=true,color=yellow):wheel2:=display([spokes,rim]):taxi:=display([wheel2,top,body]):wheel3:=display(translate(wheel2,12,0)):window:=plot([[4,6],[8.5,6],[8.5,8],[4,8]],filled=true,color=blue):isabel:=plot([[6,6],[6,8]],color=grey,thickness=2):TAXI:=display([window,isabel,taxi,wheel3]):t:=plot([[4,2],[4,2.5],[2.5,5],[4.5,5]],color=black,thickness=2):taxisign:=textplot([6,3,"Taxi"],color=black,thickness=5):taxisign2:=textplot([6,2.5,"taxi"],color=black,thickness=9,font=[Times,bold,23]):TAXI1:=display([TAXI,taxisign2]):head:=display(disk([35,9],2,color=tan)):mouth:=plot([[34,8],[35,8]],color=red,thickness=8):eye1:=display(disk([34.5,9.5],0.5,color=cyan)):eye2:=display(disk([35.5,9.5],0.5,color=cyan)):FACE:=display(eye1,eye2,mouth,head):HAIR1:=plot([[35,10.75],[33,7],[32,7],[33.67,10.75],[35,10.75]],filled=true,color=yellow):HAIR2:=plot([[35,10.75],[38,7],[39,7],[37,10.75],[35,10.75]],filled=true,color=yellow):faceh:=display(HAIR1,HAIR2,FACE):dress:=plot([[35,7],[34,2],[36,2],[35,7]],color=magenta,filled=true,thickness=7):body:=display(dress,body):BODY:=display(dress,faceh):wavingh:=plot([[35.5,5],[38,8]],color=tan,thickness=5):hand:=plot([[34.5,5],[33.5,3]],color=tan,thickness=5):leg1:=plot([[34.75,0],[34.75,2]],color=tan,thickness=5):leg2:=plot([[35.5,0],[35.5,2]],color=tan,thickness=5):person:=display(leg1,leg2,hand,BODY):wavingh2:=rotate(wavingh,-Pi/12,[35.5,5]):video123:=display(TAXI1,person):m1:=display(translate(TAXI1,1,2)):hl:=display(person,wavingh):h2:=display(person, wavingh2):pl:=display(translate(TAXI1,1,2),hl):p2:=display({translate(TAXI1,2,2)},h2):p3:=display({translate(TAXI1,4,2)},hl):p4:=display({translate(TAXI1,6,2)},h2):p5:=display({translate(TAXI1,8,2)},hl):p6:=display({translate(TAXI1,10,2)},h2):p7:=display({translate(TAXI1,12,2)},hl):p8:=display({translate(TAXI1,14,2)},hl):p9:=display({translate(TAXI1,16,2)},h2):p10:=display({translate(TAXI1,18,2)},hl):head12:=display(disk([9,35],2,color=tan)):display([pl,p2,p3,p4,p5,p6,p7,p8,p9,p10],insequence=true,scaling=constrained,axes=none);Play this at 9FPS