Alice 32 "besoin d'aide"

Tous les tutos concernant RocketLauncher.

Modérateurs : Nabubokon, Porko, Thesalan, Modérateurs

Avatar de l’utilisateur
micaelo14
Modérateur
Modérateur
Messages : 3379
Inscription : 19 oct. 2012 - 01:00
Localisation : Centre
A remercié : 98 fois
A été remercié : 165 fois

Alice 32 "besoin d'aide"

Message par micaelo14 » 28 avr. 2016 - 11:10

Hors-sujet
Retrouvez ce tutoriel sur le wiki HFS : Ajout du système Alice 32
Ajouté le 04/02/2017
Alice 32

Image
Descriptif
Alice est un micro-ordinateur fabriqué par l'entreprise française Matra-Hachette, vendu à partir de 1983. C'est un clone d'un micro-ordinateur américain de la firme Tandy, le MC-10.

Il est construit autour d'un processeur Motorola 6803 (8 bits de données, 16 bits d'adresse).

Il dispose dans sa version initiale de 4 kibioctet de mémoire, d'une interface série, d'un bus d'extension et d'une sauvegarde sur cassette audio externe. Un petit clavier est intégré à l'unité centrale. Celle-ci affiche ses résultats sur une télévision, via une prise péritel comme beaucoup de micro-ordinateurs de sa génération.

Il se programme comme tous les autres micro-ordinateurs de l'époque en langage BASIC et en assembleur pour les versions 32 et 90.

Une évolution d'Alice a été proposée en 1984 sous la référence Alice 32, dans un boitier quasiment identique, la différence réside essentiellement dans la quantité de mémoire vive et les possibilités d'affichage. En 1985, un dernier essai est réalisé, Alice 90, cette fois facilement reconnaissable grâce à un design bien particulier.

Matra tenta de commercialiser une nouvelle machine via le plan informatique pour tous, L'Alice 8000, c'est Thomson qui obtint le marché, les Alice 8000 déjà fabriqués (environ 250) furent détruits.
Utiliser ce module:
Module
MEmu = DCAlice
MEmuV = v2014.01.23
MURL = http://alice32.free.fr/" onclick="window.open(this.href);return false;
MAuthor = brolly
MVersion = 2.0.0
MCRC = 67E9CD38
iCRC = 96B57889
mId = 635535810894136267
MSystem = "Matra & Hachette Alice"
;------------------------------------------------------------------------
; Notes:
; The emu will be in french until you click Options -> Parametres -> Langue -> Anglais, then hit OK.
; Roms must be unzipped
;------------------------------------------------------------------------
StartModule()
BezelGUI()
FadeInStart()

settingsFile := modulePath . "\" . moduleName . ".ini"
Fullscreen := IniReadCheck(settingsFile, "settings", "Fullscreen","true",,1)
RestoreTaskbar := IniReadCheck(settingsFile, "settings", "RestoreTaskbar","true",,1)
Model := IniReadCheck(settingsFile, "Settings" . "|" . romName, "Model", "alice32",,1)
Command := IniReadCheck(settingsFile, romName, "Command", "CLOAD+RUN",,1)

DefaultAliceModelIni := emuPath . "\dcalice.ini"
AliceModelIni := emuPath . "\dcalice_" . Model . ".ini"

If FileExist(AliceModelIni)
FileCopy, %AliceModelIni%, %DefaultAliceModelIni%, 1
Else
Log("Module - Couldn't find file : " . AliceModelIni . " using dcalice.ini instead")

dialogOpen := i18n("dialog.open") ; Looking up local translation

BezelStart()

hideEmuObj := Object(dialogOpen . " ahk_class #32770",0,"ahk_class DCAlice",1) ;Hide_Emu will hide these windows. 0 = will never unhide, 1 = will unhide later
7z(romPath, romName, romExtension, 7zExtractPath)

HideEmuStart()
Run(executable, emuPath)

WinWait("ahk_class DCAlice")
WinActivate, ahk_class DCAlice
Sleep, 100

