Add tasks for all the new languages
This commit is contained in:
parent
9dc3c2bb62
commit
bba7bfd280
13208 changed files with 134745 additions and 0 deletions
16
Task/Show-the-epoch/FreeBASIC/show-the-epoch.freebasic
Normal file
16
Task/Show-the-epoch/FreeBASIC/show-the-epoch.freebasic
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
' FB 1.05.0 Win64
|
||||
|
||||
#Include "vbcompat.bi"
|
||||
|
||||
' The first argument to the Format function is a date serial
|
||||
' and so the first statement below displays the epoch.
|
||||
|
||||
Dim f As String = "mmmm d, yyyy hh:mm:ss"
|
||||
Print Format( 0 , f) '' epoch
|
||||
Print Format( 0.5, f) '' noon on the same day
|
||||
Print Format(-0.5, f) '' noon on the previous day
|
||||
Print Format(1000000, f) '' one million days after the epoch
|
||||
Print Format(-80000, f) '' eighty thousand days before the epoch
|
||||
Print
|
||||
Print "Press any key to quit"
|
||||
Sleep
|
||||
15
Task/Show-the-epoch/FutureBasic/show-the-epoch.futurebasic
Normal file
15
Task/Show-the-epoch/FutureBasic/show-the-epoch.futurebasic
Normal file
|
|
@ -0,0 +1,15 @@
|
|||
include "ConsoleWindow"
|
||||
|
||||
print date$
|
||||
print date$("d MMM yyyy")
|
||||
print date$("EEE, MMM d, yyyy")
|
||||
print date$("MMMM d, yyyy ")
|
||||
print date$("MMMM d, yyyy G")
|
||||
print "This is day ";date$("D");" of the year"
|
||||
print
|
||||
print time$
|
||||
print time$("hh:mm:ss")
|
||||
print time$("h:mm a")
|
||||
print time$("h:mm a zzz")
|
||||
print
|
||||
print time$("h:mm a ZZZZ "); date$("MMMM d, yyyy G")
|
||||
2
Task/Show-the-epoch/Lasso/show-the-epoch.lasso
Normal file
2
Task/Show-the-epoch/Lasso/show-the-epoch.lasso
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
date(0.00)
|
||||
date(0)
|
||||
6
Task/Show-the-epoch/LiveCode/show-the-epoch.livecode
Normal file
6
Task/Show-the-epoch/LiveCode/show-the-epoch.livecode
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
put 0 into somedate
|
||||
convert somedate to internet date
|
||||
put somedate
|
||||
|
||||
-- output GMT (localised)
|
||||
-- Thu, 1 Jan 1970 10:00:00 +1000
|
||||
3
Task/Show-the-epoch/Nim/show-the-epoch.nim
Normal file
3
Task/Show-the-epoch/Nim/show-the-epoch.nim
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
import times
|
||||
|
||||
echo getGMTime(fromSeconds(0))
|
||||
3
Task/Show-the-epoch/Oforth/show-the-epoch.oforth
Normal file
3
Task/Show-the-epoch/Oforth/show-the-epoch.oforth
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
import: date
|
||||
|
||||
0 asDateUTC println
|
||||
14
Task/Show-the-epoch/Ring/show-the-epoch.ring
Normal file
14
Task/Show-the-epoch/Ring/show-the-epoch.ring
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
load "guilib.ring"
|
||||
|
||||
New qApp {
|
||||
win1 = new qMainWindow() {
|
||||
setwindowtitle("Using QDateEdit")
|
||||
setGeometry(100,100,250,100)
|
||||
oDate = new qdateedit(win1) {
|
||||
setGeometry(20,40,220,30)
|
||||
oDate.minimumDate()
|
||||
}
|
||||
show()
|
||||
}
|
||||
exec()
|
||||
}
|
||||
1
Task/Show-the-epoch/Sidef/show-the-epoch.sidef
Normal file
1
Task/Show-the-epoch/Sidef/show-the-epoch.sidef
Normal file
|
|
@ -0,0 +1 @@
|
|||
say Time.new(0).gmtime.ctime;
|
||||
1
Task/Show-the-epoch/jq/show-the-epoch-1.jq
Normal file
1
Task/Show-the-epoch/jq/show-the-epoch-1.jq
Normal file
|
|
@ -0,0 +1 @@
|
|||
0 | todate
|
||||
1
Task/Show-the-epoch/jq/show-the-epoch-2.jq
Normal file
1
Task/Show-the-epoch/jq/show-the-epoch-2.jq
Normal file
|
|
@ -0,0 +1 @@
|
|||
"1970-01-01T00:00:00Z"
|
||||
Loading…
Add table
Add a link
Reference in a new issue