Welcome to GOAL! - new forum threads

Womens and rigid worlds champs - monte Cucco

Thu, 17 Jul 2008 19:44:59 +0000

Day 2, a shorter task off the normal south/west side of monte cucco.
Kathleen crossed the goal line pretty much equal first with Corrina.

In class 2, Johnny car blew his launch on his swift and broke a bone in his foot. He expects to end up in plaster so the competition is over for him.

Results for first day (top 10)
1 25 RIGG, KATHLEEN (Moyes LITESPEED S) GBR 747
2 2 PETROVA, NATALIA (Aeros Combat) RUS 590
3 9 TOBLER, CAROLE (Moyes LITESPEED S) CHE 503
4 1 SCHWIEGERSHAUSEN, CORINNA (RED BULL LITESPEED) DEU 499
5 31 GLAS, REGINA (Aeros Combat L12) DEU 493
6 7 DIEUZEIDE, FRANCOISE (Icaro Laminar Z9 13.2) FRA 481
7 3 WERNER, MONIQUE (Aeros Combat L12) DEU 479
8 20 KAMINE, AKARI (Icaro Laminar Z9) JPN 458
9 33 BAZAN, LAURA (Aeros Combat) ARG 434
10 29 YAKOH, MITSUKO (Icaro Laminar Z9 13.2) JPN 426

Looks like Kathleen has won the first day!
So far she is the only glider in goal. She found a low save that Corrina missed at about 600ft agl. It was quite windy, launch at Tre Pezzi (North East). The task can be seen at www.cucco08.org, going south to penino, and then north up to Gubbio and back into Sigillo.
Kathleen had an advantage over Corrina gliding into wind, despite Corrinas new Litespeed RS3.5 (Kathleen is flying my 3 year old Litespeed S4).
Pics on Jamies blog lonked below.

Opening ceremony is sunday with first task on Wednesday (2 practise tasks).
check Jamie sheldon's blog for news and pics.

Forcast according to the rather noddy "metcheck" is light winds with only a few showery days in the next 2 weeks.
17th July was too windy, Carl flew and advised the girlies not to bother. Huge lenticular clouds in the lee of the ridge.
15th/16th July was good flying if a bit blue and stable.

Results For bos ROUND 2.

Tue, 15 Jul 2008 21:27:17 +0000

Results of the British Open series, Round two can now be found on this page:
http://bhgc.wikidot.com/2008:meet-two

#	Id	Name	Nat	Glider	T 1	T 2	Total
1	7	Dave Matthews M	GBR	Moyes Litespeed S	867	914	1781
2	8	Bruce Kavanagh M	GBR	Wills Wing T2	837	765	1602
3	53	Paul Harvey M	GBR	Aeros Phantom	775	765	1540
4	1	Gordon Rigg M	GBR	Moyes Litespeed	903	623	1526

Carl Wallbank at the French Nationals, St. Andre

Mon, 14 Jul 2008 09:11:07 +0000

It appears Carl came in 8th in the French Nationals, but should have done so much better. There were a couple of really nice days, but low cloud base, stability and wind limited the number of tasks.
The first task was very windy and marginal, and many pilots did not complete the course by choice, but some did get to goal. Carl landed short but I don't know if it was by choice or not…
The second task, despite Carl being on the task setting committee, he managed to go to an incorrect turnpoint. At this point Carl was pretty close to Kathleen well down the scores…
The next two tasks Carl won, and moved up to 8th. so congratulations to Carl on his continued improvement and world class performance!

Soon there may be more of the French nats in Jamies blog, but its not there yet…something must be keeping her busy…
http://naughtylawyertravels.blogspot.com/

Kathleen now travels to the womens worlds in monte Cucco Italy, where Johnny Carr will also fly his swift in the rigid worlds. Just the two brits will be there.

Latest NATS rules

Tue, 08 Jul 2008 11:56:43 +0000

The updated version of the NAts rules are now available and can be downloaded from here
NATS rules 2008 updated

2008 Chabre Hang Gliding Open the Pre-Worlds

Sat, 05 Jul 2008 12:12:07 +0000

And the winners are…

Competition winner: Scott Barrett (Aus) glider:Airbourne C4 13.5mtr

Team results are:
1: GB Carl Wallbank : Gary Wirdham: David Mathews : Bruce Kavanagh: Richard Lovelace: Robin Hamilton: Malcolm Brown:
2: France
3: Hungary

Pre-Worlds, Laragne: Keep it up lads

Mon, 30 Jun 2008 17:37:06 +0000

Forget about the tennis my eyes are peeled on the Worlds, excellent work by the British team as they confirm their lead which was established from day 1. Not to mention Gary Wirdnam who is in 2nd place!

