Infocom CP/M file

[joedus...@gmail.com]

I'm looking for the utility to change the terminal escape sequence settings for an infocom game specifically "Planetfall" or a point in the direction where to look....

The copy of "PLANET.COM" that I have was made for a Heathkit terminal that I got rid of years ago.
or if someone has a copy of "PLANET.COM" that was compiled for NO ESCAPE sequences at all that would also work"


Thanks
Joe

[Tony Nicholson]

I'll attach the sourcecode that came on my original STARCROSS
8-inch floppy disk below. Just modify it as appropriate for
different games by changing the eight-character name at the
CPMFN label (pad with spaces).

I also modified it in Zilog Z80 mnemonics to apply the
terminal settings to other games by squeezing a few unused
bytes to allow the program name to be specified on the
command line. Get this from -

https://drive.google.com/file/d/10czEFkd3R8vMgZkO3Ee5TmI-5u7q8z0_/view?usp=sharing

Tony

;Copyright 1982 Infocom, Inc. All rights reserved.

;Configuration Program for INTERLOGIC(tm) CP/M Files

;Configured for ANSI/VT100

;This program should be edited to specify terminal and
;printer parameters for your CP/M system. Edit this
;file, then assemble, load, and run program.
;Complete documentation of the setup procedure will
;be found in your INTERLOGIC Reference Card.

;Terminal and printer specific parameters start at
;the label CPMCPL, about 20 lines below. Nothing
;prior to that label should be altered.

ORG 100H

LPDL EQU 100H
BDOS EQU 05H
FCB EQU 05CH

PSTRNG EQU 9
OPEN EQU 15
CLOSE EQU 16
WRITES EQU 21
SETDMA EQU 26

START: JMP CPMSTR

;Setup parameters begin here. Refer to the INTERLOGIC
;Reference Card for CP/M for complete documentation for
;editing this file.

CPMCPL: DB 79 ;Characters/line (132 maximum)
CPMLPP: DB 23 ;Lines/screen (NOT including status line)
CPMFN: DB 'STARCROS'
;File name (DO NOT CHANGE THIS)
CPMCLF: DB 1 ;1 if LF should print after CR on screen
CPMLLF: DB 1 ;1 if LF should print after CR on printer
CPMINV: DB 0H ;Number to add to ASCII value of characters
;to have them print in inverse video.
;This is not applicable on many terminals.

;The following strings have a count field followed by up
;to 32 characters.

TINIT: DB TINITD-$-1 ;Initialize the terminal.
;Should position the cursor at the
;lower left corner of the screen.
;On terminals with the facility, a
;scrolling region should be established
;to include all but the top line on
;the screen. Also, clearing the screen
;is desirable.
; Fulcrum VIO-X/2
; DB 1BH,'*',1BH,'=',55,32

; ANSI/VT100
DB 1BH,'7' ; Save cursor and attributes
DB 1BH,'[0m' ; All attributes off
DB 1BH,'[2J' ; Erase entire screen
DB 1BH,'[2;24r' ; Scrolling region lines 2 to 24
DB 1BH,'[24;1H' ; Cursor to line 24 column 1
TINITD:

DS 32-$+TINIT+1

TRESET: DB TRESD-$-1 ;Reset the terminal at end of game.
;For example, if a scrolling region
;was established, reset it to include the
;entire screen. Clearing the screen is
;NOT desirable.

; ANSI/VT100
DB 1BH,'8' ; Restore cursor and attributes
DB 1BH,'[1;24r' ; Scrolling region off
TRESD:

DS 32-$+TRESET+1

BLINE: DB BLIND-$-1 ;Begin status line.
;Should move the cursor to the upper
;left corner of the screen. If at all
;possible, should go into inverse video.
; Fulcrum VIO-X/2
; DB 1BH,'=',32,32,1BH,'Z','$'

; ANSI/VT100
DB 1BH,'[1;1H' ; Home cursor
DB 1BH,'[7m' ; Inverse video on
BLIND:

DS 32-$+BLINE+1

