VGAclocks


Author Message
dddns
Guru

Joined: 20/09/2024
Location: Germany
Posts: 353
Posted: 03:05am 12 Apr 2025      

I think it runs now without major bugs. To whom it may concern :)


VGAclocksV1RC3.bas.zip

'***********************************************************************************************************************************
' Database *************************************************************************************************************************
'***********************************************************************************************************************************

'Variables used:
Lclk_dimension:
Data "clk_ring_lw","clk_face_lw","clk_hand_cover_radius","clk_text_xoff","clk_text_yoff"
Data "clk_face_sec_length","clk_face_5min_length","clk_face_sec_lw","clk_face_5min_lw"
Data "clk_hand_cover_lw","clk_hand_width_min","clk_hand_length_min","clk_hand_length_hr"
Data "clk_hand_width_hr","clk_hand_width_sec","clk_hand_length_sec"
Data "clk_ring_radius","clk_radius","clk_scale"
Data "clk_pos_x","clk_pos_y","clk_region","clk_text_font","999"
Lclk_colour:
Data "clk_ring_bc","clk_face_bc","clk_face_fc","clk_hand_cover_bc","clk_hand_fc_sec"
Data "clk_hand_bc_min","clk_hand_fc_min","clk_hand_cover_fc","clk_hand_bc_sec","clk_text_col"
Data "clk_hand_bc_hr","clk_hand_fc_hr","clk_face_sec_col","clk_face_5min_col","999"
Lclk_other:
Data "integer clk_UTC_offset","string clk_timezone$","999"


' region numbers, 10 in a row
Lclk_timezone_name:
Data "Midway","Honolulu","Anchorage","Tijuana","Los_Angeles","Phoenix","Chihuahua","Denver","Belize","Chicago"
Data "Mexico_City","Regina","Bogota","Jamaica","New_York","Indiana/Indianapolis","Caracas","Asuncion","Halifax","Cuiaba"
Data "Manaus","St_Johns","Sao_Paulo","Buenos_Aires","Ce","Godthab","Montevideo","Bahia","Santiago","Noronha"
Data "Azores","Cape_Verde","London","Casablanca","Monrovia","Amsterdam","Belgrade","Brussels","Warsaw","Algiers"
Data "Windhoek","Athens","Beirut","Cairo","Damascus","EET","Harare","Helsinki","Istanbul","Jerusalem"
Data "Kaliningrad","Tripoli","Amman","Baghdad","Kuwait","Minsk","Moscow","Nairobi","Tehran","Muscat"
Data "Baku","Samara","Mauritius","Tbilisi","Yerevan","Kabul","Tashkent","Yekaterinburg","Karachi","Kolkata"
Data "Colombo","Katmandu","Almaty","Dhaka","Novosibirsk","Rangoon","Bangkok","Krasnoyarsk","Chongqing","Irkutsk"
Data "Kuala_Lumpur","Perth","Taipei","Ulaanbaatar","Tokyo","Seoul","Yakutsk","Adelaide","Darwin","Brisbane"
Data  "Canberra","Guam","Hobart","Magadan","Vladivostok","Srednekolymsk","Guadalcanal","Anady","Auckland","Fiji","Tongatapu","Apia",""

Lclk_timezone_offset:
Data -12,-11,-10,-8,-7,-7,-7,-7,-6
Data -6,-5,-5,-6,-5,-5,-4,-45,-3,-3
Data -4,-4,1,-4,-25,-3,-3,-3,-2,-3
Data -3,-2,0,-1,1,1,0,2,2,2
Data 2,2,2,3,3,2,3,3,2,3
Data 3,3,2,2,3,3,3,3,3,3
Data 35,4,5,4,4,4,4,4,5,5
Data 5,55,55,6,6,6,6,65,7,7
Data 8,8,8,8,8,8,9,9,9,105
Data 95,10,11,10,11,10,10,11,12,13
Data 12,13,14

'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

'Data Area

'Labels for object 1 - 10
'Dimensions:

