Not for the sake of self-interest, but only for the benefit of...

ZXNet echo conference «code.zx»

From 812/03.00 To Oleg Grigoriev 15 December 1997

I suddenly saw on 12/13/97, at 02:43:36, Oleg Grigoriev wrote to ALL: Hi Oleg! OG> For correct processing of delays OG> I would really like to work with the drive OG> mark a list of _software_ ways to disable- OG> checking/enabling/switching turbo mode OG> on various types of spectrum-compatible OG> computers. Well, in Scorpio you probably know: turbo_on: ld bc,#7ffd in c,(c) turbo_off: ld bc,#1ffd in c,(c) on ATM (turbo) (2) (2+) turbo_on: ld a,171 ld bc,10835 push bc ld bc,#ff77 jp 15663 turbo_off: ld a,163 ld bc,10835 push bc ld bc,#ff77 jp 15663 on the pro there is no software method for switching turbo_on/off something like #1ffd. so you will also have to determine the type of machine before work. try AUTOconfig from ZF, SPF, on_line... or write to me and I’ll throw the latest version in the echo. ▌▌║▌█▐│▌▌▐▐ WiTh The BeST wIsheS fROM ▌▌║▌█▐│▌▌▐▐ *C*R*E*A*T*O*R* ▌812/03.00▐ -+- SMM version 1.05

From 812/03.00 To Oleg Grigoriev 26 December 1997

