Guru
Joined: 28/05/2012
Location: GermanyPosts: 1141
| Posted: 10:22am 16 Jan 2024 |
Hi,
I have two problems. First the more important problem:
My SPO256 emulation (https://www.thebackshed.com/forum/ViewTopic.php?FID=16&TID=15431#195775) only works a few times. Then I get this error here:
[66] Play WAV "A:\SPO256Phonemes\"+wav$+".wav",IROUTINE
Error : Not enough memory
>
Error : Not enough memory
>
Before that, the program worked endlessly!
This is the current program:
Option Explicit
Dim WAVbusy As INTEGER
Const TRUE=1
Const FALSE=0
Print "Play"
Do
PlayWAV "2Eh"
PlayWAV "0Fh"
PlayWAV "0Bh"
PlayWAV "0Dh"
PlayWAV "1Fh"
PlayWAV "1Dh"
PlayWAV "33h"
PlayWAV "13h"
PlayWAV "28h"
PlayWAV "35h"
PlayWAV "33h"
PlayWAV "28h"
PlayWAV "06h"
PlayWAV "23h"
Pause 1000
PlayWAV "1Bh"
PlayWAV "07h"
PlayWAV "2Dh"
PlayWAV "35h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "0Dh"
PlayWAV "1Fh"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "12h"
PlayWAV "13h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "3Fh"
PlayWAV "1Ah"
PlayWAV "0Dh"
PlayWAV "29h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "25h"
PlayWAV "07h"
PlayWAV "0Dh"
PlayWAV "1Dh"
PlayWAV "03h"
PlayWAV "02h"
Pause 1000
'Loop
'Do
PlayWAV "hh2"
PlayWAV "aa"
PlayWAV "ll"
PlayWAV "ll"
PlayWAV "ow"
Pause 1000
Loop
Sub PlayWAV wav$
WAVbusy=TRUE
'Play WAV "B:\SPO256Phonemes\"+wav$+".wav",IROUTINE
Play WAV "A:\SPO256Phonemes\"+wav$+".wav",IROUTINE
Do
Loop While Wavbusy=TRUE
End Sub
Sub IROUTINE
WAVbusy=FALSE
End Sub
Dim WAVbusy As INTEGER
Const TRUE=1
Const FALSE=0
Print "Play"
Do
PlayWAV "2Eh"
PlayWAV "0Fh"
PlayWAV "0Bh"
PlayWAV "0Dh"
PlayWAV "1Fh"
PlayWAV "1Dh"
PlayWAV "33h"
PlayWAV "13h"
PlayWAV "28h"
PlayWAV "35h"
PlayWAV "33h"
PlayWAV "28h"
PlayWAV "06h"
PlayWAV "23h"
Pause 1000
PlayWAV "1Bh"
PlayWAV "07h"
PlayWAV "2Dh"
PlayWAV "35h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "0Dh"
PlayWAV "1Fh"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "12h"
PlayWAV "13h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "3Fh"
PlayWAV "1Ah"
PlayWAV "0Dh"
PlayWAV "29h"
PlayWAV "03h"
PlayWAV "02h"
PlayWAV "25h"
PlayWAV "07h"
PlayWAV "0Dh"
PlayWAV "1Dh"
PlayWAV "03h"
PlayWAV "02h"
Pause 1000
'Loop
'Do
PlayWAV "hh2"
PlayWAV "aa"
PlayWAV "ll"
PlayWAV "ll"
PlayWAV "ow"
Pause 1000
Loop
Sub PlayWAV wav$
WAVbusy=TRUE
'Play WAV "B:\SPO256Phonemes\"+wav$+".wav",IROUTINE
Play WAV "A:\SPO256Phonemes\"+wav$+".wav",IROUTINE
Do
Loop While Wavbusy=TRUE
End Sub
Sub IROUTINE
WAVbusy=FALSE
End Sub
(The corresponding WAVs are in the link above...)
It doesn't matter whether I play the WAV from the internal drive or from the SD card.
My second problem concerns the color display with Terra Term.
I have inverted the color scheme because I can read better on the light background.
So far this has not been a problem. In the editor, the font (instead of black) was ONLY displayed in a more illegible light gray with OPTION COLORCODE ON.
With OPTION COLORCODE OFF, or when you left the editor, the font was crisp black again.
Now, however, it is illegible light gray even with COLORCODE switched off and after exiting the editor.
However, when restarting (before calling the editor), the font is black...
This is what it looks like in the editor:
This is what it looks like after leaving the editor:
The WAV problem and the editor problem already existed with PicoMite_Beta V5.08.00b5, but I only noticed it in the last few days.
With PicoMite MMBasic version 5.07.06b9 I had at least no problems...
Oh yes, I use a RP2040 Geek with the following options:
> Option List
PicoMite MMBasic Version 5.08.00RC3
OPTION SYSTEM SPI GP10,GP11,GP28
OPTION FLASH SIZE 4194304
OPTION COLOURCODE ON
OPTION HEARTBEAT OFF
OPTION PICO OFF
OPTION LCDPANEL ST7789_135, LANDSCAPE,GP8,GP12,GP9,GP25
OPTION SDCARD GP23, GP18, GP19, GP20
OPTION AUDIO GP2,GP3', ON PWM CHANNEL 1
>
PicoMite MMBasic Version 5.08.00RC3
OPTION SYSTEM SPI GP10,GP11,GP28
OPTION FLASH SIZE 4194304
OPTION COLOURCODE ON
OPTION HEARTBEAT OFF
OPTION PICO OFF
OPTION LCDPANEL ST7789_135, LANDSCAPE,GP8,GP12,GP9,GP25
OPTION SDCARD GP23, GP18, GP19, GP20
OPTION AUDIO GP2,GP3', ON PWM CHANNEL 1
>
Frank