ЮЬЬЬЬˆˆˆЌЊЊЊЌˆˆˆЌЬЬЬЌЬРЬЌЬРЬЌЬРЬЬЬьюˆˆЬюЊЊРюˆЈРюЬЌРЬРЌРРРЌРРРЌРРЮЬЬЬЬˆˆˆЌЊЊЊЌˆˆˆЌЬЬЬЌЬЬЬЌЬРЬЌЬРЬЬЬьюˆˆЬюЊЊРюˆЈРюЬЌРЬЬЌРРРЌРРРЌРРЌЬЬЬЌЊЊЊЌЊЌЊЌЊЪЬЌЊЊЊŒˆˆˆЬРЬЮЬЬЮЬЌЬЊЊРьЌЊРюЊЊРюЊЊРюˆˆЬюРьюЬЬююЌЬЬЬЌЊЊЊЌЊЌЊЌЊЪЬЌЊЊЊŒˆˆˆЬРЬЮЬЬЮЬЌЬЊЊРьЌЊРюЊЊРюЊЊРюˆˆЬюРьюЬЬююР"" "" "" "" """"СЬЬСЬЬˆˆˆˆивн("нив-ин"‚ив-("нˆˆˆˆˆˆˆˆи-видMи§пЬЬˆˆˆˆˆˆˆˆинниMди$Bи$BиMдиннˆˆˆˆ№№џџџџџџ F               #PPPPPPPPPPPPPPPPPPPPPPPQRUXZ^_0  pppppppppppppppppppppppppqux}` // / -*&!  !$'+// /,)%"  !!#'*-/ / ‘Р ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` ``` `30ўР?нннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннџџнннннннннннн§пнн§п§џп§џџ§џџнџпнннннннннннннннннннннннннннннннннннџнпџннн§пннннџџнннннннннннн§пнн§п§џп§џџ§џџнџпннннннн§џннџџнџп§џпнџп§пннџпннџннџннџ§пџнннннннннннннннннннннннннннннннннннџнпннџп§џпнн§џннџџнџп§џпнџп§пннџпннџннџннџ§пџннннннннџп§џн§п§§п§§пџнннн§пнџпн§пн§п§џ§нннннннннннннннннннннннннннннннннннџџпџ§нџ§п§нннџп§џн§п§§п§§пџнннн§пнџпн§пн§п§џ§нннннннн§џ§џн§п§§пн§џн§пнн§п§пн§нџнџн§п§нннннннннннннннннннннннннннннннннннџнпџ§џџ§п§ннн§џ§џн§п§§пн§џн§пнн§п§пн§нџнџн§п§ннннннн§џпнџџнџп§пннџп§пннџџ§џџнџп§пннџпнннннннннннннннннннннннннннннннннннџнпџннџ§п§нн§џпнџџнџп§пннџп§пннџџ§џџнџп§пннџпннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннџпнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннббббббббббнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннUUUUб1333бёџџџббббб™™™™бqwwwUUUUб1333бнннннннннннннннббббббббббнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннбннннннннннннннннббббббббнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннбббббЊЊЊЊббнннб1333ffffбнннннннннннннннбннннннннннннннннббббббббннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн"вннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн-""нннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн"""внннннннбббббббннннннннннннннннннннн1333нннннн"""вннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333нннннн"""вннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333нннннн-""нннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333ннннннн"внннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333ннннннннннннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333ннннннннннннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333ннннннннннннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннн1333ннннннннннннннннн1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛб1333ЛЛЛЛбннннннннннннннннннннннннннннннннннннннбббббббнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннббббббббнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бнннннннннннннннннннннннннннннннннннннЊЊЊЊбqwwwDDDDбююююбБЛЛЛˆˆˆˆбQUUU""""бёџџџЬЬЬЬб‘™™™ffffб1333бннннннннннннннннннннннннннˆˆˆиннннннббббббббннннннннннннннннннннннннннˆˆˆинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн"нинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннMндиннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннџнинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннˆˆˆинннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬЬЬЬЬЬЬЬннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬЬЬЬЬЬЬЬннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬЬЬЬЬЬЬЬннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн""ннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннџџннн-""вннннннџџнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬЬнџ§пннн§пнн-""внџ§пннн§пннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннСЬЬн§џннн§џннн-""вн§џннн§џнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн§џнннџнннн-""вн§џнннџнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннџ§пннџџпннн""ннџ§пннџџпнннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннннн+3-- title: Breaker -- author: OdiStudio Games -- desc: break all -- script: lua t=0 x=96 y=123 pb=0 d=0 -- scren z=0 m=1 adb=0 mm=1 -- level respawn k=0 -- number of balle and vari balle bal=3 burn=0 bb=1 bur=0 -- fo xx=0 yy=0 ecx=0 ecy=0 -- score score={ sc=0, hisc=20000, } -- player player={} live=3 ap=0 die=30 fl=30 fll=1 fire=0 function addPlayer(x,y) local p={} p.x=x p.y=y p.dx=0 p.dy=0 p.fb=1 p.t=0 table.insert(player,p) end function ticPlayer() for k,p in pairs(player) do p.x=p.x+p.dx p.y=p.y+p.dy rect(p.x,p.y,20,5,12) rectb(p.x,p.y,20,5,1) -- collision du player -- colllision avec la balle en bougean for s,b in pairs(balle) do if p.x<=b.x+2 and p.x>=b.x-22 and p.y<=b.y+5 and p.y>=b.y-6 then sfx(0,"E-4") if btn(2) then b.x=b.x-1 end if btn(3) then b.x=b.x+1 end end end -- colllision avec la balle for s,b in pairs(balle) do if p.x<=b.x+4 and p.x>=b.x-12 and p.y<=b.y+2 and p.y>=b.y-6 then b.dy=-1 b.dx=-1 sfx(0,"E-4") end end for s,b in pairs(balle) do if p.x<=b.x-11 and p.x>=b.x-22 and p.y<=b.y+2 and p.y>=b.y-6 then b.dy=-1 b.dx=1 sfx(0,"E-4") end end -- controlle du player if btn(2) then p.x=p.x-2 end if btn(3) then p.x=p.x+2 end if btnp(4) and fire>=1 then addBa(p.x+8,p.y) end if btnp(5) and bal>=1 then addBalle(p.x+8,p.y) bal=bal-1 end if fire>=1 then fire=fire-p.fb spr(261,p.x+7,p.y-8,0) end end end -- player end -- effet explosion pp={} function addPp(x,y) local pe={} pe.x=x pe.y=y pe.t=0 pe.dx=math.random(-2,2) pe.dy=math.random(-2,2) table.insert(pp,pe) end function ticPp() for k,pe in pairs(pp) do pe.x=pe.x+pe.dx pe.y=pe.y+pe.dy pe.t=pe.t+1 pix(pe.x,pe.y,15) if pe.t>30 then table.remove(pp,k) end end end -- particles part={} palete = {4,3,2,12,15} function addPart(x,y) local p = {} p.x = x + math.random(-10.0,10.0) p.y = y + math.random(-10.0,10.0) p.size = math.random(2) p.dx = math.random(-1,1)/10.0 p.dy = math.random(-1,1)/10.0 p.sz = math.random(5,6) p.t = 0 p.szt = 0 table.insert(part,p) end function ticPart() local s=0 local s2=0 local c=0 for k,p in pairs(part) do p.x=p.x + p.dx p.y=p.y + p.dy p.t=p.t + 1 p.szt= 0.2 p.sz=p.sz-p.szt c = palete[math.ceil(p.t/5)] s = math.log(p.t / 2.0) s2 = s/2.0 circ(p.x,p.y,p.sz,c) if zero==start then table.remove(part,k) end if p.sz<=0 then table.remove(part,k) end end end -- projectile ba={} function addBa(x,y) local b={} b.x=x b.y=y b.dx=0 b.dy=2 b.t=0 b.c=2 table.insert(ba,b) end function ticBa() for w,b in pairs(ba) do b.x=b.x+b.dx b.y=b.y-b.dy rect(b.x,b.y,5,5,b.c) b.t=b.t+1 if b.y<=-10 then table.remove(ba,w) end if #fo<=0 then table.remove(ba,s) end end end -- projectiles end -- balle balle={} function addBalle(x,y) local ba={} ba.x=x ba.y=y ba.dx=1 ba.dy=1 ba.t=0 ba.c=2 table.insert(balle,ba) end function ticBalle() for w,ba in pairs(balle) do ba.x=ba.x+ba.dx ba.y=ba.y+ba.dy circ(ba.x,ba.y,3,ba.c) if burn>=1 then circb(ba.x,ba.y,3,4) addPart(ba.x,ba.y) end if ba.x<=1 then ba.dx=1 elseif ba.x>=235 then ba.dx=-1 end if ba.y<=1 then ba.dy=1 elseif ba.y>=165 then table.remove(balle,w) end ba.t=ba.t+1 if ba.y<=-10 then table.remove(balle,w) end if #fo<=0 and pb>1 then table.remove(balle,w) end ticPart() end end -- balle end -- balle2 balle2={} function addBalle2(x,y) local ba2={} ba2.x=x ba2.y=y ba2.dx=1 ba2.dy=1 ba2.t=0 ba2.c=12 table.insert(balle2,ba2) end function ticBalle2() for w,ba2 in pairs(balle2) do ba2.x=ba2.x+ba2.dx ba2.y=ba2.y+ba2.dy circ(ba2.x,ba2.y,3,ba2.c) if ba2.x<=1 then ba2.dx=1 elseif ba2.x>=235 then ba2.dx=-1 end if ba2.y<=1 then ba2.dy=1 elseif ba2.y>=130 then ba2.dy=-1 end ba2.t=ba2.t+1 if ba2.y<=-10 then table.remove(balle2,w) end end end -- balle2 end -- PowerUp power={} function addPower(x,y) local po={} po.x=x po.y=y po.dx=0 po.dy=0.02 po.t=0 po.n=math.random(3) po.c=12 table.insert(power,po) end function ticPower() for w,po in pairs(power) do po.x=po.x+po.dx po.y=po.y+po.dy if po.n==1 then spr(258,po.x,po.y) end if po.n==2 then spr(259,po.x,po.y) end if po.n==3 then spr(260,po.x,po.y) end -- collisio with the player for s,b in pairs(player) do if po.x<=b.x+22 and po.x>=b.x-12 and po.y<=b.y+2 and po.y>=b.y-6 and po.n==1 then addBalle(b.x-5,b.y-3) addBalle(b.x+10,b.y-3) addBalle(b.x+20,b.y-3) table.remove(power,w) sfx(2,"E-4") end end for s,b in pairs(player) do if po.x<=b.x+22 and po.x>=b.x-12 and po.y<=b.y+2 and po.y>=b.y-6 and po.n==2 then fire=200 table.remove(power,w) sfx(4,"E-4") end end for s,b in pairs(player) do if po.x<=b.x+22 and po.x>=b.x-12 and po.y<=b.y+2 and po.y>=b.y-6 and po.n==3 then table.remove(power,w) burn=150 sfx(3,"E-4") end end -- po.t=po.t+1 if po.y>=180 then table.remove(power,w) end end end -- powerUp end -- addBlock fo={} function addFo(x,y,c,l) local f={} f.x=x f.y=y f.l=l f.cc=5 f.cl=0 f.dx=0 f.dy=0 f.t=0 f.e=0 f.bb=1 f.b=0 f.c=c table.insert(fo,f) end function ticFo() for k,f in pairs(fo) do d=d+1 rect(f.x,f.y,10,10,f.c) rectb(f.x,f.y,10,10,1) f.t=f.t+1 -- condition d'elimination if f.l<=0 then table.remove(fo,k) addPp(f.x,f.y) addPp(f.x,f.y) addPp(f.x,f.y) addPp(f.x,f.y) addPp(f.x,f.y) addPp(f.x,f.y) end if f.cl==1 then f.l=f.l-1 f.cl=0 score.sc=score.sc+10 sfx(1,"E-4") end -- collision avec les projectiles for s,b in pairs(ba) do if f.x<=b.x+2 and f.x>=b.x-11 and f.y<=b.y+2 and f.y>=b.y-11 then f.cl=1 table.remove(ba,s) f.e=math.random(10) end end -- collision avec la balle if bur==0 then for s,b in pairs(balle) do if f.x<=b.x+2 and f.x>=b.x-11 and f.y<=b.y+2 and f.y>=b.y-11 and b.dy==-1 then f.cl=1 b.dy=1 f.e=math.random(10) elseif f.x<=b.x+2 and f.x>=b.x-11 and f.y<=b.y+2 and f.y>=b.y-11 and b.dy==1 then f.cl=1 b.dy=-1 f.e=math.random(10) end if f.x<=b.x+7 and f.x>=b.x-11 and f.y<=b.y and f.y>=b.y-11 and b.dx==-1 then b.dx=1 f.e=math.random(10) elseif f.x<=b.x+2 and f.x>=b.x-6 and f.y<=b.y and f.y>=b.y-11 and b.dx==1 then b.dx=-1 f.e=math.random(10) end end end if bur==1 then for s,b in pairs(balle) do if f.x<=b.x+2 and f.x>=b.x-11 and f.y<=b.y+2 and f.y>=b.y-11 then f.cl=1 f.e=math.random(10) end end end -- collision avec la balle end -- addPowerUp if f.e==1 and table.remove(fo,k) then addPower(f.x,f.y) score.sc=score.sc+50 end ticPower() ticPp() -- end end -- addBlock end -- level add function level() -- level 1 if pb==1 and k==1 then k=0 for i=1,1 do for x=10,225,15 do for y=10,80,21 do addFo(x,y,x*y,1) end end end end -- level 2 if pb==2 and k==1 then k=0 for i=1,1 do for x=10,225,11 do for y=10,80,11 do addFo(x,y,x*y,1) end end end end -- level 3 if pb==3 and k==1 then k=0 for i=1,1 do for x=10,225,11 do for y=15,60,15 do for yy=10,10,10 do addFo(x,y+10,x*y+3,1) addFo(x,yy,0,2) end end end end end -- level 4 if pb==4 and k==1 then k=0 for i=1,1 do for x=10,225,10 do for y=10,20,10 do addFo(x,y,x*y,3) end end end end -- level 5 if pb==5 and k==1 then k=0 for i=1,1 do for x=10,225,60 do for y=10,80,40 do addFo(x,y,12,6) end end end end -- level 6 if pb==6 and k==1 then k=0 for i=1,1 do for x=10,225,11 do for y=10,60,15 do addFo(x,y,x*y+3,1) end end end for i=1,1 do for x=65,165,11 do for y=10,30,15 do addFo(x,y,0,2) end end end end -- level 7 if pb==7 and k==1 then k=0 for i=1,1 do for x=1,225,11 do for y=60,60,10 do addFo(x,y,0,3) end end end for i=1,1 do for x=10,225,11 do for y=10,50,11 do addFo(x,y,x*y+3,1) end end end end -- level 8 if pb==8 and k==1 then k=0 for i=1,1 do for x=10,225,30 do for y=10,80,20 do addFo(x,y,12,4) end end end end -- level 9 if pb==9 and k==1 then k=0 addFo(130,60,0,30) end -- level 10 if pb>=10 and k==1 then k=0 xx=math.random(20,225) yy=math.random(10,90) ecx=math.random(11,60) ecy=math.random(11,40) for i=1,1 do for x=10,xx,ecx do for y=10,yy,ecy do addFo(x,y,x*y,math.random(5)) end end end end -- next level if #fo<=0 and k==0 and fl<=0 and die==30 then pb=pb+1 k=1 bal=3 burn=0 fire=0 fl=30 for k,f in pairs(balle) do table.remove(balle,k) end for k,f in pairs(ba) do table.remove(ba,k) end for k,f in pairs(power) do table.remove(power,k) end if pb>1 then zero=start end end if #fo<=0 and k==0 and fl>=1 and die==30 then fl=fl-fll for k,f in pairs(ba) do table.remove(ba,k) end for k,f in pairs(power) do table.remove(power,k) end end -- game over if bal<=0 and #balle<=0 and die>=1 then k=0 ap=0 burn=0 pb=pb fire=0 die=die-1 for k,f in pairs(balle) do table.remove(balle,k) end for k,f in pairs(fo) do table.remove(fo,k) end for k,f in pairs(player) do table.remove(player,k) end for k,f in pairs(ba) do table.remove(ba,k) end for k,f in pairs(power) do table.remove(power,k) end end if bal<=0 and #balle<=0 and live>=1 and die<=0 then live=live-1 bal=3 ap=0 pb=pb k=1 fire=0 die=30 burn=0 for k,f in pairs(balle) do table.remove(balle,k) end for k,f in pairs(player) do table.remove(player,k) end for k,f in pairs(ba) do table.remove(ba,k) end for k,f in pairs(fo) do table.remove(fo,k) end for k,f in pairs(power) do table.remove(power,k) end zero=start end ---------- if live<=0 and die<=0 then live=3 bal=3 k=0 ap=0 pb=pb k=1 fire=0 burn=0 die=30 score.sc=score.sc-score.sc for k,f in pairs(balle) do table.remove(balle,k) end for k,f in pairs(player) do table.remove(player,k) end for k,f in pairs(ba) do table.remove(ba,k) end for k,f in pairs(fo) do table.remove(fo,k) end zero=over end -- Score if score.sc<=score.hisc then score.hisc=score.hisc elseif score.sc>score.hisc then score.hisc=score.hisc-score.hisc score.hisc=score.hisc+score.sc end -- score end -- burn if burn>=1 then bur=1 burn=burn-bb else bur=0 burn=0 end end -- level end function graphisme() cls(13) ticFo() ticBa() ticBalle() level() ticPlayer() if ap==0 then ap=1 addPlayer(x,y) end spr(256,210,128,0) print("x "..bal,220,130) spr(257,180,128,0) print("x "..live,190,130) print("Score: "..score.sc,5,1) print("High Score: "..score.hisc,140,1) t=t+1 end -- controle and touche function controle() if btn(0) then y=y-1 end if btn(1) then y=y+1 end if btn(2) then x=x-1 end if btn(3) then x=x+1 end end -- controle and touche end function TIC() zero() if zero==over then mm=0 else mm=1 end if mm==0 then music(0) else music(1) end end -- the differents scren function zero() cls(0) zero=menu end function menu() cls(0) ticBalle2() print("BREAKERS",30,20,8,4,4) print("Score: "..score.sc,5,1) print("High Score: "..score.hisc,140,1) if adb==0 then addBalle2(90,90) adb=1 end if m==1 then rectb(87,47,65,10,12) end if m==0 then rectb(87,57,55,10,12) end -- interface menu print("Start Game",90,50,15) print("Exit Game",90,60,15) if btnp(4) and m==1 then zero=start end if btnp(4) and m==0 then exit() trace("Thanks for play") trace("High Score: "..score.hisc) trace("odistudio4444@gmail.com") end if btnp(1)and m==1 then m=0 end if btnp(0)and m==0 then m=1 end end function start() cls(0) print("Score: "..score.sc,5,1) print("High Score: "..score.hisc,140,1) z=z+1 if z>=100 then zero=game z=0 end if pb>1 then print("level "..pb,90,70) circb(125,72,200-z*2,1) else print("Game Start",90,70) end end function over() cls(0) z=z+1 if z>=200 then zero=menu z=0 end print("Game Over",90,70) print("High Score",60,80,12,1,2) print(""..score.hisc,50,100,z,1,5) mm=0 end function game() graphisme() controle() t=t+1 end