← jukimv1986 Classics revisited

World Football League

2003 · VB6
World Football League
Entre los equipos participantes:
Listo

// How to play

Type the sixteen team names (up to 10 letters, or keep the ones there) and press Aceptar. The teams are shuffled and a double round robin of 30 jornadas begins, eight matches each. Press Continuar (or the o buttons) to reveal a score, and Continuar again to record it and go to the next match. Scores are random, mostly 0 to 3 goals a side.

After each matchday comes the table: Pj played, Pg won, Pe drawn, Pp lost, Gm scored, Ge conceded, Gf goal difference, % goals per match, Pt points (3 a win, 1 a draw, ties split on goal difference). From matchday 2, click a team to chart its position over the season. After matchday 30 you get the top three. Reload the page for a new league.

// Revisited

Rebuilt in HTML5 + JavaScript from the original Visual Basic 6 source (WFL.frm, GraphW.frm, ModuleG.bas, December 2003). The score formula, the fixture list, the table sort, the layout and all the Spanish texts (including the "Gf" and "%" headings) are ported line by line. The return leg swaps home and away the way the original did it, by passing JG2, JG1 by reference into the same fixture routine. Averages use a decimal comma, as VB6 printed them on a Spanish Windows.

The chart window was an MSChart control. It is redrawn here as a 2D bar chart where each bar is 16 minus the position, and the empty last bar is the next matchday, which the original also added. Clicking Equipos: opens the same window for a "general" chart that the author had switched off in the code, so it shows the control's leftover design-time data, as the original did. The window icon is a redrawn stand-in for the default VB one. One fix: pressing Aceptar with an empty name used to lock the name boxes before checking them, so the gap could never be filled. Now they unlock again, next to the original "Hay equipos vacíos" message.