Accueil Ti-Gen Foire Aux Questions Chat sur le chan #tigcc sur IRC
Liste des membres Rechercher Aide
Bienvenue Invité !   Se connecter             Mes sujets   
Administrer
0 membre(s) et 1 visiteur(s) actif(s) durant les 5 dernières minutes Utilisateurs actifs : Aucun membre + 1 visiteur
Avant de poster sur le forum, il y a des régles de bases à respecter pour une bonne entente et un respect de tous.
Veuillez lire la charte du forum.
  :: Index » Forum Ti68K » Betas et WIPs » Speedway (24 réponse(s))
./REPRISE DU POST PRECEDENT (post n°19)   Marquer comme non lu.
geogeo Ecrit le: Lundi 8 novembre 2004 à 23:00 Déconnecté(e)    Voir le profil de geogeo Envoyer un email à geogeo Visiter le site WEB de geogeo Envoyer un message privé à geogeo  


Nounours> Voilà ce que j'utilise pour GFA Basic, bien sûr c'est un exemple.

TEM_Init_Interrupts:
    |Sauvegardes les interruptions
    move.l    #0x64,%a0
    move.l    #0x68,%a1
    move.l    #0x74,%a2
    
    move.l    (%a0),OldInt1
    move.l    (%a1),OldInt2
    move.l    (%a2),OldInt5
    
    |Modification de la table des interruption Auto-Ints (1, 2, 5)
    bclr.b    #2,0x600001        |Désactive protection en écriture
    move.l    #Interrupt1,(%a0)
    move.l    #Interrupt2,(%a1)
    move.l    #__dummy_handler__,(%a2)
    bset.b    #2,0x600001        |Active protection en écriture
    move.w    #-1,SetInts
    rts

Interrupt1, Interrupt2 et __dummy_handler__ sont des fonctions leur point communs et le suivant, elle se terminent toutes par rte et non rts et ensuite elles sont de la même formes, c'est à dire un début qui définie les priorités d'éxecutions des interruptions et la sauvegardes et restaurations des registres.

Interrupt2:
    move.w    #0x2700,%SR
    movem.l  %d0-%d7/%a0-%a6-(%SP)
    ... code de l'interruption
    movem.l   (%SP)+,%d0-%d7/%a0-%a6
    rte


Et enfin le code qui remet les interruptions du TIOS:
TEM_Uninit_Interrupts:
    |Les interruptions ont été modifiées?
    move.w    SetInts (%PC),%d0
    tst.w     %d0
    jbeq      _Uninit_Interrupts_end
    
    bclr.b    #2,0x600001        |Désactive protection en écriture
    move.l    OldInt1(%PC),0x64
    move.l    OldInt2(%PC),0x68
    move.l    OldInt5(%PC),0x74
    bset.b    #2,0x600001        |Active protection en écriture
_Uninit_Interrupts_end:
    rts


Le code n'est pas optimisé à mort mais c'est inutile, de plus il a le mérite d'être facile à comprendre et de fonctionner même sur TI89T!
Webmaster du site.
Programmeur sur TI68K. Arkanoid, Nebulus, GFA-Basic.

Plus d'informations sur GFA-Basic (un langage Basic pour TI68K).
http://www.tigen.org/gfabasic
    
./Post n°20   Marquer comme non lu.
Onur Ecrit le: Mardi 9 novembre 2004 à 00:54 Déconnecté(e)    Voir le profil de Onur Envoyer un email à Onur Visiter le site WEB de Onur Envoyer un message privé à Onur  


#banane# #biz# #love#

J'aime les réponses complètes! #oui#
Je ne veux pas faire quelque chose de bien, je cherche l'excellence:ETP Studio...


et autres projets à finir avant 2010
    
./Post n°21   Marquer comme non lu.
EJC2810 Ecrit le: Jeudi 11 novembre 2004 à 22:22 Déconnecté(e)    Voir le profil de EJC2810 Envoyer un email à EJC2810 Envoyer un message privé à EJC2810  

Bon ben cool, ETP va pouvoir avancer! :)
Pour revenir à Speedway, je vais créer une section spéciale pour ce projet (avec screenshots, etc...) sur mon site #top#
Je pense que tout sera en ligne ce soir.
Mais vous pouvez toujours y aller pour voir la magnifique mise à jour de mon site. J'ai complètement changé l'aspect visuel. L'adresse a pas changée!: http://www.j-progs.new.fr :D
    
./Post n°22   Marquer comme non lu.
Onur Ecrit le: Vendredi 26 novembre 2004 à 09:17 Déconnecté(e)    Voir le profil de Onur Envoyer un email à Onur Visiter le site WEB de Onur Envoyer un message privé à Onur  



j'ai fait ton truc geogeo mais ca desactive le ndg! (je crois que c'est l'autoint 1 qui le desactive)
Je ne veux pas faire quelque chose de bien, je cherche l'excellence:ETP Studio...


et autres projets à finir avant 2010
    
./Post n°23   Marquer comme non lu.
LionelA Ecrit le: Vendredi 26 novembre 2004 à 09:21 Déconnecté(e)    Voir le profil de LionelA Envoyer un email à LionelA Visiter le site WEB de LionelA Envoyer un message privé à LionelA  


Bien sur, les niveaux de gris se servent de l'auto int 1 pour fonctionner. C'est dit dans la doc de tigcc qu'il faut rediriger l'autoint1 avant de faire grayOn() sinon ca ne marche pas :)
Auteur de Mode7 Engine pour ti68k
Auteur de F-ZERO for TI68k
Membre de Orage Studio
Mon site perso : http://www.tigen.org/lionela/
Le gite de mes parents à coté de Narbonne :
http://chaletdenis.free.fr/
    
./Post n°24   Marquer comme non lu.
Kevin Kofler Ecrit le: Vendredi 26 novembre 2004 à 10:06 Déconnecté(e)    Voir le profil de Kevin Kofler Envoyer un email à Kevin Kofler Visiter le site WEB de Kevin Kofler Envoyer un message privé à Kevin Kofler  


Ou alors Gray[GS]etInt1Handler.
Membre de l'équipe de TIGCC: http://tigcc.ticalc.org
Mainteneur du portage Linux/Unix de TIGCC: http://tigcc.ticalc.org/linux/
Membre de l'équipe de CalcForge: http://www.calcforge.org:70/

Participez à la reprise de Ti-Gen!
    
  :: Index » Forum Ti68K » Betas et WIPs » Speedway (24 réponse(s))
Pages : 2/2     « 1 [2] » »|

.Répondre à ce sujet
Les boutons de code
[B]old[I]talic[U]nderline[S]trikethrough[L]ine Flip Hori[Z]ontallyFlip [V]erticallySha[D]ow[G]low[S]poilerCode [G][C]ite
Bullet [L]istList Item [K] Link [H][E]mail[P]icture SmileysHelp
Couleurs :
Saisissez votre message
Activer les smileys
     

Forum de Ti-Gen v3.0 Copyright ©2004 by Geoffrey ANNEHEIM
Webmaster: Kevin KOFLER, Content Admins: list, Server Admins: Tyler CASSIDY and Kevin KOFLER, DNS Admin: squalyl
Page générée en 61.65ms avec 18 requetes