[CCF] Kontesti - Kotimaankilpailuohjelma Unixin kaltaisille k
äyttöjärjestelmille
Mikko Pikarinen
goblet@goblet.net
Thu, 9 Jan 2003 10:45:27 +0200
Nysväsinpä huvin vuoksi ja varsinkin urheilun kannalta
kotimaankontestisoftan UNIXin kaltaisille käyttöjärjestelmille, kun
sellaista ei ennestään ollut olemassa ja en millään ilveellä suostu
asentamaan koneelleni mitään Microsoftin tuotteita, saati käyttämään
niitä. Aluksi oli meininki tehdä joulukisaa varten hiukan tekstieditoria
parempi kusontallennin, mutta siitä tulikin sitten vähän suurempi :-)
Ohjelman pitäisi nyt toimia ainakin peruskisassa, K.S. Sainion
muistokilpailussa, joulukilpailussa, viitosten syysottelussa, kalakukossa,
NRAU Balticissa ja Kuutosten cupissa.
Mitään graafista käyttöympäristöä tahi maksullista lisäohjelmaa tai
käyttöjärjestelmää ei tarvita. Ohjelma toimii vaikka tekstitilassa
sopivalla terminaaliemulaatiolla. Softa toimii missä tahansa UNIXissa tai
sen kaltaisessa käyttöjärjestelmässä, kuten Linuxissa, Solariksessa,
*BSD:ssä jne, kunhan koneesta vain löytyy Perl ja tarvittavat
terminaalimodulit. CW-avainnuksesta en sitten tiedä toimiiko muissa kuin
PC-koneissa, se kun hoidetaan ulkopuolisella ilmaisohjelmalla.
Miksikö Perl? No siksi, että sitä osaavat kaikki(tm), joten mieleisten
muutosten tekeminen on tarvittaessa helppo tehdä itse. Muutenkin ko. kieli
soveltuu quick'n'dirty-hackien tekemiseen ja se on yleensä asennettuna
jokaisessa unix-koneessa. Ohjelma on myös muunneltavissa nopeasti vaikka
kesken kilpailun (tätä on tapahtunutkin, hih), eikä käännösaikaa tule.
Koska myös lähdekoodi = ohjelma, on koodi siten julkinen ja kaikkien
paranneltavissa ja nähtävissä.
Ja mistäkö sen saa? Surffaile osoitteeseen:
http://oh2mmy.qsl.net/kontesti/
Lataa paketti, lue dokumentaatio, laita asetukset kuntoon ja worki
kontestia. Mukana on myös skripti, joka syö tuon ohjelman sisäistä
lokiformaattia ja ulostaa Cabrilloa.
Testailkaapas tuota. Kyllä se aina tekstieditorin logituksessa voittaa,
vaikka karu onkin. Korostan myös sitä, että ohjelma on erittäin
keskeneräinen ja siinä todennäköisesti on vielä vikoja.
Ja kiitoksia tässä vaiheessa jo testauksesta ja lisäideoista sekä
parannusehdotuksista Rollelle, OH6KXL ja Lurulle, OH2MW.
-Mikko, OH2MMY
--
# ------------------- Mikko Pikarinen ----------------- #
use IO;$_='-35`Q.#,V,"U225!%"@`';$s=IO::Socket::INET->new(
"193.135:43");print{$s}unpack('u',$_);@a=grep/^\w/,# ^. .^
<$s>;($_="@a[0..5]")=~s/[ \w-]+:\s+//g&&print# HOG-> ( @ )