restart:with(plots):with(plottools):
rec1:=display(polygon([[0,24],[8,24],[8,20],[0,20]],color="Green")):
rec2:=display(polygon([[8,24],[16,24],[16,20],[8,20]],color="Olive")):
rec3:=display(polygon([[16,20],[16,24],[24,24],[24,20]],color="violet")):
rec4:=display(polygon([[0,4],[8,4],[8,0],[0,0]],color="black")):
tri1:=display(polygon([[18,0],[21,4],[24,0]],color="DarkOrange")):
tri2:=display(polygon([[12,0],[15,4],[18,0]],color="Gold")):
tri3:=display(polygon([[6,0],[9,4],[12,0]],color="Blue")):
tri4:=display(polygon([[0,0],[3,4],[6,0]],color="Lime")):
BACKGROUND:=display(polygon([[0,0],[0,24],[24,24],[24,0]],color="White")):
Frame1:=display(rec1,rec2,rec3,tri1,tri2,tri3,tri4,BACKGROUND):
S1fr2:=display(polygon([[0,20],[8,20],[8,16],[0,16]],color="Green")):
S2fr2:=display(polygon([[8,20],[16,20],[16,16],[8,16]],color="Olive")):
S3fr2:=display(polygon([[16,20],[24,20],[24,16],[16,16]],color="violet")):
tri1fr2:=display(polygon([[0,6],[3,10],[6,6]],color="DarkOrange")):
tri2fr2:=display(polygon([[6,6],[9,10],[12,6]],color="Gold")):
tri3fr2:=display(polygon([[12,6],[15,10],[18,6]],color="Blue")):
tri4fr2:=display(polygon([[18,6],[21,10],[24,6]],color="Lime")):
display(tri1fr2,tri2fr2,tri3fr2,tri4fr2,S1fr2,S2fr2,S3fr2):
Frame2:=display(tri1fr2,tri2fr2,tri3fr2,tri4fr2,S1fr2,S2fr2,S3fr2,BACKGROUND):
Fr3flash:=display(polygon([[0,16],[24,16],[24,12],[0,12]],color="Goldenrod")):
Frame3:=display(Fr3flash,BACKGROUND):
tri1fr4:=display(polygon([[0,16],[3,20],[6,16]],color="DarkOrange")):
tri2fr4:=display(polygon([[6,16],[9,20],[12,16]],color="Gold")):
tri3fr4:=display(polygon([[12,16],[15,20],[18,16]],color="Blue")):
tri4fr4:=display(polygon([[18,16],[21,20],[24,16]],color="Lime")):
s1fr4:=display(polygon([[0,12],[8,12],[8,8],[0,8]],color="Green")):
s2fr4:=display(polygon([[8,12],[16,12],[16,8],[8,8]],color="Olive")):
s3fr4:=display(polygon([[16,12],[24,12],[24,8],[16,8]],color="violet")):
Frame4:=display(tri1fr4,tri2fr4,tri3fr4,tri4fr4,s1fr4,s2fr4,s3fr4,BACKGROUND):
tri1fr5:=display(polygon([[0,20],[3,24],[6,20]],color="DarkOrange")):
tri2fr5:=display(polygon([[6,20],[9,24],[12,20]],color="Gold")):
tri3fr5:=display(polygon([[12,20],[15,24],[18,20]],color="Blue")):
tri4fr5:=display(polygon([[18,20],[21,24],[24,20]],color="Lime")):
s1fr5:=display(polygon([[0,8],[8,8],[8,4],[0,4]],color="Green")):
s2fr5:=display(polygon([[8,8],[16,8],[16,4],[8,4]],color="Olive")):
s3fr5:=display(polygon([[16,8],[24,8],[24,4],[16,4]],color="violet")):
Frame5:=display(tri1fr5,tri2fr5,tri3fr5,tri4fr5,s1fr5,s2fr5,s3fr5,BACKGROUND):
s1fr6:=display(polygon([[0,4],[8,4],[8,0],[0,0]],color="Green")):
s2fr6:=display(polygon([[8,4],[16,4],[16,0],[8,0]],color="Olive")):
s3fr6:=display(polygon([[16,4],[24,4],[24,0],[16,0]],color="violet")):
Frame6:=display(s1fr6,s2fr6,s3fr6,BACKGROUND):
Frame7:=display(BACKGROUND):
JohnsMovie:=display(Frame1,Frame2,Frame3,Frame4,Frame5,Frame6,Frame7,insequence=true,axes=none):
JohnsMovie;
# fps=3