Astrobe for RISC5 Source Code

RISC5 Oberon Development System for Windows
Version 8.0 Copyright © 2006-2021 CFB Software
Email: support@astrobe.com
Website: www.astrobe.com

Last Updated 8 Oct 2021

Oberon Examples

The source code of these examples is located in your AstrobeRISC5-v8.0\Examples folders. You will find additional source code examples on the Astrobe Forum.

The example programs which are shown with screenshots below use the Astrobe Out library module to generate text output and send it via a UART port on the development board to a COM port on the PC where it is displayed on the Astrobe terminal window. The examples have been tested on the supported RISC5 FPGA development boards. They allow the serial communication to be performed via a virtual COM port using a USB cable to connect the board to the PC.

Filename Description
Extensions.Mod
ExtensionsCase.Mod
ExtensionsProc.Mod
Lists.Mod
Extensions
Shows three different ways to use Oberon's Type Extension feature to create and scan a dynamic list of a variety of objects.

Lists
contains the generic functions to build and traverse a list of objects. Extensions contains definitions for a number of related objects. The examples used are shapes e.g. circles, rectangles etc. The application first builds a list of different shapes and then scans the list displaying the relevant dimensions and area of each shape.



Extensions uses the IS operator to perform the type tests in association with type guards.

ExtensionsCase
uses a CASE statement to perform the type tests and selections.

ExtensionsProc uses procedure variables as record fields to perform type-specific actions for the different record extensions.
Blinker.Mod Blinker
Blinks the four LEDs in turn once per second.
TestInt.Mod TestInt
Blinks the four LEDs in turn every 500ms as a result of interrupts generated every millisecond
ShowTime.Mod
RTC.Mod
Time.Mod
Set and Display the Real Time Clock 
Prompts for the input of the current time (hours, minutes and seconds) and then displays the updated time every second.

SlideDemo.Mod
Slide.Mod
IO.Mod
Graph.Mod
ST7735.Mod
Columbia.sld
StPauls.sld
AutoCAD Slide Drawing
Uses the Astrobe Graphics line-drawing functions to display AutoCAD Slide images of St Paul's Cathedral and the space shuttle on an AdaFruit 1.8" TFT Display.

TextDisplay.Mod
Display.Mod
Font.Mod
Font.res
ST7735.Mod

Text Display
Write line-oriented output on an AdaFruit 1.8" TFT Display.

Temperature.Mod
I2CConfig.Mod
Time.Mod
I2C Temperature Logger
Measures the current temperature via the I2C bus using a Texas Instruments TMP102 sensor. This sensor is available on the convenient SparkFun SEN-13314: TI Digital Temperature Sensor Breakout. The temperature is checked every second using the Real Time Clock. The current time and temperature is displayed whenever the temperature changes.


HCTest.Mod
HCConfig.Mod
HCDir.Mod
HCfiles.Mod
HCDrive.Mod
HCFiler Filesystem: HCTest
Inititialise an HCFiler filesystem and create a number of test files on an SDHC Card accessed via SPI.

HCReadSpeed.Mod
HCConfig.Mod
HCDir.Mod
HCDrive.Mod
HCFiler Filesystem: HCReadSpeed
Time SDHC card sector reading speed on an HCFiler filesystem accessed via SPI.

DRAMTest.Mod DRAM Test
Tests 4164 64kbit DRAM chips for a variety of failures. It has been used on retrocomputing projects and could be modified to test other types of RAM chips.

Licence Agreement

Astrobe for RISC5 Examples Source Code

Copyright (c) 2006-2021 CFB Software.
https://www.astrobe.com

Permission to use, copy, modify, and/or distribute these examples in source code form (the "Software") for any purpose with or without fee is hereby granted, provided that the above copyright notice and this permission notice appear in all copies. 

DISCLAIMER

THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHORS DISCLAIM ALL WARRANTIES WITH REGARD TO THE SOFTWARE, INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY, FITNESS AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY CLAIM, SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES OR LIABILITY WHATSOEVER, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE DEALINGS IN OR USE OR PERFORMANCE OF THE SOFTWARE.