πŸš€ go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: be.comp.programming
Article #1179

De tijd van toen...is nu niet meer

#1179
From: Gilbert
Date: Sat, 17 Sep 2005 22:46
73 lines
3541 bytes
Even voor de oudjes onder ons ;-)

HeοΏ½οΏ½l lang geleden had ik een ZX Spectrum +
Dit prachtig ding programmeerde je in Basic (Beginners All-purpose Symbolic 
Instruction Code)

Het mooie eraan was dat je programmeerde met programmaregels, een beetje 
zoals...

10 LET X=0, LET Z=0
20 INPUT GETAL
30 X=GETAL+X
40 IF X >1000 THEN GOTO 100
50 IF X < 0 THEN GOTO 200
60 PRINT SOM
70 GOTO 20

100 LET Z=Z+1
110 CLS
120 PRINT "Er zijn ";Z;" duizentallen bereikt."
130 LET X=X-1000
140 RETURN

200 PRINT "Error: Waarde is beneden 0."
210 LET X = X - GETAL
220 GOTO 20

Beetje simpel van opbouw, maar het duid wel aan hoe er tewerk gegaan werd, 
namelijk sprongen maken van en naar nummers, en de vreugde die we eraan 
beleefden was dan ook groot,
Helaas het noodlot sloeg toe, een slecht kontakt op het moederbord was 
realiteit en verwoede pogingen om met een veel te grote soldeerbout (zonder 
aarding) het slechte kontakt te solderen mislukte en zo is mijn eerste lief 
dan verdwenen ergens in een vergeethoekje op zolder, alwaar hij nu nog 
steeds staat voor de latere generatie, voor het geval er nieuwe technologie 
beschikbaar zou komen om mijn eerste liefde weer nieuw leven in te blazen.
Met ander woorden ...vergane glorie.

Na een lange rouwperiode van 12 jaar kocht ik mijn eerste echte "PC" met een 
ongelooflijke 210Mb HD aan boord en draaiende op Windows 1.1.
Ondertussen loop ik al 9 jaar in het gelid van Windows maar denk ik nog 
steeds aan mijn ZX'je met enige heimwee.

Ik zou graag eens de draad weer opnemen met BASIC of iets gelijkaardigs die 
draait op mijn WinXP, alleen weet ik niet goed wat, ooit eens geprobeerd om 
een emulator van ZX erop te zetten maar dat mislukte.
Qbasic vond ik heel erg raar zonder regelnummers, (hoe verwijs je dan 
trouwens met de commando GOTO?)

Is er iets dat jullie mij kunnen aanraden, die niet al te moeilijk is en /of 
een beetje gelijkaardig qua commando's als de oude basic?

En last but not least, heeft iemand dat, of een goeie tip of link om het te 
bemachtigen?


Gegroet Gilbert

-- 
"Spel- en typfauten zijn doelbewust en tot grood jolijt van de leser 
gemaakd."






In BASIC (Beginners All-purpose Symbolic Instruction Code, ontwikkeld in de 
jaren '70) ziet alles er
nog iets begrijpelijker uit:
In latere versies van BASIC (QBASIC, GWBASIC) mochten de regelnummers 10, 20 
enzovoorts
weggelaten worden. 
Technical Details
Message-ID: <dgi6cu$2587$1@nl-news.euro.net>
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!solnet.ch!solnet.ch!news2.euro.net!nl-news.euro.net!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Thread: fcea4,7afce988be83aae2,start
X-Google-Attributes: gidfcea4,public
X-Google-Language: DUTCH,ASCII
Path: arc1-ca.pugleaf.net!g2news1.google.com!news4.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newsfeed00.sul.t-online.de!newsfeed01.sul.t-online.de!t-online.de!solnet.ch!solnet.ch!news2.euro.net!nl-news.euro.net!not-for-mail
From: "Gilbert" <akazoeloeken@hotmail.com>
Newsgroups: be.comp.programming
Subject: De tijd van toen...is nu niet meer
Date: Sun, 18 Sep 2005 00:46:48 +0200
Organization: EuroNet Internet
Lines: 75
Message-ID: <dgi6cu$2587$1@nl-news.euro.net>
NNTP-Posting-Host: 49-9.241.81.adsl.skynet.be
X-Trace: nl-news.euro.net 1126997214 70919 81.241.9.49 (17 Sep 2005 22:46:54 GMT)
X-Complaints-To: usenet@nl-news.euro.net
NNTP-Posting-Date: Sat, 17 Sep 2005 22:46:54 +0000 (UTC)
Cancel-Lock: sha1:kL4HuJlMVtm0F5yJhuXEhXkjAaw= sha1:K8vAv6TAyMDVPW4asZim0zyKH9I=
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
X-RFC2646: Format=Flowed; Original