80-Bus News

  

Spring 1985, Volume 4, Issue 1











Page 24 of 31











GETLIN: LD A,’2’

;GET LINE FROM VIDEO CARD

PROMSG: DEFB BEL,CR,LF,’CHECK fail – abort SUBMIT (Y/N)? $’

CALL PVESC ;GET LINE COMMAND ABOMSG: DEFB CR,LF, ‘SUBMIT aborted’,CR,LF,’$’ LD C,0 ;C=COUNT OF CHARS IN LINE CONMSG: DEFB CR,LF,’CHECK overridden – continuing’,CR,LF, ‘$’ LD DE, LINE ;DE = BUFFER @ OKMSG: DEFB ‘CHECK okay – continuing’,CR,LF,’$! GTLIN: CALL GVID ;GET CHAR CP CR SWICH: DEFS 1 RET Z ;IF CR THEN END OF LINE LIN: DEFS 1 LD (DE),A ;ELSE STORE IN BUFFER STRLEN: DEFS 1 INC DE ;BUMP BUFFER @ CURPOS: DEFS 2 Inc c ; COUNT CHAR LINE: DEFS 80 JR GTLIN ;FOR MORE DEFS 32

GETCUR: LD A,’?!

;HL := CURRENT CURSOR POSITION

STK: DEFS 2

NEW GEMINI BIOS

CALL PVESC ;GET CURSOR COMMAND END CALL GVID ;GET ROW

LD OL,A

CALL GVID ;GET COLUMN

LD OHA

CALL GVID ;GET CHAR

RET

PUTCUR: PUSH HL LD BC, 2020H ADD HL, BC LD A,’=! CALL PVESC LD OA,L CALL PVID LD A,H CALL PVID POP HL RET

PVESC: PUSH AF LD ALES CALL PVID POP AF

PVID: PUSH AF

PvO: IN A, (VCSTAT) RRCA JR C,PVO POP AF

OUT (VCDATA),A RET

GVID: IN A, (VCSTAT)

RLCA

JR C,GVID

IN A, (VCDATA) RET

MSG: LD C,9 JP FDOS

;CURSOR POSITION := HL ;ADD OFFSET

;POSITION CURSOR COMMAND ;PUT ROW

;PUT COLUMN

:OUTPUT ESCAPE (A)

;OQUTPUT (A} TO VIDEO CARD

; INPUT A FROM VIDEO CARD

;OUTPUT MESSAGE (DE}

Gemini have now released their new BIOS V3.2 incorprating many advanced features not normally found in CP/M 80 systems. Features include the ability to add different types of disk drives including 3.5" and 8"; read and write in twelve different disk formats; CCPZ allowing 16 separate user areas per drive with hierarchical search; Max of 5 logical drives can be set up for floppy based systems or 8 for Winchester based systems; support for the GM833 ram disk or Gemini page mode ram disk. For those lucky enough to own Gemini winchester systems user definable directory sizes are offered together with support for two different system tracks.

Bios V3.2 is available as an upgrade for those with an existing Gemini CP/M. We regret that we are unable to supply this BIOS for use with Nascom based systems.

To obtain your copy of Bios 3.2 send your original Gemini Master CP/M disk together with a cheque for 35.65 inc Vat & postage to: “BIOS Upgrade”, QUANTUM COMPUTER SYSTEMS LID. ___________ ____,Chesham,Bucks, ___ ___.

SUBFCB: DEFB 0, ‘$$$ SUB’,0,0,0,0

CMDFAL: DEFB BEL,’??9? Bad command: CHECK ‘‘string’’/switches’,CR,LF DEFB ‘where optional /switches maybe B, C, F, Ldd, N, S, U and/or W’ DEFB CR,LF,’$’

TOPFAL: DEFB BEL,’??? No previous non-blank line’,CR,LF,’$’

DELFAL: DEFB BEL,CR,LF,’??? No SUBMIT file found’,CR,LF,’$’


This is an OCR’d version of the scanned page and likely contains recognition errors.











Page 24 of 31