ELINE: DB ELIND-$-1 ;End status line.
;Should move the cursor to the lower
;left corner of the screen. If status
;line uses inverse video, this state
;should be cleared.
; Fulcrum VIO-X/2
; DB 1BH,'Z',' ',1BH,'=',55,32

; ANSI/VT100
DB 1BH,'[0m' ; Attributes off
DB 1BH,'[24;1H' ; Cursor to lower left
ELIND:

DS 32-$+ELINE+1

PINIT: DB PINID-$-1 ;Printer initialization.
;If any setup is required prior to
;using scripting.
PINID:

DS 200H-$

;The setup parameters end at this point. Nothing below this point
;should be changed for any reason.

CPMSTR: LXI SP,PDL+LPDL
LDA CPMCPL
CPI 132
JC CPMST1
MVI A,132
STA CPMCPL
CPMST1: LXI H,FCB
MVI B,36
L1: MVI M,0
INX H
DCR B
JNZ L1
LXI H,FCB+1
LXI D,CPMFN
MVI B,8
L2: LDAX D
MOV M,A
INX H
INX D
DCR B
JNZ L2
LXI D,EXT
MVI B,3
L3: LDAX D
MOV M,A
INX H
INX D
DCR B
JNZ L3

MVI C,OPEN
LXI D,FCB
CALL BDOS
INR A
LXI D,BADOPN
JZ FINIS

LXI D,100H
CALL WRITEB
LXI D,180H
CALL WRITEB

MVI C,CLOSE
LXI D,FCB
CALL BDOS
INR A
LXI D,BADCLS
JZ FINIS
LXI D,OK
FINIS: MVI C,PSTRNG
CALL BDOS
JMP 0

WRITEB: MVI C,SETDMA
CALL BDOS
MVI C,WRITES
LXI D,FCB
CALL BDOS
ORA A
RZ
MVI C,CLOSE
LXI D,FCB
CALL BDOS
LXI D,BADWRT
JMP FINIS

BADOPN: DB 0DH,0AH,'CAN NOT OPEN FILE$'

BADCLS: DB 0DH,0AH,'ERROR ON FILE CLOSE$'

BADWRT: DB 0DH,0AH,'WRITE ERROR$'

OK: DB 0DH,0AH,'CONFIGURATION PROGRAM FINISHED',0DH,0AH,'$'

EXT: DB 'COM'
PDL: DS LPDL


END START

[Joe Duszyński]

On Friday, August 14, 2020 at 7:36:27 PM UTC-4, Tony Nicholson wrote:
> I'll attach the sourcecode that came on my original STARCROSS
> 8-inch floppy disk below. Just modify it as appropriate for
> different games by changing the eight-character name at the
> CPMFN label (pad with spaces).
>
> I also modified it in Zilog Z80 mnemonics to apply the
> terminal settings to other games by squeezing a few unused

------------------------------------------Snip---Go---The---Scissors!--------------------------------------------------
Tony,
Thank you very much!! I was even able to add a splash of color!
Instead of the reverse video I used some light blue and made the text a nice easy on the eyes amberish color!
I for the life of me can't find my original 8" CP/M disk. I found 3 copies but none of them had that source code file.
And while I was at it I made one with no escape sequences just in case I get rid of the terminal I have now!! LOL!!

Cheers!
Joe

[Nathanael Culver]

Go here:

http://www.classiccmp.org/cpmarchives/ftp.php?b=cpm%2FSoftware%2FHumongous%2FGames%2FInfocom

And download info-CPM.zip and Info-CPM2.zip. They have CP/M .com files pre-configured for a dozen different monitors, list of screen codes for those monitors, and utilities and instructions to roll your own.

—nathanael

[Colin Little]

Anna has converted quite a few games to VT100 compatibility if helpful
https://git.imzadi.de/acn/vt100-games

[Shawn Sijnstra]

Hi! Is there an updated link for those packages? All the searches I could think of did not work.

I'm currently working on a new infocom interpreters which supports more recent games, and I'd love to see common terminals used in this package, and any surrounding information.

Many thanks,
Shawn

[dxforth]

http://cpmarchives.classiccmp.org/ftp.php?b=cpm%2FSoftware%2FHumongous%2FGames%2FInfocom

[Shawn Sijnstra]

Thank you!