The organisers of the Pre-worlds have some fantastic web pages that allow us to keep up to date with how the team are progressing. For those that don't have the URLs the links are below.

Official web page with results: http://www.chabre2009.com

A blog that gives you almost an hourly update at: http://www.chabre2009.blogspot.com. The Brits have already had a bit of coverage, I think Carl is captured on film coming in to goal "not first, but close", Gordon gets a mention in a very good interview with Scott Barrett after the first task and I could swear that's David Shields jumping off a cliff into the waterfall… the nutter!

If anyone in Laragne reads this then wish the team the best. Any chance we could get some posts on this site so we can get the latest from inside the British camp or is there something else similar that I am missing?

Go the Brits!

Europeans 08 news

Mon, 09 Jun 2008 22:07:01 +0000

The first competition day - 9th june - was cancelled because of the bad weather conditions. All pilots were at the take off area - but unfortunately there was no chance to have a good task. But: tomorrow is a new day - and an new chance:-)

…the usual Austrian weather forecast, tomorrow is better, the day after should be very good! :)

More can be found here :- http://www.drachenflieger.at

NXCL mapping

Sun, 01 Jun 2008 13:54:47 +0000

If you go to your pilot log in the nxcl, and click on "map flights" you will get something like this.

note the new button in the top right hand corner. "earth"

click it.

it should then download a new plug in for either ie7 or firefox,
A restart of either browser will then be required.

going back to the mapping page, and clicking the "earth" button will then display your flights in google earth within the browser.

BOS first round

Wed, 07 May 2008 11:30:21 +0000

Bruce Kavanagh

1	KAVANAGH Bruce	Wills Wing T2
2	STEPHENS Tony	Aeros Combat
3	MATTHEWS Dave	Moyes Litespeed S

more >>

2008 Sponsors

Tue, 25 Mar 2008 11:19:56 +0000

The following sponsors have agreed to support the "League" for the 2008 season.

Many thanks to them.

Latest "Nationals" entry Form

Tue, 25 Mar 2008 10:40:38 +0000

Latest downloadable pdf for the Nationals are :-

	"Nationals " Guest Application Form
	"Nationals" UK Pilot Application Form

Nationals Entry Form

Wed, 06 Feb 2008 09:00:51 +0000

Please complete and return asap.

Comp details : http://bhgc.wikidot.com/2008:nats

Application Form : http://rogallo.co.uk/local--files/2008:nats/Laragne-2008.doc

I think the word is competitions :-)

Sat, 02 Feb 2008 19:59:26 +0000

competitions

BOS 2008 Rules

Tue, 22 Jan 2008 14:54:13 +0000