Lclk_ring_radius1: Data 50,100,150,200,200,100,100,100,100,100
Lclk_hand_cover_radius1: Data 7,30,20,20,30,15,15,15,15,15
Lclk_ring_lw1: Data 3,3,5,3,5,10,5,5,5,5
Lclk_hand_cover_lw1: Data 2,2,2,1,3,3,3,3,3,3
Lclk_face_lw1: Data 1,3,3,5,5,10,10,10,10,10
Lclk_face_sec_length1: Data 5,10,10,20,20,5,5,5,5,5
Lclk_face_5min_length1: Data 10,20,20,30,30,10,10,10,10,10
Lclk_face_sec_lw1: Data 1,2,3,4,4,4,4,4,4,4
Lclk_face_5min_lw1: Data 1,2,3,8,10,7,7,7,7,7
Lclk_hand_width_sec1: Data 2,10,5,8,5,5,5,5,5,5
Lclk_hand_width_min1: Data 4,15,15,20,20,30,10,10,10,10
Lclk_hand_width_hr1: Data 6,10,30,35,25,15,15,15,15,15
Lclk_hand_length_sec1: Data 46,90,87,100,85,85,85,85,85,85 'clk_ring_radius() - clk_ring_lw() - clk_face_lw()
Lclk_hand_length_min1: Data 25,55,65,85,65,65,65,65,65,65 'clk_hand_length_sec() - 20
Lclk_hand_length_hr1: Data 25,40,45,70,40,40,40,40,40,40 'clk_hand_length_min() - 45
'Colours:
Lclk_ring_bc1: Data 0,0,0,0,0,0,0,0,0,0
Lclk_face_bc1: Data 0,0,0,0,0,0,0,0,0,0 '1,1,1,1,1,1,1,1,1,1
Lclk_face_fc1: Data 12,7,10,9,1,11,6,2,2,2
Lclk_face_sec_col1: Data 9,8,7,6,3,3,3,3,3,3
Lclk_face_5min_col1: Data 5,4,3,2,1,4,4,4,4,4
Lclk_hand_cover_bc1: Data 14,13,6,9,5,5,5,5,5,5
Lclk_hand_cover_fc1: Data 6,6,6,6,6,6,6,6,6,6
Lclk_hand_bc_sec1: Data 0,0,0,0,7,7,7,7,7,7
Lclk_hand_fc_sec1: Data 8,9,10,11,8,8,8,8,8,8
Lclk_hand_bc_min1: Data 0,0,0,0,9,9,9,9,9,9
Lclk_hand_fc_min1: Data 10,3,3,1,10,10,10,10,10,10
Lclk_hand_bc_hr1: Data 0,0,0,0,11,11,11,11,11,11
Lclk_hand_fc_hr1: Data 12,1,2,11,12,12,12,12,12,12

'Text colour
Lclk_text_col1: Data 3,2,15,8,8,12,10,12,15,0
'Text font
Lclk_text_font1: Data 1,1,1,1,1,1,1,1,1,1
'Text xoffset
Lclk_text_xoff1: Data 0,0,0,0,0,0,0,0,0,0
'Text yoffset
Lclk_text_yoff1: Data 20,50,80,130,70,30,20,20,20,20
'Static Positions
Lclk_pos_x1: Data 150,550,150,550,550,550,250,550,250,550
Lclk_pos_y1: Data 150,150,450,450,450,520,520,520,520,320
'Velocities
Lclk_vel_max_x1: Data 2,2,2,2,2,2,2,2,2,2
Lclk_vel_max_y1: Data 2,2,2,2,2,2,2,2,2,2

'Timezones
Lclk_region1: Data 99,11,22,33,44,55,66,77,88,99
Lclk_UTC_offset1: Data 0,1,2,3,4,5,6,7,8,9

'Scaling
Lclk_scale1: Data 100,100,100,100,100,80,70,50,20,100

'Labels for object 10 - 19
'Dimensions:
....

Edited 2025-04-12 13:23 by dddns