Skaitykite:

SKIE-MUO

Tvarkyklë BaCoPage DOS terpei

Kompiuteriø istorija

Pirmasis interneto ryðys

ABC – pirmasis kompiuteris?

Telefonai: 5G pagreitis

Kompiuteriø istorija: VT100

Programavimo kalbø istorija

Kà randame Varënos kraðte?

Pirmoji programuotoja: Ada Lovelace

Advanced HTML skyrius

Maþylis buvo pirmasis...

Kompiuteriø iðtakos

KITA:

SKIEMUO istorija

Matematikos skiltis

Karai dël telefono

Paradoksai sulig dirbtiniu intelektu

Jau 50 m. „meinfreimams“

D. Briklinas: skaièiuoklës autorius

Lambda iðraiðkos – Java á naujà lygá

G. Grigas. Mes, kompiuteris ir lietuviø kalba

Seniausias pasaulyje analoginis kompiuteris

Styvo Dþobso kelias á þvaigþdes

Robotai - dirbtiniai þmonës

2019 m. fizikos nobeliai

Kobolo motina

Kas vyko ar ávyko? Ankstyvosios kompiuteriø istorijos Lietuvoje epizodai

Ankstesni istorijos epizodai: skiemenuoklis SKIE-MUO
Rašybos tikrinimo programa RAŠTAS
ÞODIS – ankstyva lietuviðkai prakalbusi programa
Tvarkyklë BaCoPage DOS terpei
Pavedimø registracijos ir kontrolës sistema

Pirmasis „Java“ áskiepis Lietuvoje

Taip pat skaitykite alternatyvø variantà

Situacija ir prielaidos

1996 m. sausio 23 d. „Sun“ iðleido pirmàjà „Java“ versijà (JDK 1.0), o vasario 19 d. jà patikslino (JDK 1.1). Netrukus pagrindinës narðyklës átraukë galimybæ vykdyti „Java“ áskiepius („apletus“).

Tuo metu populiaresnëmis narðyklëmis buvo „Netscape Navigator“ (pilna 1.0 versija pasirodë 1994 m. gruodá „Mosaic“ pavadinimu) ir „Internet Explorer“ (pasirodæs 1995 m.), stojæ á „narðykliø karà“. Komercinis NN 2.0 (pasirodæs 1996 m. vasario 5 d.; 8 MB apimties) jau tapo „normalia“ narðykle, pirmàja átraukusia „JavaScript“ (tada vadintà „LiveScript“), o taip pat el. paðto klientà. „Java“ pasirodë NN 2.02 versijoje (1996 m. geguþë; jo ekrano kopijà þr. priede 3). Tuo tarpu NN 3.0 jau turëjo „applet“ tagà (1996 m. rugpjûtis).

Ir ðtai esant tokiai situacijai, nusprendþiau „Vartiklá“ (ákurtà 1996 m. vasario 23 d.), iki tol platintà BBS stotyse bei el.paðtu, perkelti ir á WWW. Já priëmë „Elneta“, kur jis ir iki ðiol reziduoja – ir pirmoji „internetinë“ Vartiklio versija buvo nr. 7, pasirodþiusi 1996 m. geguþës 1 d..

Pirmoji þinutë apie „Java“ Vartiklyje pateikta jau nr. 6 (1996 m. balandþio 12 d., þr. >>>>>). Taigi, ði tema jau tada man nedavë ramybës, nors „Java“ ateitis tuo metu buvo dar visai neaiðki.

Ir pagaliau 1996 m. spalio mën., suþinojæs, kad „Java“ pradëjo bandyti Gediminas Rûkas, paklausiau, ar jis negalëtø „Vartikliui“ sukurti „teksto sukimo“ áskiepá („apletà“). Tiesa, turiu nukrypti, paminëdamas, kad tuo metu mudu su Gediminu dirbome skirtingoms kompanijoms kurdami ar palaikydami tø paèiø srièiø produktus (turiu pabrëþti, kad Gedimino sukurta lietuvybës palaikymo tvarkyklë „Windows“ terpei „WinLika“ turëjo labai paþangiø elementø). Ir likimo ironija – po 25 metø mes abu dirbame tame paèiame projekte kurdami produktà „Java“ pagrindu (tik dabar naudojant jau „Java 8”, ruoðiantis pereiti prie „Java 11”).

