Chansey
------------------------------------------------
Version: 1.0, 020220
Creator: time  (timmy meysman).
Description: it's a moving picture of the pokemon Chansey i hope to make some more.
Comments: "->" is the "STO>"-button.
	  send any comments to darkling_timmy@hotmail.com
Known bugs: None.
Size: chansey: 912 bytes.
      oog:     114 bytes.

prgm_chansey

clrdraw			|
1->xmin			|
63->xmax		|
0->xscl			|=> note: if you're using the instgrip-program just type instead of these lines prgm_instgrp
1->ymin			|
47->ymax		|
0->yscl			|


30->a
38->b
10->c
12->d
21->e
22->f
23->g
25->h
27->i
29->j
31->k
32->l
33->m
35->n
36->o
38->p
line(A,9,B,9
line(40,9,46,9
line(28,9,E,9
line(E,C,F,C
line(28,C,J,C
line(B,C,39,C
line(45,C,46,C
line(45,11,44,D
line(40,11,41,11
line(26,11,I,11
line(F,11,G,D
line(E,D,19,14
line(G,14,H,D
line(L,D,N,D
line(42,D,43,13
line(44,14,45,17
line(O,13,37,14
line(K,13,A,14
line(F,15,E,18
line(18,15,17,18
line(J,15,J,18
line(P,15,P,18
line(37,18,O,17
line(A,18,K,17
line(L,16,N,16
line(46,18,46,F
line(20,19,20,F
line(16,19,16,G
line(17,24,18,24
line(19,E,19,G
line(A,19,M,F
line(P,18,34,F
line(J,F,A,F
line(37,F,P,F
line(45,G,45,H
line(E,G,E,H
line(K,G,L,24
line(O,G,N,24
line(N,H,O,26
line(L,H,K,26
line(A,26,j,H
line(37,26,P,H
line(F,26,F,I
line(44,26,44,I
line(45,I,46,28
line(L,28,34,28
line(E,I,20,28
line(E,J,G,J
line(24,A,H,K
line(N,J,K,J
line(45,J,43,J
line(42,A,41,K
line(46,A,47,K
line(O,K,O,M
line(N,34,N,K
line(K,K,K,34
line(A,K,A,M
line(20,A,19,K
line(20,L,G,M
line(46,L,43,M
line(42,34,39,37
line(24,34,I,37
line(28,P,J,P
line(P,P,37,P
line(O,39,A,39
lbl 1
prgm_oog
prgm_oog
pt-off(K,J
pt-off(N,J
pt-off(L,J
pt-off(34,J
pt-on(M,I
for(Z,1,25
end
pt-off(M,I
pt-on(34,J
pt-on(L,J
pt-on(N,J
pt-on(K,J
for(Z,1,30
end
goto 1


prgm_oog

pt-off(K,34
pt-off(A,M
pt-off(N,34
pt-off(O,M
pt-off(K,M
pt-off(A,L
pt-off(N,M
pt-off(O,L
pt-off(K,L
pt-off(N,L
pt-on(N,L
pt-on(K,L
pt-on(A,L
pt-on(K,M
pt-on(O,L
pt-on(N,M
pt-on(O,M
pt-on(N,34
pt-on(A,M
pt-on(K,34

program end



