Piçek di derbarê dibistanê de "zanistiya komputerê" di salên 90-an de çawa bû, û çima hemî bernamenûs wê hingê bi taybetî xwe-xwendi bûn.
Zarok li ser kîjan bernameyê hatine fêr kirin
Di destpêka salên 90-an de, dibistanên Moskowê dest bi bijartî bi dersên komputerê vekir. Li odeyan tavilê barên li ser pencereyan û deriyekî giran ê bi hesinî hatin çêkirin. Ji deverekê, mamosteyek zanistiya kompîturê xuya bû (ew mîna hevalê herî girîng ê piştî derhêner xuya dikir), ku karê wî yê sereke ew bû ku pê ewle be ku kes dest nede tiştekî. Tiştek tune. Heta ber deriyê.
Di dersxanan de mirov pir caran dikare pergalên BK-0010 (di cûrbecûrên wê de) û BK-0011M bibîne.
Wêne kişandin
Ji zarokan re li ser avahiya giştî, û hem jî bi dehan fermanên BINGEHê hatin gotin da ku ew li ser ekranê xêz û çemberan xêz bikin. Ji bo polên biçûk û navîn, ev belkî bes bû.
Di parastina afirandinên (bernameyên) xwe de hin pirsgirêk hebûn. Pir caran, komputerên ku kontrolkerên yek-kanal bikar tînin di nav torê de bi topolojiya "otobusa hevpar" û leza veguheztinê 57600 baud hatine berhev kirin. Wekî qaîdeyek, tenê yek ajokerek dîskê hebû, û tişt pir caran bi wê re xelet derketin. Carinan kar dike, carinan nake, carinan tora cemidî ye, carinan jî dîska dîska nayê xwendin.
Paşê min ev afirandî bi kapasîteya 360 kB bi xwe re bir.
Îhtîmala ku ez dîsa bernameya xwe jê derxim ji sedî 50-70 bû.
Lêbelê, pirsgirêka sereke ya van hemî çîrokan bi komputerên BC re cemidandinên bêdawî bû.
Ev dibe ku di her kêliyê de çêbibe, çi binivîsandina kodê an jî pêkanîna bernameyekê. Pergalek cemidî tê vê wateyê ku we 45 hûrdeman pûç derbas kir, ji ber ku ... Diviyabû min her tiştî ji nû ve bikira, lê dema dersê ya mayî êdî têra vê nedikir.
Nêzîkî sala 1993-an, li hin dibistan û lîseyê, dersên normal bi 286 otomobîlan xuya bûn, û li hin deveran jî sê ruble hebûn. Di warê zimanên bernamesaziyê de, du vebijark hebûn: cihê ku "BASIC" qediya, "Turbo Pascal" dest pê kir.
Bernamekirin di "Turbo Pascal" de bi karanîna mînaka "tanqan"
Bi karanîna Pascal, zarok hatin fêr kirin ku loopan ava bikin, her cûre fonksiyonan xêz bikin û bi rêzan re bixebitin. Li lîseya fîzîk û matematîkê, ku ez demekê "dijiyam", her hefte yek cotek ji bo zanistiya kompîturê dihat tayînkirin. Û ji bo du salan ev cihê bêzar bû. Bê guman, min dixwest ku ji nîşandana nirxên array an celebek sinusoidê li ser ekranê tiştek cidîtir bikim.
Tankên
Battle City yek ji lîstikên herî populer ên li ser konsolên klonê yên NES (Dendy, hwd.) bû.
Di sala 1996-an de, populerbûna 8-bitan derbas bû, wan ji mêj ve toz di dolaban de kom dikirin, û ji min re xweş xuya bû ku ez ji bo PC-ê klonek "Tanks" bikim wekî tiştek mezin. Ya jêrîn tenê li ser wê yekê ye ku wê demê çawa hewce bû ku meriv dev jê berde da ku tiştek bi grafîk, mişk û deng li ser Pascal binivîse.
Hûn dikarin tenê dar û doran bikşînin
Ka em bi grafîkê dest pê bikin.
Di guhertoya xwe ya bingehîn de, Pascal destûr da we ku hûn hin şeklan xêz bikin, boyax bikin û rengên xalan diyar bikin. Pêvajoyên herî pêşkeftî yên di modula Graphê de ku me nêzikî spritan dike GetImage û PutImage ne. Bi alîkariya wan, mimkun bû ku hûn beşek ji ekranê di nav devera bîranînê ya berê veqetandî de bigirin û dûv re vê perçeyê wekî wêneyek bitmap bikar bînin. Bi gotinek din, heke hûn dixwazin hin hêman an wêneyan li ser ekranê ji nû ve bi kar bînin, hûn pêşî wan xêz dikin, wan li bîranînê kopî dikin, ekranê jê dikin, ya din xêz dikin, û hwd heya ku hûn pirtûkxaneya xwestî di bîranînê de biafirînin. Ji ber ku her tişt zû diqewime, bikarhêner van hîleyan ferq nake.
Modula yekem ku sprites tê de hatine bikar anîn edîtorê nexşeyê bû.
Qada lîstikê ya nîşankirî hebû. Bi tikandina mişkê pêşekek derxist ku hûn dikarin ji çar vebijarkên astengan yek hilbijêrin. Behsa mişk...
Mişk jixwe dawiya salên 90î ye
Bê guman, her kesî mişk hebûn, lê heya nîvê salên 90-an ew tenê di Windows 3.11, pakêtên grafîkê û hejmarek piçûk lîstikan de têne bikar anîn. Wolf û Doom tenê bi klavyeyê hatin lîstin. Û di hawîrdora DOS-ê de mişk bi taybetî ne hewce bû. Ji ber vê yekê, Borland tewra modula mişkê jî di pakêta standard de nexist. Diviya bû ku hûn bi navgîniya nasên xwe li wî bigerin, yên ku destên xwe avêtin û di bersivê de bi qîrîn got: "Ji bo çi hûn jê re lazim in?"
Lêbelê, dîtina modulek ku ji mişk re anketê bike tenê nîvê şer e. Ji bo ku bi mişkê li ser bişkokên li ser ekranê bikirtînin, diviyabû ku ew werin xêz kirin. Wekî din, di du guhertoyan de (çapkirî û neçapkirî). Bişkojka ku nayê pêlkirin, serê sivik û di binê wê de siyek heye. Dema ku tê pêçan, ew berevajî ye. Û dûv re wê sê caran li ser ekranê xêz bikin (ne pêl kirin, pê kirin, dûv re dîsa nehat pê kirin). Zêdeyî, ji bîr nekin ku dereng ji bo pêşandanê saz bikin, û kursorê veşêrin.
Mînakî, pêvajokirina menuya sereke di kodê de wiha xuya bû:
Deng - Tenê Speaker PC
Çîrokek cuda bi deng. Di destpêka salên nodî de, klonên Sound Blaster tenê ji bo meşa xwe ya serketî amade dikirin, û piraniya serlêdanan tenê bi axaftvana çêkirî re dixebitin. Zêdetirîn kapasîteyên wê hilberandina hevdem a tenê yek deng e. Û ew bi rastî ya ku Turbo Pascal destûr da we. Bi prosedûra dengî re gengaz bû ku bi frekansên cihêreng "qirq" were kirin, ku ji bo dengên guleyan û teqînan bes e, lê ji bo dîmenderek muzîkê, wekî ku wê demê moda bû, ev ne guncaw bû. Wekî encamek, çareseriyek pir bikêr hate dîtin: di arşîva nermalavê de, "pelek exe" hate dîtin, ku carekê ji hin BBS hatî dakêşandin. Ew dikaribû mûcîzeyan bixebite - bi navgîniya Axaftvanek PC-ê wavsên nekompresandî bilîze, û wî ew ji rêza fermanê kir û ne xwediyê navgînek rastîn bû. Tiştê ku hewce bû ev bû ku ew bi prosedûra Pascal exec ve were bang kirin û pê ewle bibin ku ev avahî hilweşe.
Wekî encamek, muzîka kujer li ser dîmenderê xuya bû, lê tiştek xweş pê re çêbû. Di sala 1996-an de, li ser Pentium 75-ê pergalek min hebû, ku heya 90-an hilgirtibû. Her tişt li ser wê baş xebitî. Li zanîngeha ku Pascal di nîvsala duyemîn de ji me re hate saz kirin, di dersxaneyê de "sê rûbil" yên baş lixwekirî hebûn. Bi peymana mamoste, min van tankan bir dersa duyemîn da ku ez îmtîhanê bikim û careke din neçim wir. Û ji ber vê yekê, piştî destpêkirinê, qîrînek bilind ku bi dengên gurçikê yên gurçikê tevlihevkirî ji axaftvan derket. Bi gelemperî, "karta sê ruble" ya 33-megahertz DX derket ku nekare heman "xebatkar" rast bizivirîne. Lê wekî din her tişt baş bû. Bê guman, nehesibîna dengdana klavyeyê ya hêdî, ya ku tevahiya lîstikê xera kir, bêyî performansa PC-yê.
Lê pirsgirêka sereke ne di Pascal de ye
Di têgihîştina min de, "Tanks" herî zêde ye ku dikare ji Turbo Pascal bê navberên kombûnê were derxistin. Kêmasiyên eşkere yên hilbera paşîn dengdana klavyeyê ya hêdî û pêşkêşkirina grafikên hêdî ne. Rewş ji hêla hejmarek pir hindik pirtûkxane û modulên partiya sêyemîn xirabtir bû. Li ser tiliyên destekî dihatin hejmartin.
Lê ya ku herî zêde ez xemgîn kirim, nêzîkbûna perwerdeya dibistanê bû. Wê demê kesî ji zarokan re behsa avantaj û îmkanên zimanên din nekir. Di polê de, wan hema di cih de dest bi axaftinê kirin li ser destpêk, çapln û ger, ya ku xwendekar di hundurê paradîgmaya BASIC-Pascal de girtin. Van her du zimanan dikarin tenê perwerdehî bêne hesibandin. Bikaranîna wan "şerker" bûyerek kêm e.
Çima hînî zarokan zimanên sexte dikin ji bo min sir e. Bila ew bêtir dîtbar bin. Bila guhertoyên BASIC li vir û wir werin bikar anîn. Lê, di her rewşê de, ger kesek biryar bide ku pêşeroja xwe bi bernamekirinê ve girêbide, ew ê neçar bimîne ku zimanên din ji sifirê fêr bibe. Ji ber vê yekê çima divê ji zarokan re heman erkên perwerdehiyê neyên dayîn, lê tenê li ser platformek (zimanek) normal, ku di hundurê wê de ew dikarin bêtir serbixwe pêşve bibin?
Behsa peywiran dikin. Li dibistan û zanîngehê ew her gav razber bûn: tiştek hesab bikin, fonksiyonek çêbikin, tiştek xêz bikin. Min li sê dibistanên cihê xwend, plus me "Pascal" di sala yekem a enstîtuyê de hebû, û ne carekê mamosteyan pirsgirêkek rastîn a serîlêdanê dernakeve holê. Mînakî, defterek an tiştek din kêrhatî çêbikin. Her tişt pir dûr bû. Û gava ku mirov bi mehan ji bo çareserkirina pirsgirêkên vala, ku paşê di nav çopê de derbas dibe... Bi gelemperî, mirov berê xwe didin enstîtuyê şewitî.
Bi xatirê te, di pola sêyemîn a heman zanîngehê de, di bernameyê de ji me re "plus" hatin dayîn. Tiştekî baş dixuya, lê gel westiya bû, tijî karên sexte û "perwerde" bû. Tu kes wek cara yekem bi coş nebû.
PS Min google kir ka kîjan ziman niha di dersên zanistiya kompîturê de li dibistanan têne fêr kirin. Her tişt wekî 25 sal berê ye: Bingehîn, Pascal. Python di navberên sporadîk de tê.
Source: www.habr.com