Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - rcamp48

Pages: [1] 2 3 ... 5
1
QB64 Discussion / Re: Converting Atari Basic XE to QB 64
« on: February 04, 2022, 03:54:59 pm »
Yes I do have all of the data files , they are still available..... and that video is one of mine...lol
  [ You are not allowed to view this attachment ]  

2
QB64 Discussion / Converting Atari Basic XE to QB 64
« on: February 01, 2022, 09:49:39 pm »
I was wondering if it is possible to recreate the Atari version of Forem XE Professional to QB64? Atari Basic XE uses some of the same logic as QB64, and I was wondering if there is anyone out there that would want to take on this project, I have all of the Basic source code and it looks like it can be done, the idea is to get a BBS program for Forem PC (If anyone has Forem PC please leave me a message , but I do believe that it has been lost or it slipped through all of the cracks over the last 40 years, at least the code is available for Forem XE Pro, I have saved it as code on the PC, and will post it here.

  [ You are not allowed to view this attachment ]  


I do believe that this would be quite that challenge, so where better than here I will inlude all of the other files that it uses too... Russ

3
Programs / Russ's XFD to ATR Converter
« on: January 19, 2022, 04:15:06 pm »
I have successfully written an XFD to ATR converter for the PC for those Atari 8 Bit XFD files. The program is fairly fast , it will convert 180 programs in under 10 seconds. I am including both the zip file and the code, the zip file has the executable and source code, and the two directories that were used.

 
Code: QB64: [Select]
  1. Dim temp$(92160)
  2. Dim TEMP2$(92176)
  3. Dim HEADER$(16)
  4. Dim file$(50)
  5. Dim file2$(50)
  6. Dim path1$(120)
  7. Dim path2$(120)
  11. Color 1, 6
  12. start:
  15. Print "Quick and easy XFD to ATR Converter"
  16. Print "Written by Russ Campbell"
  17. Print "Copyright (c) 2022"
  19. Print "When entering your paths below"
  20. Print "Don't forget your drive [c:\XFD\]"
  21. Print "And don't forget proper ':' and  '\s' as above"
  23. Input "Please Enter your path for XFDs : ", path1$
  24. If Mid$(path1$, 2, 1) <> ":" Then
  25.     Print "Missing the ':' Character, try again."
  26.     Print "Press any key..."
  27.     Do While InKey$ = ""
  28.     Loop
  29.     GoTo start
  31. If Mid$(path1$, 3, 1) <> "\" Or Mid$(path1$, (Len(path1$))) <> "\" Then
  32.     Print "Missing the '\' Character, try again."
  33.     Print "Press any key..."
  34.     Do While InKey$ = ""
  35.     Loop
  36.     GoTo start
  38.  
  39. Input "Please Enter your path for ATRs : ", path2$
  40. If Mid$(path2$, 2, 1) <> ":" Then
  41.     Print "Missing the ':' Character, try again."
  42.     Print "Press any key"
  43.     Do While InKey$ = ""
  44.     Loop
  45.     GoTo start
  47. If Mid$(path2$, 3, 1) <> "\" Or Mid$(path2$, (Len(path2$))) <> "\" Then
  48.     Print "Missing the '\' Character, try again."
  49.     Print "Press any key"
  50.     Do While InKey$ = ""
  51.     Loop
  52.     GoTo start
  54.  
  55. header$ = "0000000000000000"
  56. For i = 1 To 16
  57.     Read x
  58.     Mid$(header$, i, 1) = Chr$(x)
  60. Data 150,2,128,22,128,0,0,0,0,0,0,0,0,0,0,0
  61. Shell _Hide Chr$(34) + "dir /b " + path1$ + "*.xfd >directory.txt" + Chr$(34)
  63. Open "directory.txt" For Input As #1
  65.  
  66.  
  67.  
  68.     Input #1, a$
  69.     file$ = a$
  70.     'On Error GoTo FINISH
  71.  
  72.     Open path1$ + file$ For Binary As #2
  73.     temp$ = Space$(LOF(2)) 'set temp$ to be the size of the file, if you want to get the whole thing at once.
  74.     Get #2, , temp$ 'get the whole array
  75.     Close #2
  76.     temp2$ = header$ + temp$
  77.     file2$ = file$
  78.  
  79.     Mid$(file2$, (Len(file2$) - 3), 4) = ".atr"
  80.     Print "Header added to "; path1$; file$
  81.     Print "Saved as       "; path2$; file2$
  82.     Print "Length of "; file2$; " = "; Len(temp2$)
  83.     Open path2$ + file2$ For Binary As #2
  84.     Put #2, , temp2$
  85.  
  86.  
  87.     Close #2
  89.  
  90. FINISH:
  92. Print "Program finished, if you reached this in error "
  93. Print "Check your xfd and atr paths."
  96. Shell _Hide Chr$(34) + "erase directory.txt" + Chr$(34)
  97.  
  99.  

4
QB64 Discussion / Trying to load an Atari disk image into memory
« on: January 19, 2022, 08:04:45 am »
Code: Text: [Select]
  1.  

Hi: I am trying to load a headerless binary file into memory (92160 K) , then preattach a header to it, basically load inn an xfs file as binary then write it back out as binary as an atr file.
The code I am using in the above section does not work. All I get is spaces.

Russ

5
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 10, 2021, 01:19:13 pm »
Ya no problem , I get sound and video, but I am using VLC for video and Wavepad soon enough for audio with the program I modified.... i belive it is yours...

6
Programs / Re: Audio and Video Player Combined into One File
« on: February 09, 2021, 06:28:09 am »
None of it is nesessary anymore I changed over to VLC media player, this video shows it off

https://youtu.be/_ArRp1L1UpI

7
Programs / Re: Audio and Video Player Combined into One File
« on: February 08, 2021, 09:11:46 pm »
You will notice that the video player bombs if there are spaces in the filenames, here is a script file for bulk renaming of files with spaces:

 

That should solve problems with spaces in filenames.............

Russ

8
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 08, 2021, 08:13:34 pm »
One thing I noticed in the current version is that you cannot have any spaces in the filenames for the wmv or mpg files to play, can someone fix this?

9
Programs / Re: Audio and Video Player Combined into One File
« on: February 08, 2021, 04:59:24 pm »
Yes I noticed that too...they won't play but I can convert them, I have a paid version of Switch, it just takes soooo long.

Russ

10
Programs / Audio and Video Player Combined into One File
« on: February 08, 2021, 03:54:45 pm »
Hello All

This is a huge leap forward, this file will play audio files and video files, IF the video files are WMV files , It will play MP3 files, Wave files in stereo only, I am working on surround sound bt that may take some time.

This is not really my work , all of the credit goes to other people who have written various sections of code, I just combined them all into one file.

Russ

 
 


11
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 08, 2021, 01:56:32 pm »
That would be good Dave, do you have the latest version? I am slowly converting avis to mpg files, like some of the disney anime stuff, will post one if its works, and yes can you post that dll for me , I seem to need it, I get a black screen with sound.

12
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 08, 2021, 12:57:39 pm »
Some how andsome way I found this program for playing video files, but I get a black screen...the code is short and I can't seem to find the original post for it.

  [ You are not allowed to view this attachment ]

I try to play a big video, I believe its John Fogerty in concert from 1977 or around there somewhere.

13
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 08, 2021, 12:24:30 pm »
It does not load, mind you the file is saved at 192,00 hz, 6 channels and is the full album, so that may overlaod it, but I have 16 GB of RAM and the latest nightly of QB64.

14
QB64 Discussion / Re: Upcoming feature (v1.5) - _MEMSOUND (Hi, Petr!)
« on: February 08, 2021, 03:49:54 am »
I there a way to load _MEMSOUND to play ogg files with 6 channels of sound? I am working on this now.
Or is stereo the limit?

Russ

15
QB64 Discussion / Re: Is there a player for Surround Sound 5.1 ?
« on: February 08, 2021, 12:59:14 am »
I have worked on getting surround sound to work, but am not too sure about it, here is my latest attempt.

It only uses the .h file

  [ You are not allowed to view this attachment ]  

  [ You are not allowed to view this attachment ]  

Russ

Pages: [1] 2 3 ... 5