ScrollText pasirodymas

Á „Vartiklá“ ScrollText buvo patalpinta 1996 m. spalio 29 d. Jo getAppletInfo esanèiame Áskiepio apraðyme "ScrollText - new by gr" gr reiðkia Gediminas Rûkas (þr. áskiepio kodà priede 2).

Taigi, matome, kad áskiepis buvo sukurtas paèioje „Java“ kûdikystëje, tad tikriausiai tai pirmasis Lietuvoje sukurtas ir realiai naudotas „Java“ áskiepis (jo panaudojimo pavyzdys priede 1).

Jei turite kokios nors papildomos informacijos apie ankstyvàjá „Java“ naudojimà, praðau praneðti.

Pasiþiûrëjimas

Nuo 2013 m. dauguma narðykliø ëmësi riboti „Java“ áskiepiø palaikymà, o 2015-17 m. praktiðkai jie jau buvo visai paðalinti (nepalaikomi). Todël „Vartiklyje“ ScrollText áskiepá iðjungiau. Taèiau jis liko svetainëje, ir gali bûti iðbandytas.

Originalus áskiepis yra adresu http://www.vartiklis.lt/rukas/bega.htm
O naujai sukompiliuotas - adresu http://www.vartiklis.lt/rukas/java8/bega.htm

Vis tik perþiûrëti áskiepio veikimà narðyklëje ðiuo metu yra problematiðka (Pastaba: narðyklëms, turinèioms suderinamumo (compatibility) nustatymus, galima pabandyti ájungti suderinamumà su seniausia leidþiama versija ir nustatyti þemiausià saugumo lygá – kaip tai atliekama priklauso nuo konkreèios narðyklës). Taèiau tam liko ir kitø galimybiø.

Paprastesnis bûdas yra panaudoti „AppletView“ programà (þr. >>>>>), esanèià „Sun“ JDK pakete. Já naudojant galite vykdyti komandas:
appletviewer http://www.vartiklis.lt/rukas/bega.htm
arba
appletviewer http://www.vartiklis.lt/rukas/java8/bega.htm

Priede 2 pateiktas pilnas áskiepio pradinis tekstas. Tad galite bandyti já ávykdyti, pvz., vykdant ið „Eclipse“, jos konfigûracijoje nustaèius parametrui ScrollText „sukamo“ teksto eilutæ, kaip nurodyta pavyzdyje:

(C)2019, Vartiklis. Draudþiama bet kokiu bûdu naudoti visà ar atskirà ðio teksto dalá be atskiro leidimo ir nenurodþius ðaltinio.

Priedas 1. „ScrollText“ áskiepio panaudojimas

<HTML><HEAD>
<TITLE>Running Vartiklis</TITLE>
</HEAD><BODY>
<APPLET code="ScrollText.class"
    width = 540
    height = 21>
<param name="ScrollText" value="Vartiklis. Redaktorius J.Skendelis. Puikiausias elektroninis laikrastis">
</APPLET>
</BODY></HTML>

Priedas 2. Áskiepio „ScrollText“ kodas

Pastaba: Èia pateikiamas tekstas neþymiai modifikuotas, kad bûtø kompiliuojamas su „Java 8”.

import java.applet.Applet;
import java.awt.BorderLayout;
import java.awt.Color;
import java.awt.Component;
import java.awt.Container;
import java.awt.Dimension;
import java.awt.Font;
import java.awt.FontMetrics;
import java.awt.Graphics;
import java.awt.Image;

public class ScrollText
  extends Applet
  implements Runnable
{
  Thread scrollThread;
  int bannerHeight = 20;
  int maxWidth;
  int maxHeight;
  int off_x = 2;
  int off_y = 2;
  public static String message = "Vartiklis";
  int messageX;
  int messageY;
  int messageW;
  int scrollUnit = 10;
  int sleepTime = 150;
  public Dimension lastS;
  public Font messageF;
  Image textImage;
  Graphics textGC;
  static boolean loaded;
  Image bannerImage;
  Graphics bannerGraphic;
  
  public void init()
  {
    Dimension localDimension = size();
    maxWidth = localDimension.width;
    bannerHeight = (this.maxHeight = localDimension.height);
    bannerImage = createImage(maxWidth, bannerHeight);
    bannerGraphic = bannerImage.getGraphics();
    lastS = new Dimension(1, 1);
    setBackground(Color.lightGray);
    message = readText();
    message = (message == null) ? "Vartiklis" : message;
    createBannerParams();
    setLayout(new BorderLayout());
  }
  
  public void start()
  {
    if (scrollThread == null)
    {
      scrollThread = new Thread(this);
      scrollThread.start();
      loaded = true;
    }
  }
  
  public void stop()
  {
    if ((scrollThread != null) && (scrollThread.isAlive())) {
      scrollThread.stop();
    }
    loaded = false;
    messageX = maxWidth;
    scrollThread = null;
  }
  
  public void run()
  {
    Thread localThread = Thread.currentThread();
    localThread.setPriority(1);
    textImage = createImage(maxWidth, bannerHeight);
    textGC = textImage.getGraphics();
    repaint();
    while (scrollThread == localThread) {
      while (loaded)
      {
        nextPos();
        try
        {
          Thread.sleep(sleepTime);
        }
        catch (InterruptedException localInterruptedException) {}
      }
    }
  }
  
  public String readText()
  {
    String str = null;
    try
    {
      str = getParameter("ScrollText");
    }
    catch (Exception localException)
    {
      str = "Info Info Info Info";
    }
    return str;
  }
  
  public void create3D(Graphics paramGraphics)
  {
    paramGraphics.setColor(Color.white);
    paramGraphics.drawLine(0, 0, 0, bannerHeight);
    paramGraphics.drawLine(0, 0, maxWidth, 0);
    paramGraphics.setColor(Color.black);
    paramGraphics.drawLine(maxWidth + 1, bannerHeight + 1, maxWidth + 1, 0);
    paramGraphics.drawLine(maxWidth + 1, bannerHeight + 1, 0, bannerHeight + 1);
  }
  
  public void paint(Graphics paramGraphics) {}
  
  public synchronized void update(Graphics paramGraphics)
  {
    if (loaded)
    {
      textGC.setColor(Color.gray);
      textGC.fillRect(1, 1, maxWidth - 1, bannerHeight - 1);
      textGC.setColor(Color.black);
      textGC.drawString(message, messageX + off_x, messageY + off_y);
      textGC.setColor(Color.lightGray);
      textGC.setFont(messageF);
      textGC.drawString(message, messageX, messageY);
      paramGraphics.drawImage(textImage, 0, 0, this);
      create3D(paramGraphics);
    }
  }
  
  public synchronized void nextPos()
  {
    messageX -= scrollUnit;
    if (messageX + messageW < 0) {
      messageX = lastS.width;
    }
    repaint();
  }
  
  public void createBannerParams()
  {
    int i = maxWidth;
    int j = bannerHeight;
    lastS.width = i;
    lastS.height = j;
    int k = bannerHeight;
    Font localFont = new Font("TimesRoman", 1, k);
    setFont(localFont);
    FontMetrics localFontMetrics1 = getFontMetrics(localFont);
    int m = localFontMetrics1.getHeight();
    m = k * (j - 2) / m;
    messageF = new Font("TimesRoman", 1, m);
    FontMetrics localFontMetrics2 = getFontMetrics(messageF);
    m = localFontMetrics2.getHeight();
    messageX = i;
    messageY = ((j - m >> 1) + localFontMetrics2.getAscent());
    messageW = localFontMetrics2.stringWidth(message);
    off_x = (m / 15);
    if (off_x < 2) {
      off_x = 2;
    }
    off_y = (m / 20);
    if (off_y < 2) {
      off_y = 2;
    }
  }
  
  public String getAppletInfo()
  {
    return "ScrollText - new by gr";
  }
  
  public ScrollText() {}
}

Priedas 3. Netscape 2.02 „Windows 95” terpëje

Matematikos skiltis
Advanced HTML skyrius
HOT.lt
Vartiklis

(C)2019, Vartiklis. Draudþiama bet kokiu bûdu naudoti visà ar atskirà ðio teksto dalá be atskiro leidimo ir nenurodþius ðaltinio.