🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.pascal.borland
Article #435

Copy protection schemes

#435
From: John
Date: Tue, 29 Sep 1998 00:00
19 lines
1715 bytes
I have an idea of how to implement a copy protection scheme into my program.

My idea is to store the serial number of the installation floppy disk in a
hidden file on the disk. The installation program will then check this file
to see if the contents match the serial no. of the floppy disk. If they do
not match (i.e. the program has been copied), the installation program will
not run.

Does anyone know an easy way to read the serial number of a floppy disk into
a string in Turbo Pascal 7?

Also does anyone know of any better ways to add copy protection to a program
which can be easily implemented in TP7? I realise that no copy protection
technique is perfect.

Any help greatly appreciated,

John Skilbeck,
jps@peachworld.com
Technical Details
Message-ID: <6urf11$1j1$1@news3.cableinet.co.uk>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 111659,b60f5ffb1998934d,start
X-Google-Attributes: gid111659,public
X-Google-Thread: 108ebd,b60f5ffb1998934d,start
X-Google-Attributes: gid108ebd,public
X-Google-Thread: 10c950,b60f5ffb1998934d,start
X-Google-Attributes: gid10c950,public
X-Google-Thread: 10cc59,b60f5ffb1998934d,start
X-Google-Attributes: gid10cc59,public
From: "John" <jps@peachworld.com>
Subject: Copy protection schemes
Date: 1998/09/29
Message-ID: <6urf11$1j1$1@news3.cableinet.co.uk>
X-Deja-AN: 396096062
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-Complaints-To: abuse@cableinet.net
X-Trace: news3.cableinet.co.uk 907100001 1633 195.188.53.175 (29 Sep 1998 20:13:21 GMT)
Organization: Cable Internet (post doesn't reflect views of Cable Internet)
NNTP-Posting-Date: 29 Sep 1998 20:13:21 GMT
Newsgroups: comp.lang.pascal.borland,comp.lang.pascal.ansi-iso,borland.public.turbopascal,comp.lang.pascal