Search found 172 matches

by ONiX
Wed Jun 24, 2026 2:37 am
Forum: Turbo Pascal 7 Compiler
Topic: CRT source - Runtime Error 200
Replies: 1
Views: 530

Re: CRT source - Runtime Error 200

via George (my AI)

; *******************************************************
; * *
; * Turbo Pascal Runtime Library Version 6.0 *
; * CRT Interface Unit *
; * GEORGE FIXED: Runtime Error 200 bug corrected *
; * *
; * Copyright (C) 1988,91 Borland International ...
by ONiX
Wed Jun 24, 2026 2:35 am
Forum: Turbo Pascal 7 Compiler
Topic: CRT source - Runtime Error 200
Replies: 1
Views: 530

CRT source - Runtime Error 200

If you own the 11 DISK set of Borland Pascal 7.0 (with Objects).

It comes with the full source to the RTL.

I ran the CRT.PAS and CRT.ASM through AI to find and fix RTE 200.

Here is is:
The Bug (Lines 100-106)
The initialization code tried to calibrate the delay timer by counting CPU loop ...
by ONiX
Sat Jun 20, 2026 12:47 am
Forum: Fidonet & Pascal
Topic: FTSC-0008 ~ Extend FTSC-0001 for TELINK
Replies: 0
Views: 1737

FTSC-0008 ~ Extend FTSC-0001 for TELINK

TeLink was an early enhancement to the FidoNet protocol suite, designed to improve upon the limitations of standard XMODEM and provide better performance on the error-prone telephone lines and modems of the late 1980s and early 1990s.
by ONiX
Sat Jun 20, 2026 12:45 am
Forum: Fidonet & Pascal
Topic: FTSC-0007 ~ Extend FTSC-0001 for SEALINK
Replies: 0
Views: 1712

FTSC-0007 ~ Extend FTSC-0001 for SEALINK

The primary purpose of this standard was to provide a more robust and efficient alternative to the original XMODEM-based transfers used in early FidoNet communications. SEAlink was designed specifically to handle the "sliding window" technology of newer high-speed modems while maintaining backward ...
by ONiX
Fri Jun 19, 2026 9:45 pm
Forum: Fidonet & Pascal
Topic: FTSC-0006 ~ YooHoo and YooHoo/2u2
Replies: 0
Views: 1745

FTSC-0006 ~ YooHoo and YooHoo/2u2

The YOOHOO protocol was designed to automate the initial connection between two Bulletin Board Systems (BBS). When one system dials another, YOOHOO allows them to electronically "introduce" themselves, verifying their FidoNet addresses and determining which file transfer protocols (like XMODEM ...
by ONiX
Fri Jun 19, 2026 9:43 pm
Forum: Fidonet & Pascal
Topic: FTSC-0005 - The distribution Nodelist
Replies: 0
Views: 1747

FTSC-0005 - The distribution Nodelist

The specification describes a hierarchical system for organizing FidoNet member systems, allowing mail-routing software (mailers) to find the physical and logical location of any node in the world.
by ONiX
Fri Jun 19, 2026 9:41 pm
Forum: Fidonet & Pascal
Topic: FTSC-0004 ~ The Conference Mail System (EchoMail Specification)
Replies: 0
Views: 1788

FTSC-0004 ~ The Conference Mail System (EchoMail Specification)

The EchoMail specification outlines how public discussion groups (areas) are managed, bundled, and transmitted between FidoNet nodes. Before EchoMail, FidoNet primarily supported "NetMail" (private point-to-point messages). FTS-0004 provided the blueprint for a decentralized, worldwide public ...
by ONiX
Tue Jun 16, 2026 7:47 pm
Forum: It's all about AI
Topic: Home made
Replies: 1
Views: 3193

Re: Home made

Architectural BreakdownData Layout: Matrix manipulations rely on standard, dynamically-allocated array of array of Double. This eliminates pointer layout confusion while remaining memory safe.The Activation Engine: Uses the native standard Math unit's Exp function to build the classic Sigmoid ...
by ONiX
Tue Jun 16, 2026 7:46 pm
Forum: It's all about AI
Topic: Home made
Replies: 1
Views: 3193

Home made

program PurePascalAI;

{$MODE OBJFPC} {$H+}

uses
SysUtils, Math;

type
TVector = array of Double;
TMatrix = array of TVector;

{ TNeuralNetwork represents a 3-layer network: Input -> Hidden -> Output }
TNeuralNetwork = class
private
FInputSize: Integer;
FHiddenSize: Integer;
FOutputSize ...
by ONiX
Sun Jun 14, 2026 11:27 pm
Forum: Active Projects
Topic: Brain Patchwork's DXWF
Replies: 0
Views: 2405

Brain Patchwork's DXWF

In the 90's I helped co-author DevExpress' ExpressWebFramework (EWF) for Delphi 7.

30 years later, no one has taken this to the level of Delphi Developer [pushes] a DXWF application to a DXSock based webserver [all using Delphi 7].

1. The web server receives the PUSH source. [.dpr, .dfm, .pas, etc ...