Commit 04ea50d7 authored by Benoît Minisini's avatar Benoît Minisini

The toplevel AUTHORS file now contains the list of all Gambas authors.

[CONFIGURATION]
* NEW: The toplevel AUTHORS file now contains the list of all Gambas authors.

[DEVELOPMENT ENVIRONMENT]
* NEW: Remove the 'authors.txt' file and use a symbolic link on the toplevel AUTHORS files instead.
parent a3216900
#
# GAMBAS AUTHORS FILE
#
# This file should list all people that have written code or done translations for Gambas.
# If you want to add or fix anything, please write on the mailing-list.
# I apologize by advance for any mistake or omission.
#
# The format of that file is the following:
#
# [Name of the author] ([Country]) <[mail address]>
# [Description in Gambas markup syntax]
# ...
#
# [Name of another author] ({Country]) <[mail address]>
# [Description in Gambas markup syntax]
# ...
#
# Void lines and line beginning with '#' are ignored.
#
Fabien Bodard (France) <gambas.fr@gmail.com>
IDE file/project/picture selector and mascot redesign.
The reporting components.
The 'gb.chart' component.
The 'gb.map' component.
The 'gb.scanner' component.
Nigel Gerrard (United Kingdom) <nigel.dh.gerrard@gmail.com>
The [MySQL database driver](http://mysql.com)
The now deprecated QT extended component.
The old SQLite database driver.
Paul Gardner-Stephen (Australia) <paul@infoeng.flinders.edu.au>
Porting Gambas on Solaris.
Daniel Campos (Spain) <dcamposf@gmail.com>
The networking component
The compression component
The old XML component
The GTK+ component.
The now deprecated VideoForLinux component
The PDF component.
Spanish translation.
Carlos F. A. Paniago (Brazil) <pan@cnpm.embrapa.br>
Porting Gambas on FreeBSD.
Rob Kudla (USA) <sourceforge-raindog2@kudla.org>
The old Gambas Wiki hosting.
Mandriva RPM packages maintainer.
The 'gb.pcre' component.
Ronald Onstenk (Netherlands) <ronstk@tiscali.nl>
The find list in the 1.0 Development Environnement
Brandon Bergren (USA) <bdragon@mailsnare.net>
Porting Gambas on Cygwin.
Laurent Carlier (France) <lordheavy@users.sourceforge.net>
The SDL component.
The OpenGL component.
ArchLinux support.
José L. Redrejo Rodríguez (Spain) <jredrejo@merida.uned.es>
Let Gambas compile on all Debian architectures.
Allowed the Gambas IDE to make Debian packages.
Debian and Linex package maintainer.
Spanish translation.
Andrea Bortolan (Italy) <andrea_bortolan@yahoo.it>
The ODBC database driver.
Ahmad Kamal <eng_ak@link.net>
Arabic translation.
Daif Al-Otaibi <daif55@gmail.com>
Arabic translation.
Dimitri Bellini (Italy) <dimitribellini@libero.it>
Italian translation.
Vincenzo Virgilio (Italy) <w@acm.org>
Italian translation.
Maurizio Pozzobon (Italy) <mauriiiii3001@yahoo.it>
Italian translation
Jordi Sayol (Andorra) <g.sayol@yahoo.es>
Catalan translation
Kazutaka Harada (Japan) <kazutaka802@yahoo.co.jp>
Japanese translation
Yizhou He <yizhou_he@med.unc.edu>
Simplified Chinese translation.
Knut Berg <knutb@berg-family.org>
Norwegian translation.
Chunchi Lin <chuenchilin@yahoo.com.tw>
Traditional Chinese translation.
Wojciech Saltarski (Poland) <gambas@soft-service.krakow.pl>
Polish translation.
Radoslav Dejanovic (Croatia) <radoslav.dejanovic@opsus.hr>
Croatian translation.
Luis Minero (Portugal) <luis@zbit.pt>
Portuguese translation.
Iuri Matias (Portugal) <iuri.matias@gmail.com>
Portuguese translation.
Peter Cernoch (Czech Republic) <pcernoch@volny.cz>
Czech translation.
Nelson Ferraz <nferraz@phperl.com>
Brazilian Portuguese translation.
Fermyno Gutierrez <fermyno@hotmail.com>
Brazilian Portuguese translation.
Ronald Onstenk (Netherlands) <ronstk@tiscali.nl>
Dutch translation.
Fabrice Mous (Netherlands) <fabricemous@xs4all.nl>
Dutch translation.
Sergey Irupin (Russia) <biblelamp@gmail.com>
Russian translation.
Nima Mohammadi (Iran) <gambas.ir@gmail.com>
Farsi translation.
Miha Ambroz <miha.ambroz@amis.net>
Slovenian translation.
David Cendal Lago <davcenlag@telefonica.net>
Galician translation.
Peter Landgren <peter.talken@telia.com>
Swedish translation.
Marco Bauer (Germany) <elentirmo@web.de>
German translation.
Klaus-Peter Richter (Germany) <k-p.richter@web.de>
German translation.
Fatih Asici (Turkey) <fatih.asici@gmail.com>
Turkish translation.
Balázs Bárány <balazs@tud.at>
Hungarian translation.
Kevin Donnelly <kevin@dotmon.com>
Welsh translation.
Sahatma Petrus Dolok Marupa Siagian (Indonesia) <sahatma@renunganharian.com>
Indonesian translation.
Rizky Tahara Shita <rizky.tahara@gmail.com>
Indonesian translation
Stefano Palmeri (Italy) <rospolosco@tiscali.it>
Italian translation.
Alexander Kazancev (Russia) <kazancas@gmail.com>
Russian translation.
Robert Rowe (USA) <robert_rowe@users.sourceforge.net>
Development environment enhancements.
David Villalobos Cambronero (Costa Rica) <david_villalobos_c@yahoo.com>
The 'gb.mysql' MySQL specific component.
Spanish translation.
Peter Mathijssen <pmathijssen@gmail.com>
Dutch translation.
Liang Wei (China) <pingyuanv@126.com>
Simplified Chinese translation.
Philippe Séraphin (France) <seraf56@users.sourceforge.net>
IDE Packager wizard enhancements.
Alexandros Prekates (Greece) <aprekates@gmail.com>
Greek translation.
Pablo Mileti (Argentina) <pablomileti@gmail.com>
GNUBoxWorld and Puzzle1To8 examples.
Timothy Marshal-Nichols (United Kingdom) <timothy.marshal-nichols@ntlworld.com>
PictureDatabase example.
Printing example.
Jairo Alonso Badillo Bedoya (Columnia) <jbadbe@gmail.com>
Concent game example.
Gareth Bult (United Kingdom) <gareth@encryptec.net>
WebCam video example.
Iman Karim (Germany) <iman.karim@smail.inf.fh-bonn-rhein-sieg.de>
Gravity example.
GameOfLife example.
Stefan Lang (Germany) <lang@organet.com>
German translation.
Radek Fryšták (Czech Republic) <geniv.radek@gmail.com>
Czech translation.
Mathias Ebermann (Germany) <math.eber@t-online.de>
German translation.
Florin Iacob (Romania) <zamox.goo@gmail.com>
Romanian translation.
Josef Kubíček (Czech Republic) <kubijo@gmail.com>
Czech translation.
Regimantas Baublys (Lithuania) <regtech0@gmail.com>
Lithuanian translation.
Edison Henrique Andreassy (Brazil) <ehasis@hotmail.com>
Brazilian Portuguese translation.
Randall Morgan <rmorgan62@gmail.com>
The 'gb.gsl' GNU Scientific Library component.
Tobias Boege (Germany) <tobias@gambas-buch.de>
The 'gb.data' component.
The 'gb.inotify' component.
The 'gb.ncurses' component.
The 'gb.openssl' component.
Adrien Prokopowicz (France) <prokopy@users.sourceforge.net>
The rewritten 'gb.xml' component.
The 'gb.xml.html' component.
Emil Lenngren (Sweden) <emil-lenngren@users.sourceforge.net>
The initial Just-In-Time compiler.
Bruce Bruen (Australia) <bbruen@users.sourceforge.net>
IDE Packager wizard enhancements.
Sebastian Kulesz <sebikul@gmail.com>
Spanish translation.
Gambas Debian/Ubuntu packaging.
The 'gb.logging' component.
The 'gb.memcached' component.
The 'gb.net.pop3' component.
Paul Wheeler (USA) <paulwheeler@cox.net>
English Grammar Check & Clarifications to Wiki entries.
Willy Raets (Netherlands) <willy@openmailbox.org>
Dutch translation.
Marcelo López (Argentina) <d4t4full@gmail.com>
ODBC driver enhancements.
Bastian Germann (Germany) <bastiangermann@fishpost.de>
Cygwin package.
Debian package.
pkgsrc package.
Porting on NetBSD and OpenBSD.
Portability fixes for Cygwin.
Benoît Minisini (France) <g4mba5@gmail.com>
French translation.
Main developer. Did everything else...
......@@ -33,7 +33,7 @@ Public Sub _new()
' Dim hImage As Image
' Dim hBackground As Image
Me.Background = Color.SetAlpha(Color.TextBackground, 90)
Me.Background = Color.SetAlpha(Color.TextBackground, 30)
'hImage = Image.Load("img/background/tawhid.png")
'hBackground = New Image(hImage.W, hImage.H, Color.SetAlpha(Color.TextBackground, 160))
......@@ -107,67 +107,83 @@ Private Sub FillAbout()
Dim iPos As Integer
Dim I As Integer
Dim N As Integer
Dim sDesc As String
hFic = Open "authors.txt"
hFic = Open "AUTHORS"
While Not Eof(hFic)
Line Input #hFic, sLig
sLig = RTrim(sLig)
If Not sLig Then Continue
If Left(sLig) = "-" Then Continue
If Left(sLig) = "#" Then Continue
sName = sLig
Line Input #hFic, sMail
Line Input #hFic, sCountry
sText = ""
While Not Eof(hFic)
Line Input #hFic, sLig
If Not sLig Then Continue
If Left(sLig) = "-" Then Break
If Not IsSpace(Left(sLig)) Then
If sName Then aAuthor.Add(sName & "\n\n" & Html(sMail) & "\n" & sCountry & "\n" & sDesc)
sName = Trim(sLig)
sMail = ""
sCountry = ""
sDesc = ""
iPos = RInStr(sName, "<")
If iPos Then
sMail = Mid$(sName, iPos + 1)
If Right(sMail) = ">" Then sMail = Left(sMail, -1)
sName = Trim(Left(sName, iPos - 1))
Endif
iPos = RInStr(sName, "(")
If iPos Then
sCountry = Mid$(sName, iPos + 1)
If Right(sCountry) = ")" Then sCountry = Left(sCountry, -1)
sName = Trim(Left(sName, iPos - 1))
Endif
sLig = RemoveLink(sLig)
If Right(sLig) <> "." Then sLig &= "."
sText &= sLig & "<br>"
Wend
If Right(sText, 4) = "<br>" Then sText = Left(sText, -4)
aAuthor.Add(sName & "\n\n" & sMail & "\n" & sCountry & "\n" & sText)
Wend
Close #hFic
hFic = Open "support.txt"
While Not Eof(hFic)
Line Input #hFic, sLig
iPos = InStr(sLig, " ")
If iPos = 0 Then Break
sName = Mid$(sLig, iPos + 1)
sText = sName & "\n" & Left(sLig, iPos - 1)
iPos = aAuthor.Find(sName & "\n*", gb.Like)
If iPos < 0 Then
aAuthor.Add(sText)
Else
aAuthor[iPos] = sText & Mid$(aAuthor[iPos], Len(sName) + 2)
sLig = RemoveLink(Markdown.ToHTML(LTrim(sLig)))
If sLig Begins "<p>" Then sLig = Mid$(sLig, 4)
If sLig Ends "</p>" Then sLig = Left$(sLig, -4)
If sDesc Then sDesc &= "<br>"
sDesc &= sLig
Endif
Wend
If sName Then aAuthor.Add(sName & "\n\n" & sMail & "\n" & sCountry & "\n" & sDesc)
Close #hFic
' hFic = Open "support.txt"
'
' While Not Eof(hFic)
'
' Line Input #hFic, sLig
' iPos = InStr(sLig, " ")
' If iPos = 0 Then Break
' sName = Mid$(sLig, iPos + 1)
' sText = sName & "\n" & Left(sLig, iPos - 1)
'
' iPos = aAuthor.Find(sName & "\n*", gb.Like)
' If iPos < 0 Then
' aAuthor.Add(sText)
' Else
' aAuthor[iPos] = sText & Mid$(aAuthor[iPos], Len(sName) + 2)
' Endif
'
' Wend
'
' Close #hFic
aAuthor.Sort(gb.Language + gb.IgnoreCase)
gvwAbout.Columns.Count = 1
N = 6
gvwAbout.Rows.Count = aAuthor.Count + N
gvwAbout.Rows.Count = aAuthor.Count + N + 1
gvwAbout.Columns[0].Width = Me.ClientWidth - Desktop.Scale * 6
gvwAbout.Padding = Desktop.Scale
......@@ -234,6 +250,9 @@ Private Sub FillAbout()
'gvwAbout.Rows[I + N].Height += Desktop.Scale
Next
' Final space
gvwAbout.Rows[I + N].H = dwgAbout.H
End
......@@ -255,7 +274,7 @@ Private Sub ScrollText(D As Integer)
$aCache[2] = hImage
Inc $YP
If ($YP * dwgAbout.H) >= gvwAbout.ScrollH Then $YP = 0
If ($YP * dwgAbout.H) >= (gvwAbout.ScrollH - dwgAbout.H) Then $YP = 0
PaintAbout($aCache[2], $YP)
......@@ -264,7 +283,7 @@ Private Sub ScrollText(D As Integer)
Else If D < 0 Then
While $Y < 0
If $YP = 2 Then
$Y = 0
Break
......@@ -278,6 +297,7 @@ Private Sub ScrollText(D As Integer)
$aCache[0] = hImage
Dec $YP
If $YP < 0 Then $YP = gvwAbout.ScrollH \ dwgAbout.H - 1
PaintAbout($aCache[0], $YP - 2)
Wend
......@@ -319,6 +339,7 @@ End
Private Sub PaintAbout(hImage As Image, iPos As Integer)
gvwAbout.Move(Me.ClientW, 0, dwgAbout.W, dwgAbout.H)
If iPos < 0 Then iPos += gvwAbout.ScrollH \ dwgAbout.H
gvwAbout.Scroll(0, iPos * dwgAbout.H)
hImage.Fill(Color.Transparent)
Paint.Begin(hImage)
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment