Jump to content

576XE

Members
  • Posts

    848
  • Joined

  • Last visited

Everything posted by 576XE

  1. Hello, Friends. I'd like to know how they achived the clear vertical text screen splitting like this... https://dl.dropboxus...833/vSplit.png. My investigations ended up with this silly screen https://dl.dropboxus...833/MySplit.png. I may suppose that this technology is very useful for a lot of purposes. Any help will be highly appreciated.
  2. Demo Menu,written in Basic XE. Use only with Extentions Disk. Here is Code. 100 Rem OSS Basic XE Demo Menu 110 Rem ... INITIALIZATION 120 Dim Vm$(6,12) 130 Vm$(1;)=" Moscow " 140 Vm$(2;)=" Petersburg " 150 Vm$(3;)=" Evpatoria " 160 Vm$(4;)=" Feodosia " 170 Vm$(5;)=" Simeiz " 180 Vm$(6;)=" Konakovo " 190 Rem 200 Rem ... Constants 210 X=4:Y=2:Minc=1:Maxc=6:Cur=752:Kbd=764:Cls=125:Unp=255 220 Esc=28:Ret=12:Up=14:Ctrlup=142:Dn=15:Ctrldn=143:Off=1 230 Rem 240 Rem ... Variables 250 D=0:C=Minc:F=0 260 Rem 270 Rem ... PREPARATIONS 280 Poke Cur,Off: ? Chr$(Cls) 290 Call "ShowVM" Using X,Y,Minc,Maxc 300 Call "SetCur" Using X,Y,C 1000 Rem 1010 Rem ... MAIN LOOP 1020 K=Peek(Kbd):If K=Unp Then 1020: Rem Getkey... 1030 If K=Esc Then 1999: Rem to Quit 1040 If K=Ret Then Position 12,12: Normal: ? Vm$(C;): Goto 1110 1050 D=(K=Dn Or K=Ctrldn)-(K=Up Or K=Ctrlup) 1060 If D=0 Then Position 12,12: Normal: ? " Bad Entry !": Goto 1110 1070 Call "ClrCur" Using X,Y,C: C=C+D 1080 If C<Minc Then C=Minc 1090 If C>Maxc Then C=Maxc 1100 Call "SetCur" Using X,Y,C 1110 Poke Kbd,Unp: Goto 1020: Rem to Getkey... 1120 Rem 1130 Rem QUIT PROGRAM 1999 Graphics 0: ? "Many thanks for using menu !": End 2000 Rem 2010 Rem ... ShowVM 2020 Procedure "ShowVM" Using X,Y,Minc,Maxc: Local J 2030 For J=Minc To Maxc: Position X,Y-1+J: ? Vm$(J;): Next J 2040 Exit 3000 Rem 3010 Rem ... ClrCur 3020 Procedure "ClrCur" Using X,Y,C 3030 If F=1 Then Position X,Y+C-1: Normal: ? Vm$(C;): F=0 3040 Exit 4000 Rem 4010 Rem ... SetCur 4020 Procedure "SetCur" Using X,Y,C 4030 If F=0 Then Position X,Y+C-1: Inverse: ? Vm$(C;): F=1 4040 Exit And here is Syntax Table for Notepad++. it's XML file. <NotepadPlus> <UserLang name="OSS Basic XE" ext=".bxe .lst" udlVersion="2.0"> <Settings> <Global caseIgnored="yes" allowFoldOfComments="yes" forceLineCommentsAtBOL="no" foldCompact="no" /> <Prefix Keywords1="no" Keywords2="no" Keywords3="no" Keywords4="no" Keywords5="no" Keywords6="no" Keywords7="no" Keywords8="no" /> </Settings> <KeywordLists> <Keywords name="Comments" id="0">00Rem 01 02 03 04</Keywords> <Keywords name="Numbers, additional" id="1"></Keywords> <Keywords name="Numbers, prefixes" id="2"></Keywords> <Keywords name="Numbers, extras with prefixes" id="3"></Keywords> <Keywords name="Numbers, suffixes" id="4"></Keywords> <Keywords name="Operators1" id="5">! " # $ % & ( ) * / + - . < > <= >= <> = ^ ; :</Keywords> <Keywords name="Operators2" id="6">And Not Or Eor</Keywords> <Keywords name="Folders in code1, open" id="7"></Keywords> <Keywords name="Folders in code1, middle" id="8"></Keywords> <Keywords name="Folders in code1, close" id="9"></Keywords> <Keywords name="Folders in code2, open" id="10"></Keywords> <Keywords name="Folders in code2, middle" id="11"></Keywords> <Keywords name="Folders in code2, close" id="12"></Keywords> <Keywords name="Folders in comment, open" id="13"></Keywords> <Keywords name="Folders in comment, middle" id="14"></Keywords> <Keywords name="Folders in comment, close" id="15"></Keywords> <Keywords name="Keywords1" id="16">? Abs Adr Asc Atn B. Bget Bput Bump Bye C. Chr$ Cl. Cload Clog Close Clr Color Con. Cont Cos Cs. Csave D. Data Deg Del Dim Dir Dos Dpeek Dpoke Dr. Drawto E. Else End Endif Endwhile Enter Erase Err Exp F. Fast Find For Fre G. Get Gos. Gosub Goto Gr. Graphics Hex$ Hstick I. If Input Int L. Left$ Len Let List Lo. Load Loc. Locate Log Lomem Lp. Lprint Lv. Lvar Mid$ Mis. Missile Move N. New Next No. Note Num O. On Open P. Paddle Peek Pen Pl. Plot Pmadr Pmclr Pmco. Pmcolor Pmg. Pmgraphics Pmmove Pmw. Pmwidth Point Poke Pop Pos. Position Pr Print Protect Ptrig Pu. Put R. Rad Random Read Rem Rename Renum Res. Restore Ret. Return Rget Right$ Rnd Rput Run S. Save Se. Set Setcolor Sgn Sin So. Sound Sqr St. Status Step Stick Stop Str$ Strig Sys T. Tab Then To Trace Traceoff Trap Unp. Unprotect Using Usr Val Vstick While X. Xio Bload Bsave Call Cp Exit Extend Hitclr Inverse Local Normal Proc. Procedure Sortdown Sortup</Keywords> <Keywords name="Keywords2" id="17"></Keywords> <Keywords name="Keywords3" id="18"></Keywords> <Keywords name="Keywords4" id="19"></Keywords> <Keywords name="Keywords5" id="20"></Keywords> <Keywords name="Keywords6" id="21"></Keywords> <Keywords name="Keywords7" id="22"></Keywords> <Keywords name="Keywords8" id="23"></Keywords> <Keywords name="Delimiters" id="24">00" 01 02" 03 04 05 06 07 08 09 10 11 12 13 14 15 16 17 18 19 20 21 22 23</Keywords> </KeywordLists> <Styles> <WordsStyle name="DEFAULT" styleID="0" fgColor="000000" bgColor="FFFFFF" fontName="Inconsolata" fontStyle="0" fontSize="9" nesting="0" /> <WordsStyle name="COMMENTS" styleID="1" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="LINE COMMENTS" styleID="2" fgColor="970000" bgColor="FFFFFF" fontName="Comic Sans MS" fontStyle="2" fontSize="9" nesting="0" /> <WordsStyle name="NUMBERS" styleID="3" fgColor="FF6317" bgColor="FFFFFF" fontName="Inconsolata" fontStyle="1" fontSize="9" nesting="0" /> <WordsStyle name="KEYWORDS1" styleID="4" fgColor="0000A0" bgColor="FFFFFF" fontName="Inconsolata" fontStyle="1" fontSize="10" nesting="0" /> <WordsStyle name="KEYWORDS2" styleID="5" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS3" styleID="6" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS4" styleID="7" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS5" styleID="8" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS6" styleID="9" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS7" styleID="10" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="KEYWORDS8" styleID="11" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="OPERATORS" styleID="12" fgColor="0080FF" bgColor="FFFFFF" fontName="Inconsolata" fontStyle="1" fontSize="9" nesting="0" /> <WordsStyle name="FOLDER IN CODE1" styleID="13" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="FOLDER IN CODE2" styleID="14" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="FOLDER IN COMMENT" styleID="15" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS1" styleID="16" fgColor="3D7900" bgColor="D3FFA8" fontName="" fontStyle="1" nesting="0" /> <WordsStyle name="DELIMITERS2" styleID="17" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS3" styleID="18" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS4" styleID="19" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS5" styleID="20" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS6" styleID="21" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS7" styleID="22" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> <WordsStyle name="DELIMITERS8" styleID="23" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0" nesting="0" /> </Styles> </UserLang> </NotepadPlus>
  3. Thank you all. I asked too incorrect question and surely got incorrect answer. My fault! But FJS most likely knows Russian, so he gave me clear answer. The reason of my question is that one of my two broaken 130XE lacks color at all. I looked inside and sow that some of printed sircuits was cut and others was added by wires. As it looked like spiderman creation I couldn't understand anything. (Here in Russia this method of soldering is called as "Kolkhoz soldering" (Soviet Collective Farms).) Thus I needed simple and effective decision absolutely the same as KJ-Mann's upgrade. I have tried but unsuccessfully. No colors at all... So I thought that I need to resolder capasitor in reverse polarity. Bye
  4. And which of them PLUS or MINUS goes to chroma output in S-Video?
  5. I'd like to know what's the polarity of the capasitor for 130XE?
  6. 2Rybags Do I need to use D1: as CONFIG drive while D0: is Boot Drive? I said earlier that all config works perfectly at home... ... I can't understand why it does not work on another PC...
  7. I think that D0: is that drive (hard drive). Bios is set to D0: as Boot drive and D0: as CONFIG container. Really strange... It seems that something prevents loading CONFIG.SYS The same configuration at home works perfectly. In other environment all config failes.
  8. Oh, thanks for your reply! Since I've understood that one my pets memory is dead and that another with good RAM has not color (S-Video LF output. May be GTIA) I live with Altirra... It's a custom CONFIG of cource. That's it... 1088RAM... USE BANKED DEVICE ENV DEVICE SPARTA DEVICE SIO DEVICE ATARIDOS DEVICE IDEPTIME DEVICE JIFFY DEVICE RAMDISK DEVICE COMEXE DEVICE DOSKEY DEVICE QUICKED ; DEVICE A:\SYS\S_VBXE.SYS DEVICE A:\SYS\CON80.SYS SET PATH=CAR:\;A:\;A:\SYS\;A:\EXE\;A:\PL65\; SET ED=20 SET SC=A:\EXE\SCMAIN.OVL SET PAGER=LESS SET PROMPT=$L$P\ SET TEMP=O:\ SET SYSERR=A:\ SET LWSDXDEV=1 SET LWPATH=A:\LW\;A:\LW\SPELL\; FJC do you see your LastWord settings? Nevertheless it's not loaded. BIOS 0.9 BOOT D0: CONFIG D0: I CAN load any program from HD. Anyway, THANKS!
  9. When I'm trying to run Altirra with emulated IDEPlus inside, Spartados X can't load CONFIG.SYS Does someone know where the reason of this behavior?
  10. Hi Sloopy! I opened this thread for ALL of us of cource. Today I flashed my SIO2SD and succesfully! But I did it 2 times... At first, I used AverDude with GUI. (I'm too old to read mans of command string stanzas and too young to die!) And personal THANKs to KubaCZ! (CZ is a kind of very cool pistol by the way...) The questions arised was: 1) Do I ever need to set fuses at all? (KubaCZ don't like them! ... ?) 2) Do I need to mark Low and High fuses as Read or Write or Both... I hope that someone knows this. And some facts... When I flashed Mega32 without touching of fuses It's work was very unstable!!! I could load progs 1 time from 5. Then I reflashed Mega32 with fuses marked as write. (and with it's data written in SIO2SD Wiki of cource...) All works now! (But I don't know how it does...)
  11. I investigated the second machine... It has some problems with chroma channel but it has a good RAM. Due to your high kindness I could reflash SIO2SD and it works now!!! With the help of SIO2SD I cooked my IDE+ Interface. I never thought that it's so fast !!! May be this DARK STRIPE of Atari life has gone? The next step is S-Video interface...
  12. Thank you all! I will give you report after flashing.
  13. Hi Jay, Thank you for early reply, but it's not my case. My notebook has no Parallel no COM ports at all. From the other side I don't want to use Standalone programmer. I tried to extract Mega32 from it's socket but it sits there very firmly. I need to use USB ISP Programmer.
  14. Hello friends. I'm in trouble now with SIO2SD errors. It can't load Configurator at all. SIO2SD shows something like Read data error. So I need to try to reprogram full 32k firmware. I have bought OLIMEX AVR ISP-500 programmer but I could not find any info about further steps needed. Please advice me How to reflash Mega32?
  15. Surprisingly my XC12 works too (and in turbo mode) after 30 years of sleeping. Seriously XC12 is very cheap and dirty for data transfer. It consearns both the mechanical and electrical circuits. I beleive that using precise mechanics and perfect circuitry with full logic control will bring us very stable results. DAT device in theory is much more advanced choice.
  16. All of us knows that dealers buying the cheapest stuff ... so you are even does not know wht is the chinas product.
  17. Atari Windows System Manager - AWSoMe Catfish - FishiCat Last WISH! - because there are ALL ever DONE!
  18. 2suspicious_milk > What Turbo's used PWM? Certainly all of them. Please look this page _http://www.arus.net.pl/FUJI/a8cas-util There is the list of various PWM (Pulse-Width Modulation) encodedformats.
  19. Seriously The Dragon's Main Idea is to make 'tape-as-is' to eat as much technical aspects of recording as possible. No more! Certainly this idea is perfect of it's kind... And I beleive that Dragon is one of the best approximation to plain engineering. But this approach have nothing to do with acoustics science. Humans way of hearing is the mixt of integral and differential approach. FJC as a musician knows that for obtaining sense of loud increasing often enough to prolongate sustained sound with the same sound level... Acoustics approach is the way of Panasonic Cobra for example. Someone who heard it's sound was unable to understand how this simple boombox sounds like low range musical hi fi complex. The secret is simple. They divided each of two stereo sound tracks to high+mid frequencies and low frequency electrically on the level of pre-amplifier and then gave each of four channel it's own power amplifier. All sound distortions on pre-amplifier level is so negligible that we obtain clear and power sound from output. We eliminate all cross-acoustics effects having place in plain loudspeakers. Another example of acoustics approach is well known Dolby systems. They all concearned different aspects of human way of hearing and the result is known to all of us. BUT... But Dragon being as precise as possible approach to perfect recording is THE BEST choice for Atari-8 program recorder!!!
  20. There are not so much things showing us the art of it's creator. I think everybody who loves rainbow and can to feel the warmth of creator's hands in creation's beauty needs them. No mean do I have an Faberge Egg or not. I can love it regardless of this.
  21. As I can remember Turbo interfaces use Pulse-width modulation (PWM) for modulation and demodulation. Does it possible to use AVR or PIC controllers for very high speed tape interfaces? And another question. I have scsi DDR3 strimmer. Is it anyway usable with Atari? It contains MoDeM itself because it is DAT (Digital Audio Tape) standard basically...
×
×
  • Create New...