C'est B0 !

Samuel Devulder

Voici un nouveau quizz.

Saurez vous trouver de quelle démo relativement récente du site http://www.pouet.net le programme thomson suivant est un portage?

Code:

****************************************
* debut  : $8000
* fin    : $80AF
* taille : 176
****************************************

        org     $8000

init    fcb     $CE,$80,$A1,$37,$38
        fcb     $E6,$C0,$BD,$E8,$03
        fcb     $26,$F9,$E7,$01,$E7
        fcb     $84,$E7,$84,$CB,$10
        fcb     $26,$F8,$56,$E7,$A0
        fcb     $26,$FB,$3D,$A7,$A0
        fcb     $40,$A7,$A8,$7F,$CC
        fcb     $FF,$00,$C3,$FE,$02
        fcb     $DD,$23,$26,$EF,$8D
        fcb     $13,$80,$08,$CB,$08
        fcb     $8D,$0D,$8B,$09,$C0
        fcb     $09,$BD,$E8,$09,$24
        fcb     $EF,$6E,$9F,$FF,$FE
        fcb     $34,$06,$DD,$92,$20
        fcb     $07,$CC,$00,$00,$8B
        fcb     $07,$C0,$03,$DD,$48
        fcb     $A6,$A6,$AB,$A5,$8B
        fcb     $64,$2D,$39,$81,$C8
        fcb     $24,$35,$C6,$28,$3D
        fcb     $8B,$40,$1F,$01,$DC
        fcb     $92,$A6,$A6,$AB,$A5
        fcb     $1F,$89,$57,$57,$57
        fcb     $CB,$14,$3A,$84,$07
        fcb     $A6,$C6,$C6,$00,$C4
        fcb     $FF,$26,$05,$43,$A4
        fcb     $84,$20,$0F,$54,$C4
        fcb     $78,$C8,$C0,$7A,$E7
        fcb     $C3,$E7,$84,$7C,$E7
        fcb     $C3,$AA,$84,$A7,$84
        fcb     $CC,$00,$00,$5A,$80
        fcb     $07,$DD,$92,$0C,$76
        fcb     $26,$AA,$03,$78,$35
        fcb     $86,$80,$E7,$DA,$80
        fcb     $B0,$1B,$50,$1B,$60
        fcb     $14,$0C,$51,$42,$3F
        fcb     $00

        end     init

Pour vous aider sachez qu'un indice est affiché quand la démo tourne et pour ceux qui n'ont pas envie de saisir le code, voici une archive avec le programme:

Fichier(s) joint(s):

quizz.zip [8.48 Kio]
Téléchargé 217 fois

Nota:
1) L'appui sur une touche fait retourner au menu.
2) Le prog est compatible tout TO, mais il faut utiliser un TO8,9 ou 9+ pour avoir la palette d'origine.
3) Le prog fait 176 octets. C'est bien moins que les 26ko de l'exe de la version de pouet!
4) 176 octets c'est $B0... d'où le titre

sam (Small is beautiful)

Prehisto

Franchement, aucune idée. Mais c'est très impressionnant (comme toujours avec tes programmes). Combien de points affichés simultanément ?

Samuel Devulder

256*8 mais tous ne bougent pas à chaque image. Il y a un truc comme dans les jeux de milles-pattes pour faire croire qu'il y a du mouvement de masse. En pratique à chaque tour, 512 points sont allumés ou éteints. Je donnerais plus d'infos quand je fournirais le source. Il contient quelque trucs sympa de programmation.

Si j'avais été plus inspiré j'aurais pu présenter ce prog à la Forever, mais comme je n'ai plus tellement d'idées nouvelles, j'ai du attendre que quelqu'un produise un truc avec code source de haut niveau (indice!) pour que je me dise que c'est parfaitement adaptable sur Thomson. Si seulement il avait publié sa démo 3 mois plus tôt (re-indice), on aurait pu avoir une autre production Thomson qui aurait sans doute terminée 1er (re-re-indice)! J'ai une idée pour réparer ca, mais il me faut trouver avant où j'ai garé ma DeLorean avant

(back to cyberspace?)

Par contre comme la démo tient sur un secteur disk, il n'est pas exclus que je le place dans le bootblock de certaines D7 pour rigoler.

Samuel Devulder

Alors toujours pas de réponses ?

Je vais laisser du temps (mais je sais qu'ailleurs certains ont déjà trouvés. J'ai semble-t-il donné trop d'indices

)

Prehisto

Si certains ont trouvé, c'est qu'ils sont bien informés côté démos. Pour ma part, je donne ma langue au chat

Samuel Devulder

Il y a plein d'indices dans mes messages. Avant de publier le code source je vais laisser un peu de temps à Pulkomandy...

Prehisto

Bon, je me lance.

SineDots par g0blinish présenté à la QB party en mai 2015 ?

Samuel Devulder

Yep bravo! :bien:

C'etait facile avec les indices (3 mois après la forever, le QB? en haut pour "quick basic ou pas?", etc) je pense.

L'effet rendrait mieux avec une palette thomson plus linéaire, mais sinon cet effet est plutôt cool. Il est rapide, marche partout en n'occupe quasiment pas de RAM (on pourrait en faire un encore plus économe en ram, mais il serait plus lent).

Je vais coller ici plus tard le code source et discuter des trucs que j'y ai mis (essentiellement un calcul de 63*sin(x) hyper rapide et compact).

Prehisto

Samuel Devulder a écrit:

on aurait pu avoir une autre production Thomson qui aurait sans doute terminée 1er

Je le pense aussi. Mais sans musique? Il ne te reste plus qu'à faire quelque chose d'autre sur le même principe.

Samuel Devulder

Oui sur les 1ko, il reste presque 800octets pour de la musique. Hummm.. mais on a une table de sinus gratos à exploiter. Ah ouais... idée à garder dans un coin.

A noter cependant que le sindots de g0blinish est silencieux (et en basic). Le portage des trucs en basic PC vers de assembleur thomson semble bien préserver le facteur vitesse.

Samuel Devulder

Samuel Devulder a écrit:

Je vais coller ici plus tard le code source et discuter des trucs que j'y ai mis (essentiellement un calcul de 63*sin(x) hyper rapide et compact).

heuuu.. mince, on est plus tard et j'ai toujours pas collé le code source. Mais où est il dans mon b*rdel ??

Logicielsmoto.com

C'est B0 !

Qui est en ligne