They can be found here: http://bhgc.wikidot.com/bos-rules
PLEASE NOTE THERE ARE A NUMBER OF CHANGES.
A few minor errors have been corrected to the original document.
I will upload a pdf version as soon as a bug in the system is corrected by the developers.
(wont let you use pdf's over 100k.)

2008 Comps Application Form

Fri, 18 Jan 2008 15:07:35 +0000

BOS 2008 entry

Please complete and return by 1st of March to get the discount!

2008 LARAGNE NATIONALS Go !!

Fri, 18 Jan 2008 12:19:23 +0000

The UK Nationals in Laragne has been confirmed and accepted by the FFVL, dates are the same and a accomodation list will be added shortly on the Nationals Page under "The Comps"

Jan 2008 Comp Venue Updates

Tue, 15 Jan 2008 20:07:37 +0000

The following rounds of the BOS are fully confirmed:
1ST ROUND
British Open, Long Mynd, 2-6 May 2008
Event to have FAI Cat 2 status to allow pilots to qualify for Worlds in Monte Cucco 2008.
Mark Stewart will be your meet director – Many thanks to Mark!

2ND ROUND
Yorkshire Dales, 9-13 July 2008

The following competitions are NOT yet fully confirmed with local clubs
– EXPECT CONFIRMATION EARLY FEB 2008

3RD ROUND (DO NOT BOOK ACCOMODATION UNTIL MEET CONFIRMED)
Crickhowell, 22-26 August 2008 (venue to be confirmed with local club)

Nationals (DO NOT BOOK ACCOMODATION UNTIL MEET CONFIRMED)
Laragne 3-9 August 2008 (venue to be confirmed with FFVL).
Event will include Class 5 championship and FAI Cat 2 status if at least 6 pilots compete.

Kathleen Rigg
Comps Panel Chairman

phase one lock down

Fri, 04 Jan 2008 17:43:16 +0000

I have locked the site down a bit to stop anon edits and entries.
Later i will be locking it down even more to members only editing, but first i would like to see a few more names in the members list

Converting Excell files to wikidot

Fri, 04 Jan 2008 02:24:09 +0000

And untill "the gods" come up with something better, then we have to make do with what we have.

The easiest way i have come across to date is by using a converter.

So here is an idiots guide. Written by an idiot.

1 Generate your excell file

eg:-

Get the excell converter loaded.

to do this, whilst on your excell sheet hit ALT and F8
you will get a pop up like this.

stick something in the macroname box (anything will do)
Create should now highlight. hit it

the box will expand.
remove the:

 Sub e() End Sub

Next, copy and paste from the code in the box below, when you hit "show me the code"

Code

+ show me the code

- hide the code

 Option Explicit Public Sub ExcelToWikidot() ' 'ExcelToWikidot 'Version 2.1.007 du 04/11/2007 'Author gerdami 'Credits: ' McGimpsey and Associates, for the idea: http://www.mcgimpsey.com/excel/udfs/multicat.html ' David McRitchie, for the colors: http://www.mvps.org/dmcritchie/excel/colors.htm#hexconv ' John Walkenbach, for the split function: http://j-walk.com/ss/excel/tips/tip93.htm ' Chip Pearson, for the Conditional Formatting Colors: http://www.cpearson.com/excel/CFColors.htm Dim aRange, rCell As Range Dim nRows, nCols, i, j, x As Long Dim sAlign, sBackgroundColor, sCell, sWdLf, xColor As String Dim xString As Variant sWdLf = " _" 'sWdLf = " _" & vbLf Set aRange = Selection.CurrentRegion nRows = aRange.Rows.Count nCols = aRange.Columns.Count 'Sheets.Add.Name = "Wikidot" ... test whether Wikidot sheet exists and delete TODO ! Sheets.Add ActiveCell.Value = "[[table style=""width: 100%; border-collapse: collapse; border:2px solid""]]" 'ActiveCell.Value = "[[table]]" ActiveCell.Offset(1, 0).Activate For i = 1 To nRows ActiveCell.Value = "[[row]]" ActiveCell.Offset(1, 0).Activate For j = 1 To nCols Set rCell = aRange.Cells(i, j) sCell = Trim(aRange.Cells(i, j).Text) 'remove spaces before and after text sCell = Application.WorksheetFunction.Substitute(sCell, vbLf, sWdLf) 'replace char(010) by " _" 'ActiveCell.Value = ActiveCell.Value & "[[cell]]" '[[cell style is build piece by piece ActiveCell.Value = ActiveCell.Value & "[[cell style=""border:1px solid silver; " Select Case rCell.HorizontalAlignment Case Is = xlGeneral sAlign = "" Case Is = xlCenter sAlign = "text-align: center; " Case Is = xlLeft sAlign = "text-align: left; " Case Is = xlRight sAlign = "text-align: right; " End Select ActiveCell.Value = ActiveCell.Value & sAlign ' background-color ' xColor = Right("000000" & Hex(rCell.Interior.Color), 6) 'David Mc ' xColor = Right("000000" & Hex(ColorOfCF(rCell, 0)), 6) 'Chip Pearson xColor = Right("000000" & Hex(ConditionalColor(rCell, "interior")), 6) ' xColor = "#" & Right(xColor, 2) & Mid(xColor, 3, 2) & Left(xColor, 2) If xColor <> "#FFFFFF" Then sBackgroundColor = " background-color: " & xColor & ";" Else sBackgroundColor = "" End If ActiveCell.Value = ActiveCell.Value & sBackgroundColor ActiveCell.Value = ActiveCell.Value & """]]" If Len(sCell) > 0 Then 'Wikidot does not like empty cells: v2.1.007 'cell emphasis is applied piece by piece If rCell.Font.Bold = True Then sCell = "**" & sCell & "**" If rCell.Font.Italic = True Then sCell = "//" & sCell & "//" If rCell.Font.Strikethrough = True Then sCell = "--" & sCell & "--" If rCell.Font.Superscript = True Then sCell = "^^" & sCell & "^^" If rCell.Font.Subscript = True Then sCell = ",," & sCell & ",," If rCell.Font.Underline = xlUnderlineStyleNone Then Else sCell = "__" & sCell & "__" ' font colors ' http://www.mvps.org/dmcritchie/excel/colors.htm#hexconv ' xColor = Right("000000" & Hex(rCell.Font.Color), 6) ' http://www.cpearson.com/excel/CFColors.htm ' xColor = Right("000000" & Hex(ColorOfCF(rCell, 1)), 6) xColor = Right("000000" & Hex(ConditionalColor(rCell, "font")), 6) xColor = "#" & Right(xColor, 2) & Mid(xColor, 3, 2) & Left(xColor, 2) If xColor <> "#000000" Then sCell = "#" & xColor & "|" & sCell & "##" ActiveCell.Value = ActiveCell.Value & sCell Else ' Len(sCell) = zero then nothing End If ActiveCell.Value = ActiveCell.Value & "[[/cell]]" ' With the above I have all cells in one row, with the split function, ' I will split the cells containing the Wikidot linefeed " _" ' http://j-walk.com/ss/excel/tips/tip93.htm xString = Split(ActiveCell.Text, sWdLf) For x = 0 To UBound(xString) ActiveCell.Value = xString(x) If x <> UBound(xString) Then ActiveCell.Value = ActiveCell.Value & sWdLf ActiveCell.Offset(1, 0).Activate ' I have currently a side effect: one cell per line ' but I will keep it for readibility Next x Next j 'ActiveCell.Offset(1, 0).Activate ActiveCell.Value = "[[/row]]" ActiveCell.Offset(1, 0).Activate Next i ActiveCell.Value = "[[/table]]" Selection.CurrentRegion.Select End Sub ''''''''''''''''''''''''''''''''' Function ConditionalColor(rg As Range, FormatType As String) As Long 'http://www.vbaexpress.com/kb/getarticle.php?kb_id=190 'Returns the color (either font or interior) of the first cell in range rg. If no _ conditional format conditions apply, then returns the regular color of the cell. _ FormatType is either "Font" or "Interior" Dim cel As Range Dim tmp As Variant Dim boo As Boolean Dim frmla As String, frmlaR1C1 As String, frmlaA1 As String Dim i As Long ' Application.Volatile 'This statement required if Conditional Formatting for rg is determined by the _ value of other cells Set cel = rg.Cells(1, 1) Select Case Left(LCase(FormatType), 1) Case "f" 'Font color ConditionalColor = cel.Font.Color Case Else 'Interior or highlight color ConditionalColor = cel.Interior.Color End Select If cel.FormatConditions.Count > 0 Then 'On Error Resume Next With cel.FormatConditions For i = 1 To .Count 'Loop through the three possible format conditions for each cell frmla = .Item(i).Formula1 If Left(frmla, 1) = "=" Then 'If "Formula Is", then evaluate if it is True 'Conditional Formatting is interpreted relative to the active cell. _ This cause the wrong results if the formula isn't restated relative to the cell containing the _ Conditional Formatting--hence the workaround using ConvertFormula twice in a row. _ If the function were not called using a worksheet formula, you could just activate the cell instead. frmlaR1C1 = Application.ConvertFormula(frmla, xlA1, xlR1C1, , ActiveCell) frmlaA1 = Application.ConvertFormula(frmlaR1C1, xlR1C1, xlA1, xlAbsolute, cel) boo = Application.Evaluate(frmlaA1) Else 'If "Value Is", then identify the type of comparison operator and build comparison formula Select Case .Item(i).Operator Case xlEqual ' = x frmla = cel & "=" & .Item(i).Formula1 Case xlNotEqual ' <> x frmla = cel & "<>" & .Item(i).Formula1 Case xlBetween 'x <= cel <= y frmla = "AND(" & .Item(i).Formula1 & "<=" & cel & "," & cel & "<=" & .Item(i).Formula2 & ")" Case xlNotBetween 'x > cel or cel > y frmla = "OR(" & .Item(i).Formula1 & ">" & cel & "," & cel & ">" & .Item(i).Formula2 & ")" Case xlLess ' < x frmla = cel & "<" & .Item(i).Formula1 Case xlLessEqual ' <= x frmla = cel & "<=" & .Item(i).Formula1 Case xlGreater ' > x frmla = cel & ">" & .Item(i).Formula1 Case xlGreaterEqual ' >= x frmla = cel & ">=" & .Item(i).Formula1 End Select boo = Application.Evaluate(frmla) 'Evaluate the "Value Is" comparison formula End If If boo Then 'If this Format Condition is satisfied On Error Resume Next Select Case Left(LCase(FormatType), 1) Case "f" 'Font color tmp = .Item(i).Font.Color Case Else 'Interior or highlight color tmp = .Item(i).Interior.Color End Select If Err = 0 Then ConditionalColor = tmp Err.Clear On Error GoTo 0 Exit For 'Since Format Condition is satisfied, exit the inner loop End If Next i End With End If End Function

Then Hit ALT and F4
which will return you to you sheet

Make the table pretty

eg:

select the whole table
then Hit Alt F8

which will give you

Hit RUN

A new sheet will appear with a load of horrid yukky code in column A.

Copy that code

And PASTE it into your wiki page.

And low and behold, you should get something like

	t1	t2	t3	t4
john	1	2	3	4
paul	5	6	7	8
ringo	9	a	b	c
george	d	e	f	g

Spanners in the workscan be caused by

Not selecting the whole table
Blank lines
trying to do two differnt "styles" of tables on the same sheet.
other things that i haven't fully determined…. yet.

Have fun