I posted the code yesterday in the #omnimaga channel, I will try to find it in my logs and post it here
EDIT: juil. 07 22:32:19 Storepic 0
juil. 07 22:33:12 For(*0*,0,1 <-*0* means ALPHA then 3 symbol
juil. 07 22:33:29 real(12,8,0,0,95,39,1
juil. 07 22:33:34 End
juil. 07 22:33:43 For(Z,0,48,8
juil. 07 22:34:08 If Z=48:real(3,6,0,0
juil. 07 22:34:24 real(12,8,48-Z,0,48=Z,39,1
juil. 07 22:34:30 End
juil. 07 22:34:35 Storepic 0
juil. 07 22:34:43 For(V,0,2
juil. 07 22:34:55 For(*0*,0,8,4
juil. 07 22:35:26 real(3,0,0,0
juil. 07 22:35:50 For(Z,-2+*0*,22+*0*,12
juil. 07 22:36:38 real(1,-1,Z+2(Z<0),12,4,0,0,Z+2(Z<0),0,0,0
juil. 07 22:37:20 real(1,1,Z+6,12,4,0,0,Z+6,0,0,Z=22+*0*
juil. 07 22:37:22 End
juil. 07 22:37:23 End
juil. 07 22:37:25 End
juil. 07 22:37:33 32->*0*
juil. 07 22:38:11 real(3,6,0,1 (pic 6 is the battle screen in my attack program)