Table of Contents

/* Imported from Wayback Machine

 Original URL : https://retrobrewcomputers.org/doku.php?id=builderpages:plasmo:protor5:proto65
 Snapshot date: 2025-12-08
 Generator    : wayback-archiver

*/

Table of Contents

Proto65 Rev0, a 6502 SBC based on Protor5

Introduction

Features

Design Information

Software

Proto65 Rev0, a 6502 SBC based on Protor5

Introduction

This is the link to Proto65 rev 0.1 with a disk-on-module added

Protor5 has a prototype area big enough for a processor, RAM and IDE44 interface. In this project a 6502 CPU along with 128Kx8 RAM and CF interface are prototyped on a protor5 board.

www.retrobrewcomputers.org_lib_plugins_ckgedit_fckeditor_userfiles_image_builderpages_plasmo_protor5_proto65_0dsc_62331224.jpg

www.retrobrewcomputers.org_lib_plugins_ckgedit_fckeditor_userfiles_image_builderpages_plasmo_protor5_proto65_0dsc_62321224.jpg

Features

Based on protor5

EPM7192SQC160 CPLD

Reset supervisor

CPLD programming header

Reset supervisor

2.1mm X 5.5mm power jack

Oscillator socket for full and 1/2 size can

Serial port interface

Prototype area

6502 CPU testbed

128K 25-ns RAM based on CY7C109-25

IDE44 interface for CF disk

40-pin expansion connector

Design Information

Schematic

CPLD design

Software

TinyLoad is a 256-byte program for Proto65. It is serially loaded into Proto65 at 115200 N81 (assuming CPU is running with 3.68MHz clock). Tinyload can loads other programs in Intel Hex format. After Intel Hex program is loaded, type 'G xxxx' to execute loaded program.

EhBASIC is ported to Proto65 rev0. Load with TinyLoad Hex loader above and type 'G e82a' to run. Copy and paste Mandelbrot program below to demonstrate proper operation of EhBASIC

10 MAXITER=20
20 LET C$=" .,'~!^:;[/<&?oxOX#  "
30 FOR Y=-39 TO 39
40 FOR X=-39 TO 39
50 CREAL=X/20
70 CIMAG=Y/20
80 ZREAL = CREAL
90 ZIMAG = CIMAG
95 COUNT = 1
100 ZM = ZREAL*ZREAL
105 ZN = ZIMAG*ZIMAG
107 ZL = ZM+ZN
110 IF ZL>4 THEN GOTO 170
120 ZR2=ZM-ZN+CREAL
130 ZIMAG=ZREAL*ZIMAG*2+CIMAG
140 ZREAL=ZR2
150 COUNT=COUNT+1
160 IF COUNT<MAXITER THEN GOTO 100
170 PRINT MID$(C$,1+COUNT,1);
180 NEXT X
185 PRINT ""
190 NEXT Y
200 END

www.retrobrewcomputers.org_lib_plugins_ckgedit_fckeditor_userfiles_image_builderpages_plasmo_protor5_proto65_2020-12-27_8-31-30.jpg