AMOS Pro101v"" >\>\>\>\ T TFT 4TN >* 6\6T>T>TD>T>\>>\> >\>>> RReserve As Work 13,4096  > \>%*&ab3:includes/shadepal.aminc\>)b'_tempscr |T >T n>Tx>\>Tv^t>N|d$x>\>T&,Unable to load 'ab3:includes/shadepal.aminc'  n_tempscrp >\>\>\> \ FT 4T >  >\>\>\> \ FT 4T >  >\>\>\> \ FT 4T >  >\>\>\> \ FT 4T >  >\>\>\> \ FT 4T >  >\>\> \>\  >\\>\\ FT 4T >  >\6 @@shint>|9@ @cot>?|\@palt>\>|\@prt>|\@pgt>|\$@pbt>|B*wof\0hof\@cot|\@palt|\@prt|\@pgt|\@pbt|\@shint|\6justpal% &ab3:includes/256pal\@t>|)b'_tempscr |T >T n>Tx>\>Tv^t>N|d x>\>T&$Unable to load 'ab3:includes/256pal'  n_tempscrTp <s@t>|<Ba>>#@paltBa\>|!t<s|TX<s\>#@paltBa\>|!t<s|TX<s\>#@paltBa\>|!t<s|TX<s\>F @H@rmt>0| Nt>< Ba>>Ta<Zb>>`cttTa\Zb\>||/0`c>A`c`c>A&`ct`c>0|>H@rmtNt|`c XNt\>FF &BCAAAEF &GBCDEFK &LGHIJKR &LMNOPQR &LSTUVWR &SXYZ01W &XY22201Pv fflt&ab3:hqn/\&\&Load Object Graphics| ff& R Load Iff F$,0ffff&.datffff&.wadffff&.palffff&.ptrffff&.HQNffff&.topffff&.botffff&.lftffff&.rgt n>%tff&.top| _checkerrff&.top n>tff&.bot| _checkerrff&.top n>tff&.lft| _checkerrff&.top n>tff&.rgt| _checkerrff&.top n>tff&.cmp| _checkerrff&.top% ff&.cmp\@t>| _checkerrff&.cmp$<s!t@t>|@t>|>'\&CMAP|><Ba>>@prtBa|!t<s|TX<s\>@pgtBa|!t<s|TX<s\>$@pbtBa|!t<s|TX<s\>F#<HBa>>T @cotBa| ,tBa|F n> > >T n>Tx>\>Tv^t>N|dx>\>T&Just regenerate palette? (Y/N)P< Ta|t|#\t&YN\Ta|%,Ta&Y6justpal>6justpal>6justpal>-x>\>Tv^t>N|dTx>\>T&Screen Width: dlwos/x>\>Tv^t>N|dTx>\>T&Number of frames: drnof1x>\>Tv^t>N|dTx>\>T&Width of each frame: d*wof1x>\>Tv^t>N|dTx>\>T&Height of each frame: d0hof R For A=1 To 7 R Screen 4 R For B=0 To 7R4 If B<>A Then Colour B,0 Else Colour B,CO(B) R Next R Screen 5R2 Input "Shininess of colour (0-16): ";SHIN(A)R Next  n>#<BBa>>T Ba\ @cotBa|TF n> >,6justpal>! n>Tx>\>Tv^t>N|dTx>\>&Creating lightmap...xx>T~y>z@t>|><\Ba>rnof> <q>*wof> <w>0hof>( n>TctN Ltqxx\w~y|> ( n>TcbN Ltqxx\w~y|> $ n>TclN Ltqxx\w~y|$ n>TcrN Ltqxx\w~y|clcl> Tcrcr> $ n>TccN Ltqxx\w~y| ccf>R Add CT,-1 R Add CB,-1 R Add CL,-1 R Add CR,-1 .`cH@rmtt>cbct|>>crcl| `c>!z\t`c>|cc Xz\>N nqxx\w~y\> F F; xxxx*wofTRxx*woflwosTxx>TX~y\0hofTF"fflt& ab3:includes/\&\&Save raw data file| ff&psaveff\rnof n>x>\>Tv^t>N|d x>\>T&#All done, press any key to continuex>\>Tv^t>N|d!x>\>T&&Press return, or select cancel to quit\>pv x0psavem\no(justpal> ltnowofhof|>R t> p@t> |R s@t>| Zs\noZs>\wofZs>\hof Xs\> Xs\ l%m&.HQN\@t>|s)b" $_tempscr |T n>Tx>\>Tv^t>N|d x>\>T&Unable to save m&.HQN n$_tempscr Tp*n@t> |> >>!@t>|\t@palt>\>||!@t>|>\t@prt>||!@t>|>\t@pgt>||!@t>|> \t@pbt>||!@t>|>\@t> |"$_tempscr |T n>Tx>\>Tv^t>N|d&x>\>T&/Calculating palette, this may take some time...  n$_tempscr @t>|> R For PA=0 To 3R For A=0 To 31 R V=32-A R For Q=0 To 7 R6 R=PR(Q+PA*8) : G=PG(Q+PA*8) : B=PB(Q+PA*8)R If A>=SHIN(Q) R. R=(R*(V-SHIN(Q)))/(32-SHIN(Q)) R. G=(G*(V-SHIN(Q)))/(32-SHIN(Q)) R. B=(B*(V-SHIN(Q)))/(32-SHIN(Q)) R Else R L=V-(32-SHIN(Q)) R R=Min(255,R+L*5) R G=Min(255,G+L*5) R B=Min(255,B+L*5) R End If R DQ=10000000 R TC=0R For Z=0 To 255R DR=(R-R(Z))^2R DG=Abs(G-G(Z))^2 R DB=Abs(B-B(Z))^2 R R& ND=(DR*3)+(DG*3)+(DB*3)R* If ND |*n)b"$_tempscr |T n>Tx>\>Tv^t>N|d"x>\>T&Unable to save m&.256pal  n$_tempscrpRv _checkerra)b'_tempscr |T >T n>Tx>\>Tv^t>N|dx>\>T&Unable to load  f  n_tempscrTpAmBsAmBkAsm :X::H:;xA"P$h0<2<4< A6<,h *h(h8?D(*,.<Hp@0<"$&ԃ҂m .H@0H@QLH@FQ0RA| m~R@|mpNu