I suddenly see on 12/26/97, at 04:09:40 someone Oleg Grigoriev wrote to Paul Falcon about not for self-interest, but only for benefit...: Hi Oleg! PF>> no, I don't like "." press (in xas, instead of "#" you can dot PF>> it fixes it itself) OG> Oh, damn, I wish I could change the font in it and make friends with the screw... OG> :) Do you want me to write a drever? about 3 seconds... 512 bytes - buffer OG> [there are 512 bytes on the sector screw:(] well, the loader/saver byte is 200. Eh?;) OG> Otherwise I’m still writing in the fourth tasma. Although he works with OG> screw via #3d13 :(, but when reading (that is, assembling) OG> will overtake :) any seedy storm:( (42 characters per line - OG> ssssssuuuuuuuuuuuuxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx!!!!!). xas and 64 characters are available... but there is a problem with the screw, for some reason he doesn’t really want to work through #3d13... it glitches when records. I'll figure it out when I have time. PF>> nothing is checked by pages! it's not 100% PF>> maybe this is an old scorpion without a shadow. and the inscriptions PF>> the ROM is not a serious matter because it could have been changed. OG> What if we do out (#1FFD),#02? On Scorpa it connects OG> ROM Expansion. What this does in the world is not known, but even the EU OG> and connects bank 2 ROM, then it is probably clean. So about OG> take ten bytes from ROM at once and compare with zero. And if not OG> connects then take the same 10-k click and compare. and if on another machine it goes wrong, the test will fly away to edrene hairdryer? OG> Well, throw your autoconfig into the echo. Don't want to do GMX - OG> I'll do it myself. It’s not that difficult, since the procedure has already been written OG> you just need to dock. Right now, I’m going to die. here: ;IY-127 MACHINE TYPE ;IY-126 ALL PAGES ; 0 =1 #7FFD SPECTRUM 128K ; 1 =1 #1FFD SCORPION OR KAY ; 2 =1 #DFFD PROFI ; 3 =1 TURBO 2+ ; 4 =1 #FDFD ATM TURBO 1 ; 5 =1 6 & 7 bit #7FFD ; 7 =1 #08 BYTE #C3 START XOR A LD (IY-127),A INC A LD (IY-126),A D.I. LD A,(#08) CP#C3 JR NZ,ITURBO SET 7,(IY-127) ITURBO LD HL,(1111) LD BC,#FFF7 LD A,%00011111 CALL OUTC_A LD DE,(#C000+1111) AND A SBC HL,DE LD BC,#FFF7 LD A,255 CALL OUTC_A JR NZ,IDFFD SET 3,(IY-127) JR I7FFD IDFFD LD HL,#80 LD DE,#1000 LD BC,#DFFD OUT (C),D LD A,(HL) INC (HL) CP (HL) OUT (C),E JR Z,I1FFD SET 2,(IY-127) JR I7FFD I1FFD LD DE,#1110 LD B,#1F OUT (C),D LD A,(HL) INC (HL) CP (HL) OUT (C),E JR Z,IFDFD XOR A OUT (C),A SET 1,(IY-127) JR I7FFD IFDFD LD B,C LD HL,#FFFF OUT (C),D LD B,#7F OUT (C),D LD (HL),D LD B,C OUT (C),E LD B,#7F OUT (C),D LD (HL),E LD B,C OUT (C),D LD B,#7F OUT (C),D LD A,(HL) CP D JR NZ,I7FFD SET 4,(IY-127) I7FFD LD HL,#80 LD DE,#1000 LD BC,#7FFD OUT (C),D LD A,(HL) OUT (C),E CP (HL) OUT (C),D JR Z,SIZED SET 0,(IY-127) SIZED CALL VIRT LD A,(IY-126) CP 8 JR C,ENDING LD A,(IY-127) CP 1 JR NZ,ENDING SET 5,(IY-127) ENDING LD A,0 CALL EX_RAM EI RET VIRT LD IX,#C000 LD HL,DOOM+63 LD B,64 V_R11 LD A,B DEC A CALL EX_RAM LD C,(IX+0) LD (HL),C LD (IX+0),A DEC HL DJNZ V_R11 PUSH AF LD (IY-126),61 POP AF LD DE,TABL_PG V_R20 LD A,(DE) CP #FF JR Z,V_R30 CALL EX_RAM CP (IX+0) JR Z,V_R22 PUSH DE LD HL,TABL_PG+62 AND A SBC HL,DE PUSH HL POP BC PUSH DE POP HL INC HL LDIR DEC (IY-126) POP DE DEC DE V_R22 INC DE JR V_R20 V_R30 LD B,64 LD HL,DOOM V_R31 LD A,64 SUB B CALL EX_RAM LD A,(HL) LD (IX+0),A INC HL DJNZ V_R31 RET DEBUG PUSH DE POP HL NO_PG1 DEC DE LD A,(DE) CP #FF JR Z,NO_PG2 CP C JR NZ,NO_PG1 SBC HL,DE PUSH HL POP BC PUSH DE POP HL INC HL LDIR DEC (IY-126) DEC HL DEC HL NO_PG2 EX DE,HL RET ONPAGE PUSH BC PUSH HL LD C,A LD B,0 LD HL,TABL_PG ADD HL,BC LD A,(HL) POP HL POP BC EX_RAM DI PUSH HL PUSH AF PUSH BC BIT 1,(IY-127) JR NZ,ZS256 BIT 2,(IY-127) JR NZ,PROFI BIT 3,(IY-127) JR NZ,TURBO_2 BIT 4,(IY-127) JR NZ,ATM1 JR SPECCY TURBO_2 PUSH AF PUSH IX AND 24 CPL LD BC,#FFF7 CALL OUTC_A POP IX POP AF JR SPECCY ATM1 LD BC,#FDFD PUSH AF RRCA RRCA RRCA AND 3 JR HOME PROFI LD BC,#DFFD PUSH AF RRCA RRCA RRCA AND 7 JR HOME ZS256 PUSH AF LD B,A AND %00001000 RLCA LD C,A LD A,B AND %00110000 RLCA RLCA ADD A,C LD BC,#1FFD HOME OUT (C),A POP AF SPECCY LD B,A AND 24 RLCA RLCA RLCA LD C,A LD A,B AND 7 ADD A,C OR 16 LD BC,#7FFD OUT (C),A POP BC POP AF POP HL RET OUTC_A LD IX,10835 PUSH IX JP 15663 DEFB #FF TABL_PG DEFB 00,01,03,04,06,07 DEFB 08,09,10,11,12,13,14,15 DEFB 16,17,18,19,20,21,22,23 DEFB 24,25,26,27,28,29,30,31 DEFB 32,33,34,35,36,37,38,39 DEFB 40,41,42,43,44,45,46,47 DEFB 48,49,50,51,52,53,54,55 DEFB 56,57,58,59,60,61,62,63 DEFB #FF DOOM DEFS 64 PF>>>> ▌▌║▌█▐│▌▌▐▐ WiTh The BeST wIsheS fROM CREATOR product OG>>> Слушай, всё забываю спросить, а чей ты OG>>> продукт? ;) PF>> мой! OG> Сам себя сделал?! Ж:) Бей изврашенцев!;) это ващето торговая марка aka копиригхт! по поводу ис-доса, покидай мылом зипы, на MAS BBS, а то я толко ночью свободен. с часа гдето. да и драйврра рам дисков посмотри - мне очень надо много и разных ▌▌║▌█▐│▌▌▐▐ WiTh The BeST wIsheS fROM CREATOR product ▌812/03.00▐ Powered by Cyrix 6x86L 200+/16DIMM/S3TrV2 2MB/1.6GB -+- SMM version 1.05