Solarus-Games English Forum

Community => General discussion => Topic started by: Zefk on May 15, 2016, 06:11:07 AM

Title: Zolarus Chripora - Pseudocode like code
Post by: Zefk on May 15, 2016, 06:11:07 AM
Zolarus Chripora

About:
I will probably code it. No date decided. A small short game pack template with most needed scripts that I am "thinking" of making if I get time. Not really decided. The name is based on "Solarus Christopho." The name of the Engine and Creator. This project is suppose to be easy plug and go for those with little programming experience. Christopho has already made many of the needed scripts and the scripts can be found in the source code of his games.

Started some scripts:
8-25-16 (August 25, 2016)

Currently working on:

Scripts:
Scripts I am thinking of making for Zolarus Chripora: (I am posting this here to clean up the help guide project. (http://forum.solarus-games.org/index.php/topic,611.msg3159.html))



Completed scripts for Zolarus script pack:

New:
Advanced Number Input: Here (http://forum.solarus-games.org/index.php/topic,801.msg4360.html#msg4360)
Advanced Digit Display: Here (http://forum.solarus-games.org/index.php/topic,803.0.html)
Multiple Digit Display script: Here (http://forum.solarus-games.org/index.php/topic,810.0.html)
New Bank Script: Here (http://forum.solarus-games.org/index.php?topic=806.msg4380#msg4380)
Menu Dialog Display: Here (http://forum.solarus-games.org/index.php/topic,809.0.html)
Character Input Script: Here (http://forum.solarus-games.org/index.php/topic,811.0.html)
Pick Name Script: Here (http://forum.solarus-games.org/index.php/topic,812.0.html)
Gallery Script: Here (http://forum.solarus-games.org/index.php/topic,813.0.html)
Jam Station: Here (http://forum.solarus-games.org/index.php/topic,819.msg4443.html#msg4443) (A Bug in the engine crashes the second page)
Time System Script: Here (http://forum.solarus-games.org/index.php/topic,823.0.html)


Old:
-Volume Control script by Zefk: Here (http://forum.solarus-games.org/index.php/topic,737.msg3880.html#msg3880) and the entire project: Here (http://forum.solarus-games.org/index.php/topic,401.msg3898.html?PHPSESSID=j5bag8k4vh8kifheussrrclbd0#msg3898)
-Input Number script by Zefk: Here (http://forum.solarus-games.org/index.php/topic,624.msg4006.html#msg4006)
-Bank script: Here (https://mega.nz/#!DF8U1a7C!fkVkQk_N48o7erluaIa_UU7NJJr6ER35P5zyjaYYNoE)
Title: Re: Zolarus Chripora - Pseudocode like code
Post by: 20degree on September 12, 2016, 10:41:59 AM
Here is an example of code for the current time of the computer for the software futurepinball.

1st there is a timer component: 1 timer = 1000ms (micro seconds) = 1 second
' *****************************************************************
' ***** This display the current time and date in the HudDmd ******
' *****************************************************************

Sub DmdDate_Expired()
DmdDate.Enabled = False

Dim CurrentDateTime
Dim CurrentYear
Dim CurrentMonth
Dim CurrentDay
Dim CurrentHour
Dim CurrentMinute
Dim CurrentSecond

CurrentDateTime = Now()

CurrentYear = Year(CurrentDateTime)
CurrentMonth = Month(CurrentDateTime)
CurrentDay = Day(CurrentDateTime)
CurrentHour = Hour(CurrentDateTime)
CurrentMinute = Minute(CurrentDateTime)
CurrentSecond = Second(CurrentDateTime)

If (CurrentMonth = 1) Then
CurrentMonth = "JANUARY"
ElseIf (CurrentMonth = 2) Then
CurrentMonth = "FEBRUARY"
ElseIf (CurrentMonth = 3) Then
CurrentMonth = "MARCH"
ElseIf (CurrentMonth = 4) Then
CurrentMonth = "APRIL"
ElseIf (CurrentMonth = 5) Then
CurrentMonth = "MAY"
ElseIf (CurrentMonth = 6) Then
CurrentMonth = "JUNE"
ElseIf (CurrentMonth = 7) Then
CurrentMonth = "JULY"
ElseIf (CurrentMonth = 8) Then
CurrentMonth = "AUGUST"
ElseIf (CurrentMonth = 9) Then
CurrentMonth = "SEPTEMBER"
ElseIf (CurrentMonth = 10) Then
CurrentMonth = "OCTOBER"
ElseIf (CurrentMonth = 11) Then
CurrentMonth = "NOVEMBER"
ElseIf (CurrentMonth = 12) Then
CurrentMonth = "DECEMBER"
End If

If (CurrentHour = 0) Then
CurrentHour ="00"
ElseIf (CurrentHour = 1) Then
CurrentHour = "01"
ElseIf (CurrentHour = 2) Then
CurrentHour = "02"
ElseIf (CurrentHour = 3) Then
CurrentHour = "03"
ElseIf (CurrentHour = 4) Then
CurrentHour = "04"
ElseIf (CurrentHour = 5) Then
CurrentHour = "05"
ElseIf (CurrentHour = 6) Then
CurrentHour = "06"
ElseIf (CurrentHour = 7) Then
CurrentHour = "07"
ElseIf (CurrentHour = 8) Then
CurrentHour = "08"
ElseIf (CurrentHour = 9) Then
CurrentHour = "09"
Else
CurrentHour = CurrentHour
End If

If (CurrentMinute = 0) Then
CurrentMinute ="00"
ElseIf (CurrentMinute = 1) Then
CurrentMinute = "01"
ElseIf (CurrentMinute = 2) Then
CurrentMinute = "02"
ElseIf (CurrentMinute = 3) Then
CurrentMinute = "03"
ElseIf (CurrentMinute = 4) Then
CurrentMinute = "04"
ElseIf (CurrentMinute = 5) Then
CurrentMinute = "05"
ElseIf (CurrentMinute = 6) Then
CurrentMinute = "06"
ElseIf (CurrentMinute = 7) Then
CurrentMinute = "07"
ElseIf (CurrentMinute = 8) Then
CurrentMinute = "08"
ElseIf (CurrentMinute = 9) Then
CurrentMinute = "09"
Else
CurrentMinute = CurrentMinute
End If

If (CurrentSecond = 0) Then
CurrentSecond = "00"
ElseIf (CurrentSecond = 1) Then
CurrentSecond = "01"
ElseIf (CurrentSecond = 2) Then
CurrentSecond = "02"
ElseIf (CurrentSecond = 3) Then
CurrentSecond ="03"
ElseIf (CurrentSecond = 4) Then
CurrentSecond = "04"
ElseIf (CurrentSecond = 5) Then
CurrentSecond = "05"
ElseIf (CurrentSecond = 6) Then
CurrentSecond = "06"
ElseIf (CurrentSecond = 7) Then
CurrentSecond = "07"
ElseIf (CurrentSecond = 8) Then
CurrentSecond = "08"
ElseIf (CurrentSecond = 9) Then
CurrentSecond = "09"
ElseIf (CurrentSecond = 55) Then
DmdDate.Enabled = False
Else
CurrentSecond = CurrentSecond
End If

DmdShowDate.FlushQueue()
DmdShowDate.FlushAnimation()
DmdShowDate.QueueText "[y1][f3]" &CurrentHour& "H " &CurrentMinute& "M " &CurrentSecond& "[y11]" &CurrentMonth& " " &CurrentDay& "[y21]" &CurrentYear

DmdDate.Interval = 1000
DmdDate.Enabled = True
End Sub

The object named: DmdShowDate, is some dmd (dot matrix display) object. If you wonder what is: [y1][f3]? There are simply some coordinations and font type for the dmd.

I know it's not LUA, but there are month's that have 5 weeks if you want to show the current time of the computer.

A+
Title: Re: Zolarus Chripora - Pseudocode like code
Post by: Zefk on September 13, 2016, 03:22:05 AM
None of the code posted here will work without quite a bit of tweaking, so I do not mind that it is not related to Lua.
Title: Re: Zolarus Chripora - Pseudocode like code
Post by: Zefk on September 15, 2016, 11:34:51 AM
Input number script completed:

I made this input script because I need it for a bank script I am working on.
Download (https://mega.nz/#!bBsmnSQB!ck4_MMCa7Sayn3eNXrsfMI7yXyC9D7jBDwqW7TiLrq8)

I will probably update it later, but it is functional.

YouTube Video: (Sorry for the blur. This is YouTube's fault. My video is super clear.)
https://youtu.be/orWRphRfncw