PostMessage, 0x111, 9001,,,ahk_class DCAlice
OpenROM(dialogOpen . " ahk_class #32770", romPath . "\" . romName . romExtension)

WinWaitActive("ahk_class DCAlice")
Sleep, 500 ; increase If CLOAD is not appearing in the emu window or some just some letters

If (Model == "mc10")
StartCommand := If Command = "CLOAD+RUN" ? "cload{Enter}run{Enter}" : "cloadm{Enter}{Wait:1500}exec{Enter}"
Else
StartCommand := If Command = "CLOAD+RUN" ? "cloqd{Enter}run{Enter}" : "cloqd{vkC0sc027}{Enter}{Wait:1500}exec{Enter}"

SetKeyDelay(50)
SendCommand(StartCommand) ;This will type CLOAD in the screen (french systems are AZERTY so q=a)

If Fullscreen = true
Send, {PGUP}

BezelDraw()
HideEmuEnd()
FadeInExit()
Process("WaitClose", executable)
7zCleanUp()
BezelExit()
FadeOutExit()

If RestoreTaskbar = true
WinShow, ahk_class Shell_TrayWnd

ExitModule()


HaltEmu:
Send, {Alt down}{Alt up}
Return

RestoreEmu:
WinRestore, ahk_class DCAlice
WinActivate, ahk_class DCAlice
If Fullscreen = true
Send, {PGUP} ;PgDown gets back to windowed mode
Return

CloseProcess:
FadeOutStart()
Send, {Alt down}{Alt up}
WinClose("ahk_class DCAlice")
Return
Utiliser l'émulateur DcAlice en version v2014.01.23

Paramétrer RL ainsi:

Image

Pour lancer les jeux il faut retaper manuellement du fait que l'émulateur se lance en qwerty, si quelqu'un a une solution

Avatar de l’utilisateur
andric31
Maître
Maître
Messages : 4447
Inscription : 14 sept. 2014 - 01:00
Localisation : Entre mer et montage
A remercié : 582 fois
A été remercié : 450 fois

Re: Alice 32 "besoin d'aide"

Message par andric31 » 30 avr. 2016 - 17:53

Yop,
ça résout surement pas le problème mais dans le fichier ini (du dossier du module)

[settings]
Fullscreen=false
MLanguage=french
RestoreTaskbar=false
SelectGameMode=1

rien n'empêche de passe en french

Avatar de l’utilisateur
micaelo14
Modérateur
Modérateur
Messages : 3379
Inscription : 19 oct. 2012 - 01:00
Localisation : Centre
A remercié : 98 fois
A été remercié : 165 fois

Re: Alice 32 "besoin d'aide"

Message par micaelo14 » 30 avr. 2016 - 19:08

Oui pas de soucis !

Avatar de l’utilisateur
moustic
Administrateur
Administrateur
Messages : 6938
Inscription : 23 juil. 2014 - 01:00
Localisation : Saint Jean Rohrbach
A remercié : 333 fois
A été remercié : 677 fois

Re: Alice 32 "besoin d'aide"

Message par moustic » 30 avr. 2016 - 20:10

Et ça ?

Notes:
; The emu will be in french until you click Options -> Parametres -> Langue -> Anglais, then hit OK.
; Roms must be unzipped
Image

Avatar de l’utilisateur
micaelo14
Modérateur
Modérateur
Messages : 3379
Inscription : 19 oct. 2012 - 01:00
Localisation : Centre
A remercié : 98 fois
A été remercié : 165 fois

Re: Alice 32 "besoin d'aide"

Message par micaelo14 » 02 mai 2016 - 17:41

Change rien!

Avatar de l’utilisateur
doozerhhh
Connaisseur
Connaisseur
Messages : 239
Inscription : 16 déc. 2012 - 00:00
A remercié : 4 fois
A été remercié : 5 fois

Re: Alice 32 "besoin d'aide"

Message par doozerhhh » 27 mai 2016 - 06:52

moi ca fonctionne bien avec ce module

Emu = DCAlice
MEmuV = v2014.01.23
MURL = http://alice32.free.fr/" onclick="window.open(this.href);return false;
MAuthor = brolly
MVersion = 2.0.2
MCRC = AEB19034
iCRC = 96B57889
mId = 635535810894136267
MSystem = "Matra & Hachette Alice"
;------------------------------------------------------------------------
; Notes:
; The emu will be in french until you click Options -> Parametres -> Langue -> Anglais, then hit OK.
; Roms must be unzipped
;------------------------------------------------------------------------
StartModule()
BezelGUI()
FadeInStart()

dialogOpen := i18n("dialog.open") ; Looking up local translation

primaryExe := new Emulator(emuPath . "\" . executable) ; instantiate emulator executable object
emuPrimaryWindow := new Window(new WindowTitle("","DCAlice")) ; instantiate primary emulator window object
emuOpenWindow := new Window(new WindowTitle(dialogOpen,"#32770"))

Fullscreen := moduleIni.Read("settings", "Fullscreen","true","",1)
RestoreTaskbar := moduleIni.Read("settings", "RestoreTaskbar","true","",1)
Model := moduleIni.Read(romName . "|Settings", "Model", "alice32","",1)
Command := moduleIni.Read(romName, "Command", "CLOAD+RUN","",1)

DefaultAliceModelIni := emuPath . "\dcalice.ini"
AliceModelIni := new File(emuPath . "\dcalice_" . Model . ".ini")

If AliceModelIni.Exist()
AliceModelIni.Copy(DefaultAliceModelIni,1)
Else
RLLog.Info("Module - Couldn't find file : " . AliceModelIni . " using dcalice.ini instead")

BezelStart()

hideEmuObj := Object(emuOpenWindow,0,emuPrimaryWindow,1)
7z(romPath, romName, romExtension, sevenZExtractPath)

HideAppStart(hideEmuObj,hideEmu)
primaryExe.Run()

emuPrimaryWindow.Wait()
emuPrimaryWindow.WaitActive()
TimerUtils.Sleep(100)

emuPrimaryWindow.PostMessage("0x111","9001") ; Opens Load Tape window
emuOpenWindow.OpenROM(romPath . "\" . romName . romExtension)

emuPrimaryWindow.WaitActive()
TimerUtils.Sleep(500) ; increase If CLOAD is not appearing in the emu window or some just some letters

If (Model = "mc10")
StartCommand := If Command = "CLOAD+RUN" ? "cload{Enter}{Wait:1500}run{Enter}" : "cloadm{Enter}{Wait:1500}exec{Enter}"
Else
StartCommand := If Command = "CLOAD+RUN" ? "cload{Enter}{Wait:1500}run{Enter}" : "cload{vkC0sc027}{Enter}{Wait:1500}exec{Enter}"

KeyUtils.SetKeyDelay(50)
KeyUtils.SendCommand(StartCommand) ; This will type CLOAD in the screen (french systems are AZERTY so q=a)

If (Fullscreen = "true")
KeyUtils.Send("{PGUP}")

BezelDraw()
HideAppEnd(hideEmuObj,hideEmu)
FadeInExit()
primaryExe.Process("WaitClose")
7zCleanUp()
BezelExit()
FadeOutExit()

If (RestoreTaskbar = "true")
MiscUtils.TaskBar("on")

ExitModule()


HaltEmu:
KeyUtils.Send("{Alt down}{Alt up}")
Return

RestoreEmu:
emuPrimaryWindow.Restore()
emuPrimaryWindow.Activate()
If (Fullscreen = "true")
KeyUtils.Send("{PGUP}") ; PgDown gets back to windowed mode
Return

CloseProcess:
FadeOutStart()
KeyUtils.Send("{Alt down}{Alt up}")
emuPrimaryWindow.Close()
Return

Avatar de l’utilisateur
doozerhhh
Connaisseur
Connaisseur
Messages : 239
Inscription : 16 déc. 2012 - 00:00
A remercié : 4 fois
A été remercié : 5 fois

Re: Alice 32 "besoin d'aide"

Message par doozerhhh » 14 juin 2016 - 06:18

il faut laisser l emulateur en francais et cocher la case alice90+disk

Répondre

Revenir à « Tutos pour RocketLauncher »