Author Topic: End GO  (Read 2678 times)

herge

  • Member
  • ***
  • Posts: 480
End GO
« on: February 14, 2016, 04:52:31 PM »

 Hello ALL i e *.*:

 Yes I love DOS, I still have to use it because Bloated Windows can't do it
 with less Memory, the bloody Pig!

 This above code is relatively short!

 So U will have to change start to GO.

Code: [Select]
GO proc
start:
nop
CA SU0;<SYSTEMTIME>
m DST,1
I PT,A U13,A BSYS,A ANGREEN,A Pgmt,U;Greenwich Mean
; Time GMT or Universal Co-ordinated Time UTC-U13
I PT,A U14,A B14,A ANBS,A Pbst,U;Greenwich,UNITED KINGDOM
I PT,A U13,A BSYS,A ANSYS,A Putc,U;UTC Time in London,ENGLAND
I PT,A U14,A BCET,A ANABU,A Pwat,U;Abuja,Nigeria
;G;Print OFF
I PT,A U3,A BHAD,A ANHAD,A Phadt,U;-10
I PT,A U16,A B16,A ANADE,A Parst,U;UTC+3Aden
I PT,A U14,A BCET,A ANALG,A Pcet,LF;1 ALGERIA;*L618*
GO endp


Code: [Select]
I MB,0,A B,A ANTZName,K
m edi,O B
call Stanley
m esi,O Wai
CA LAZ
I MB,0,A B,A Wai,K
exit
END GO
;X \masm32\bin\TIME\WORLD.ASM *L912*

This is just a snippet so don't try to assembler it!

 PS Happy Valentine's Day!
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #1 on: February 14, 2016, 08:58:34 PM »

 This is another typeing saving device. Go is slightly shorter than Start.
 And my eye sight and math skills are any Good! We R(are) saving
 three bytes.

 Reagrds Herge

 PS EWB Snider - A father of HEPC. It Starts here. We Light up your Home!
 HEPC Hydro Electric Power Commission. Its Hepsi generation! Apologies to
 Pepsi Cola! We all bitch about electrical rates. It starts Here, in F***ing
 St. Jacobs, take a GRT NB 21. GRT Grand River Transit, NB North Bound.
 Get OFF @ Front in Saint Jacobs, X Bridge i e Grand River. X king U need 2 be on
 West side of King & North of grand River. There is a tall monument to EWBS put up
 by the Electrical Utilities for some strange Reason! It has a electric light on top
 of it! X is Cross! as in KX, a small Railway Station in London,England. King's Cross RR Station.
 RR Railway!
 The 21 goes from CM, Conestoga Mall to Elmira,Ontario,CANADA. CM is on King@85.
 85 aka Conestoga Parkway. CM is in Waterloo, Ontario,CANADA.
 GRT is the Bus people in Region of Waterloo. Only Monday >> Saturday - NO Sunday
 or Holiday Service.
 We were First! Electricity Generators!
 Elais Weber Bingeman Snider. It also explains the road or Street names in Berlin,Waterloo,Kit che ner.
 EWBS Started June 19,1842 >> 1921 End GO!
 *$$ EOJ - IBM 370 End of File - Card Reader
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #2 on: April 18, 2016, 12:26:16 PM »
Good Morning:

I am now a Official Welfare bum!
aka I have been 2 99 Regina Street 2 Register 4
ODSP & Ontario Work and Food Supplement,
I am diabetic means I get > $.
I went 2 Henry's Their have a nice Camera Store in
the ION Destruction Zone! Do not go down either
king or northfield 2 GO 2 Conestoga Mall!
We R in Waterloo, Ontario, CANADA, EARTH!
We will b downing all components of WORLD.EXE
because of 20k limits it might B a long download!
Lot of my files need all of the 20k!

please B patient!

Regards- Herge! UTC-04 aka edt 10:25:00 PM!
 
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #3 on: April 18, 2016, 12:30:23 PM »
Code: [Select]
;WORLD Wednesday, November 11, 2015 4:43:14 PM EST
;Sunday, April 17, 2016 9:50:03 PM EDT Herge
A4 MACRO
align 4
dd 0
ENDM
R4 MACRO
ret
A4
ENDM
F MACRO Fx:REQ
Fx SYSTEMTIME<>
ENDM
G MACRO
push eax
xor ax,ax
MOV YN,ax;No Print
pop eax
ENDM
H MACRO
push eax
mov eax,1
MOV YN,ax;Print
pop eax
ENDM
J MACRO Jx:REQ
Jx db"Date & Time in "
ENDM
j MACRO jx:REQ
jx proc
ENDM
k MACRO kx:REQ
kx endp
ENDM
.data
Q EQU EQU
A Q addr
CA Q call
D Q dec
D_L Q DATE_LONGDATE
a Q 10;LineFeed
d Q dd
e Q db
g Q 13;Return
FT2ST Q FileTimeToSystemTime
GD_F Q GetDateFormat
GS_T Q GetSystemTime
GT_F Q GetTimeFormat
I Q invoke
IT Q insertTime
K Q MB_OK
MB Q MessageBox
m Q mov
O Q offset
P Q add
R Q 14346;LCID Uru
r Q MB_RIGHT
S Q 1053
TF24 Q TIME_FORCE24HOURFORMAT
ST2FT Q SystemTimeToFileTime
Z Q ret
A4
LCH Q 13322;Chile
LCHI Q 2052;China
LD Q 1030;Den
LG Q 1031;Ger
V Q 1033; USA
LS Q 1034;Sp
LF Q 1036;Fr
LH Q 1038;Hun
LIN Q 1639;Ind
LIT Q 1040;Ita
LJ Q 1041;Jap
LN Q 1043;Du
LPO Q 1045;Pol
LB Q 1046;Bra
LR Q 1049;Russ
LRO Q 0418h;Rom
LSG Q 2055;SwG
U Q 2057;UK
LM Q 2058;Mx
LSI Q 2064;SwI
LP Q 2070;Port
PQ Q 3084;Que
v Q 3079;Viet
LC Q 4105;CAN
LSF Q 4108;SwF
A4
l dw 0A00h;LineFeed
;*Read Me SU*
F M2_5;-2.5NFLD
F M3_5;-3.5NFLS
F M4_5;-4.5Ven
F P3_5;3.5Iran S
F P4_5;4.5Afgh Iran D
F P5_5;5.5India
F P5_45;5.75Nepal
F P6_5;6½ Myanmar
F P8_5;8½ North Korea
F P10_5;+10½ Lord Howe D
F P12X;Chatham S NZ
F P13X;Chatham D NZ
F U0;UTC-12
F U1;-11
F U2;-10CKT Cook SST Midway
F U3;-9Alaska
F U4;-8Pac D AKD PIS
F U5;-7Mtn S
F U6;-6Mtn D
F U7;-6Cen S GALT
F U8;-5ECT Ecuador Peru EST
F U9;-4cdt Cuba D EDT
F U10;-3;UY,SRT,CLS
F U11;-2;UYS M Uru D Green
F U12;-1Azores
F U13;0 UTC GMT+0 UK WET
F U14;+1 UK D CET S Azores Morocco WES
F U15;+2Libya Eur D CEST Tis Israel SAST SAfrica
F U16;3Saudia AST EAT MKT TID Israel Kenya Russia
F U17;4UAEPersian Gulf
F U18;5PKTPak
F U19;6IOTDiego Garcia
F U20;7Christmas CXT WIB
F U21;8China Perth,WA
F U22;9KSTKorea ACSTAust Cen S JSTJapan
F U23;10Guam
F U24;11Lord Howe
F U25;12Fij NZ S Bikini
F U26;UTC+13Fij NZ D
Y FILETIME<>
B db 10000 dup(0)
BEOB dw 0;X Buff
A4
DST dd 0
buf db 120 dup(0)
cr db g,a,0;13,10,0
tf db"HH':'mm':'ss tt",0
dfo db" dddd, MMMM, d, yyyy ",0
db 0
A4
YN dw 1
db 0
BSYSb db" "
BSYS db 120 dup(0);+0 U13
db 0
BADSb db" "
BADS db 120 dup(0);Aust Cen
db 0
BAMTb db" "
BAMT db 120 dup(0);Amaz
db 0
BAEDb db" "
BAED db 120 dup(0);Syd
db 0
BNCTb db" "
BNCT db 120 dup(0);New Cale
db 0
BAESb db" "
BAES db 120 dup(0);Aust
db 0
BAFTb db" "
BAFT db 120 dup(0);Afgh
db 0
BAWSb db" "
BAWS db 120 dup(0);Perth
db 0
BARb db" "
BAR db 120 dup(0);Argentina
db 0
BARSb db" "
BARS db 120 dup(0);Saudi
db 0
BCb db" "
BC db 120 dup(0);British Columbia
db 0
BAKDb db" "
BAKD db 120 dup(0);AlaskaD
db 0
B3b db" "
B3 db 120 dup(0);AlaskaS
db 0
B4b db" "
B4 db 120 dup(0);PacS
db 0
Bce db" "
db 120 dup(0);CubaD
db 0
Bcsb db" "
Bcs db 120 dup(0);CubaS
db 0
BChb db" "
BCh db 120 dup(0);Guam
BCKb db" "
BCK db 120 dup(0);Cook
db 0
BeCETb db" "
BeCET db 120 dup(0);U14CenEur
db 0
B15b db" "
B15 db 120 dup(0);Cent EurD
db 0
BCETb db" "
BCET db 120 dup(0);U14Cent EurS
db 0
BCESb db" "
BCES db 120 dup(0);U15Cent EurD
db 0
BCHDb db" "
BCHD db 120 dup(0);ChatD
db 0
BCHAb db" "
BCHA db 120 dup(0);ChatS
db 0
BCLSb db" "
BCLS db 120 dup(0);Chile D
db 0
BCLb db" "
BCL db 120 dup(0);Chile S
db 0
BCXb db" "
BCX db 120 dup(0);Christmas
db 0
BEAb db" "
BEA db 120 dup(0);E D
db 0
B20b db" "
B20 db 120 dup(0);U20Kras,CIS
db 0
B21b db" "
B21 db 120 dup(0);U21China
db 0
b21b db" "
b21 db 120 dup(0);+9Malay
db 0
B16Fb db" "
B16F db 120 dup(0);Djibouti
db 0
BEEb db" "
BEE db 120 dup(0);E Euro
db 0
BEECb db" "
BEEC db 120 dup(0);Egypt
db 0
B5b db" "
B5 db 120 dup(0);U5 MST Reno
db 0
B6b db" "
B6 db 120 dup(0);Pacific D
db 0
B7b db" "
B7 db 120 dup(0);Eastern D
db 0
B7Sb db" "
B7S db 120 dup(0);Central S
db 0
B8Db db" "
B8D db 120 dup(0);Central D
db 0
B8b db" "
B8 db 120 dup(0);EST-5BufNY TorON
db 0
B8Cb db" "
B8C db 120 dup(0);-4Que
db 0
B8Pb db" "
B8P db 120 dup(0);-5PET Lima,PERU
db 0
B9b db" "
B9 db 120 dup(0);-4EDTBufNY TorON
db 0
B8Sb db" "
B8S db 120 dup(0);-5ESTBufNY TorON
db 0
B9Db db" "
B9D db 120 dup(0);-4EDT D BufNY TorON
db 0
BASTb db" "
BAST db 120 dup(0);-4Atlantic
db 0
B9Cb db" "
B9C db 120 dup(0);-4Quebec
db 0
B10b db" "
B10 db 120 dup(0);AtlanticD
db 0
BF10b db" "
BF10 db 120 dup(0);-3Falkland
db 0
B10Cb db" "
B10C db 120 dup(0);-3Quebec
db 0
B11LDb db" "
B11LD db 120 dup(0);-2GreenlandU11
db 0
BFJb db" "
BFJ db 120 dup(0);FijiS
db 0
BFJSb db" "
BFJS db 120 dup(0);FijiD
db 0
BGUb db" "
BGU db 120 dup(0);UAE Persian Gulf
db 0
BHUNb db" "
BHUN db 120 dup(0);gary D
db 0
BHUSb db" "
BHUS db 120 dup(0);Hungary S
db 0
BICb db" "
BIC db 120 dup(0);Vietnam
db 0
BLHDb db" "
BLHD db 120 dup(0);Lord HoweD
db 0
BLHSb db" "
BLHS db 120 dup(0);S
db 0
BLIb db" "
BLI db 120 dup(0);Liberia
db 0
BMHb db" "
BMH db 120 dup(0);Bikini
db 0
BMMb db" "
BMM db 120 dup(0);MyanmarBurma
db 0
BMXDb db" "
BMXD db 120 dup(0);MXD
db 0
BMXSb db" "
BMXS db 120 dup(0);MXS
db 0
BMKb db" "
BMK db 120 dup(0);U16Moscow,CIS
db 0
BPHb db" "
BPH db 120 dup(0);Phil
db 0
Bisb db" "
Bis db 120 dup(0);Israel
db 0
BIDb db" "
BID db 120 dup(0);Israel
db 0
BIOb db" "
BIO db 120 dup(0);Diego Garcia
db 0
BIRDb db" "
BIRD db 120 dup(0);IranD
db 0
BIRSb db" "
BIRS db 120 dup(0);IranS
db 0
B22b db" "
B22 db 120 dup(0);9Japan
db 0
B22Ab db" "
B22A db 120 dup(0);9Australia ACST Alice Springs,NT
db 0
BNKb db" "
BNK db 120 dup(0);+8½ North Korea
db 0
BMDb db" "
BMD db 120 dup(0);USA MtnD
db 0
BNDb db" "
BND db 120 dup(0);NFLDD
db 0
BROMSEb db" "
BROMSE db 120 dup(0);Roma D E
db 0
BROMEb db" "
BROME db 120 dup(0);Roma S E
db 0
BROMSb db" "
BROMS db 120 dup(0);Roma D
db 0
BROMb db" "
BROM db 120 dup(0);Roma S
db 0
BNSb db" "
BNS db 120 dup(0);S
db 0
BSWEb db" "
BSWE db 120 dup(0);denS
db 0
BSWESb db" "
BSWES db 120 dup(0);SweD
db 0
B18b db" "
B18 db 120 dup(0)
db 0
B25b db" "
B25 db 120 dup(0);NZS
db 0
B26b db" "
B26 db 120 dup(0);NZD
db 0
BPISb db" "
BPIS db 120 dup(0);Pit
db 0
BPYb db" "
BPY db 120 dup(0);North Korea
db 0
BHADb db" "
BHAD db 120 dup(0);Alaska
db 0
B8Fb db" "
B8F db 120 dup(0);PQS
db 0
B9Fb db" "
B9F db 120 dup(0);PQD
db 0
BEb db" "
BE db 120 dup(0)
db 0
B14Fb db" "
B14F db 120 dup(0);FraS
dw 0
db 0
B15Fb db" "
B15F db 120 dup(0);FraD
db 0
BMb db" "
BM db 120 dup(0)
db 0
BMSb db" "
BMS db 120 dup(0)
db 0
BGb db" "
BG db 120 dup(0);SwG
db 0
BGSb db" "
BGS db 120 dup(0);SwGD
db 0
BIb db" "
BI db 120 dup(0);ItaS
db 0
BISb db" "
BIS db 120 dup(0);SwID
db 0
B14Db db" "
B14D db 120 dup(0);DutS
db 0
B15Db db" "
B15D db 120 dup(0);DutD
db 0
BEESb db" "
BEES db 120 dup(0);FinS
db 0
BEESFb db" "
BEESF db 120 dup(0);FinD
db 0
BEETFb db" "
BEETF db 120 dup(0);FinS
db 0
BPCESb db" "
BPCES db 120 dup(0);PolD
db 0
BPCETb db" "
BPCET db 120 dup(0);PolS
db 0
BPob db" "
BPo db 120 dup(0);PortD
db 0
BPoSb db" "
BPoS db 120 dup(0);PortS
db 0
BPzb db" "
BPz db 120 dup(0);AzoreS
db 0
BPzSb db" "
BPzS db 120 dup(0);AzoreD
db 0
BSb db" "
BS db 120 dup(0);Spain
db 0
BSSb db" "
BSS db 120 dup(0);Spain
db 0
BECb db" "
BEC db 120 dup(0);Ecuador
db 0
BGAb db" "
BGA db 120 dup(0);Galapagos
db 0
BSREb db" "
BSRE db 120 dup(0);,CIS
db 0
BTUNb db" "
BTUN db 120 dup(0);isa
db 0
B2b db" "
B2 db 120 dup(0);Hawaii
db 0
BCVb db" "
BCV db 120 dup(0);Cape Verde
db 0
B12b db" "
B12 db 120 dup(0);Greenland
db 0
BICEb db" "
BICE db 120 dup(0);land
db 0
B13b db" "
B13 db 120 dup(0);UK Std
db 0
E13b db" "
E13 db 120 dup(0);Ire Std
db 0
B14b db" "
B14 db 120 dup(0);+1UK BST Day
db 0
E14b db" "
E14 db 120 dup(0);IreD
db 0
B16b db" "
B16 db 120 dup(0);+3EATKenya,Somolia,Yemen
db 0
BISTb db" "
BIST db 120 dup(0);5½ India
db 0
BNORb db" "
BNOR db 120 dup(0);wayS
db 0
BNOSb db" "
BNOS db 120 dup(0);NorD
db 0
BNPb db" "
BNP db 120 dup(0);Nepal
db 0
BPANb db" "
BPAN db 120 dup(0);Panama
db 0
BRETb db" "
BRET db 120 dup(0);Reu
db 0
BSASb db" "
BSAS db 120 dup(0);S Africa
db 0
BSGIb db" "
BSGI db 120 dup(0);S Georgia
db 0
BSGTb db" "
BSGT db 120 dup(0);Singapore
db 0
BSSTb db" "
BSST db 120 dup(0);Midway
db 0
BBRTb db" "
BBRT db 120 dup(0);Brazil
db 0
BU10LBb db" "
BU10LB db 120 dup(0);-3BraS
db 0
BU10b db" "
BU10 db 120 dup(0);-3Green
db 0
BU11LBb db" "
BU11LB db 120 dup(0);-2BraD
db 0
BU11b db" "
BU11 db 120 dup(0);-2GreenlandD
db 0
BUb db" "
BU db 120 dup(0);ViennaD
db 0
BVb db" "
BV db 120 dup(0);ViennaS
db 0
BSCTb db" "
BSCT db 120 dup(0);Seyc
db 0
BSRTb db" "
BSRT db 120 dup(0);Surin
db 0
BTUKDb db" "
BTUKD db 120 dup(0);ey
db 0
BTUKSb db" "
BTUKS db 120 dup(0);eyS
db 0
BUDb db" "
BUD db 120 dup(0);-3UruSUYT
db 0
BUSb db" "
BUS db 120 dup(0);-2UruDUYST
db 0
BVETb db" "
BVET db 120 dup(0);-4½ Venez
db 0
BVLAb db" "
BVLA db 120 dup(0);Vlat
db 0
BWATb db" "
BWAT db 120 dup(0);Nigeria
db 0
BCIWETb db" "
BCIWET db 120 dup(0);CanaryS
db 0
BCIWESTb db" "
BCIWEST db 120 dup(0);CanaryD
db 0
BWb db" "
BW db 120 dup(0);0WaleS
db 0
BWSb db" "
BWS db 120 dup(0);1WaleD
db 0
BWAKb db" "
BWAK db 120 dup(0);Wake
db 0
BWETb db" "
BWET db 120 dup(0);MoroccoS
db 0
BWESb db" "
BWES db 120 dup(0);D
db 0
BWGSb db" "
BWGS db 120 dup(0);GreenD
db 0
BWGb db" "
BWG db 120 dup(0);GreenS
db 0
BWIBb db" "
BWIB db 120 dup(0);Indonesia
dw 0
A4
J AN
db"SWITZERLAND",0
J ANABU
db"Abuja,NIGERIA",0
J ANACS
db"Alice Springs,Northern Territory,AUSTRALIA",0
J ANADE
db"Aden,YEMEN",0
J ANAD
db"Halifax,Nova Scotia,CANADA",0
J ANAfr
db" AFRICA",0
J ANAFT
db"Kubal,AFGHANISTAN",0
J ANAK
db"Fairbanks,Alaska,USA",0
J ANALG
db"Algiers,ALGERIA",0
J ANAMT
db"Manaus,BRAZIL",0
J ANANAT
ANAna db"Anadyr,CIS",0
J ANAR
db"Buenos Aires,ARGENTINA",0
J ANARST
db"SAUDI ARABIA",0
J ANAU
db"AUSTRALIA",0
J ANAZ
db"AZORES",0
J ANB16
db"Mogadishu,SOMOLIA",0
J ANBUL
db"Sofia,BULGARIA",0
J ANCan
db"CANADA",0
J ANCRO
db"Zagreb,CROATIA",0
J ANCZ
db"CZECH",0
J ANDov
db"Dover,Delaware,USA",0
J ANest
db"ESTONIA",0
J ANFIN
db"Helsinki,FINLAND",0
J ANBR
db"BRAZIL",0
J ANC
db"Ottawa,Ontario,CANADA",0
J ANCDT
db"Chicago,illinois,USA",0
J ANCES
db"CEST Europe",0
J ANCET
db"CET Europe",0
J ANCH
db"CHATHAM ISLANDS",0
J ANCHI
db"Beijing,CHINA",0
J ANCKT
db"Rarotonga,COOK ISLANDS",0
J ANCL
db"CHILE",0
J ANCV
db"Praia,CAPE VERDE",0
J ANCX
CXI db"Christmas Island,AUSTRALIA",0
J ANCh
db"Hagatna,GUAM",0
J ANcst
db"Havana,CUBA",0
J ANDJI
db"DJIBOUTI",0
J ANDUT
db"Amsterdam,NETHERLANDS",0
J ANUTC
db"London,England U13 UTC+0",0
J ANBS
db"London,England U14 BST UTC+1",0
J ANEu
db"Europe",0
J ANF
db"Geneva-French SWISSE",0
J ANG
db"Zurich-German SCHWEIZ",0
J AP
db"Paris,FRANCE",0
J ANASAM
db"Pago Pago,AMERICAN SAMOA",0
J ANEA
db"Easter Island,CHILE",0
J ANEAT
db"KENYA",0
J ANEC
db"Quito,ECUADOR",0
J ANED
db"New York City,New York,USA",0
J ANEE
db"Tripoli,LIBYA",0
J ANEES
db"Kyiv,UKRAINE",0
J ANEg
db"Cairo,EGYPT",0
J ANFJ
db "Suva,FIJI",0
J ANFK
db"Stanley,FALKLAND ISLANDS",0
J ANFa
db"Torshavn,FAROE ISLANDS",0
J ANGA
db"GALAPAGOS ISLANDS",0
J ANGREEN
db"Greenwich,ENGLAND U13 GMT+0 UTC+0 ",0;Universal Co-Ordinated
J ANGU
db"UNITED ARAB EMIRATES",0;U17
J ANHAD
db"Adak,Alaska,USA",0
J ANHAS
db"Honolulu,Hawaii,USA",0
J ANHUN
db"Budapest,HUNGARY",0
J ANI
db"SWITZERLAND-ITALIAN SVIZZERA",0
J ANIRQ
db"Baghdad,IRAQ",0
J ANICE
db"Reykjavik,ICELAND",0
J ANIC
db"Hanoi,VIETNAM",0
J ANDG
db"DIEGO GARCIA USAF Base",0
J ANIRAQ
db"IRAQ",0
J ANIRST
db"Tehran,IRAN",0
J ANIS
db"New Delhi,INDIA",0
J ANJST
db"Tokyo,JAPAN",0
J ANKST
db"SOUTH KOREA",0
J ANNK
db"NORTH KOREA",0;+8½PYT
J ANLH
db"Lord Howe Island,AUSTRALIA",0
J ANLI
db"Tripoli,LIBYA",0
J ANMAL
db"Valleta,MALTA",0
J ANMH
db"Bikini,MARSHALL ISLANDS",0
J ANMK
db"Moscow,CIS RUSSIA",0
J ANMM
db"Rangoon,MYANNAR",0
J ANMST
db"Phoenix,Arizona,USA",0
J ANMX
db"Mexico City,MEXICO",0
J ANMY
db"Kular Lumpur,MALAYASIA",0
J ANNCT
db"Noumea,NEW CALEDONIA",0
J ANNDT
db"Saint John",27h,"s,Newfoundland & Labrador,CANADA",0
J ANNOR
db"Oslo,NORWAY",0
J ANNPT
db"Katmandu,NEPAL",0
J ANNZ
db"Wellington,NEW ZEALAND",0
J ANis
db"Jerulesum,ISRAEL",0
J ANON
db"Towns in Ontario",0
J ANP
db"Warsaw,POLAND",0
J ANPAN
db"Colon,PANAMA",0
J ANPDT
db"Los Angeles,California,USA",0;LAX Airport
J ANPET
db"Lima,PERU",0
J ANPHT
db"Manila,PHILIPPINES",0
J ANPIST
db"PITCAIRN ISLANDS",0
J ANPORT
db"Lisbon,PORTUGAL",0
J ANPY
db"Pyongyang,NORTH KOREA",0
J ANROM
db"Bucharest,ROMANIA",0
J ANRET
db"Saint-Denis,REUNION",0
J ANSG
db"SOUTH GEORGIA ISLAND",0
J ANSLO
db"Bratislava,SLOVAKIA",0
J ANSWE
db"Stockholm,SWEDEN",0
J ANTUN
db"Tunis,TUNISA",0
J ANTUK
db"Ankara,TURKEY",0
J ANPKT
db"Islamabad,PAKISTAN",0
J ANQ
db"Montreal,Quebec,CANADA",0
J ANR
db"Rome,ITALY",0
J ANS
db"Madrid,SPAIN",0
J ANSAST
db"Cape Town,SOUTH AFRICA",0
J ANSCT
db"Victoria,SEYCHELLES",0
J ANSGT
db"SINGAPORE",0
J ANSRT
db"Paramaribo,SURINAME",0
J ANSST
db"MIDWAY ATOLL",0
J ANSYS;SysTime
db"London,ENGLAND U13 UTC+0 GMT+0",0
J ANTRI
db"Port of Spain,TRINDAD & TOBAGO",0
J ANTX
db"Towns in Texas",0
J ANUK
db"UNITED KINGDOM",0
J ANUsa
db"AMERICA",0
J ANV
db"Vorenezh,CIS",0
J ANv
db"Vienna,AUSTRIA",0
J ANVET
db"Caracas,VENEZUELA",0
J ANVLA
db"Vladivostok,CIS",0
J ANW
db"Cardiff,WALES",0
J ANWAK
db"WAKE ISLAND",0
J ANWE
db"Casablanca,MOROCCO",0
J ANWG
db"GREENLAND",0
J ANWH
db"Whitehorse,Yukon,CANADA",0
J ANWIB
db"Jakarta,INDONESIA",0
J ANX
db"Dublin,IRELAND",0
J ANY
db"Montevideo,URUGUAY",0
A4 
Psst db" SST [UTC-11]",a,0;U2Midway
Pckt db" CKT [UTC-10]",a,0;Cook
Pakst db" AKST [UTC-9]",a,0;Alaska
Phast db" HAST [UTC-10]",a,0;Hawaii 5O H
Phadt db" HADT [UTC-9]",a,0
Pakdt db" AKDT [UTC-8]",a,0
Ppist db" PIST [UTC-8]",a,0
Ppst db" PST [UTC-8]",a,0
Ppdt db" PDT [UTC-7]",a,0;Pacific
Pmst db" MST [UTC-7]",a,0;Mount
Pmdt db" MDT [UTC-6]",a,0
Pcst db" CST [UTC-6]",a,0;Central
Pgalt db" GALT [UTC-6]",a,0;Galapagos
PCST db" CST [UTC-5]",a,0
Pcdt db" CDT [UTC-5]",a,0
Ppet db" PET [UTC-5]",a,0;Peru
Peasst db" EASST [UTC-5]",a,0;Easter
Pect db" ECT [UTC-5]",a,0
Pest db" EST [UTC-5]",a,0;East CAN-USA
Pvet db" VET [UTC-4½]",a,0;VENEZ
Pamt db" AMT [UTC-4]",a,0
Past db" AST [UTC-4]",a,0
PCDT db" CDT [UTC-4]",a,0;CENT
Pedt db" EDT [UTC-4]",a,0;EAST CAN-USA
Pnst db" NST [UTC-3½]",a,0;Newfoundland
Padt db" ADT [UTC-3]",a,0;Atlantic
Part db" ART [UTC-3]",a,0
Pbrt db" BRT [UTC-3]",a,0
Pclst db" CLST [UTC-3]",a,0;Chile
Pclt db" CLT [UTC-3]",a,0
Pfkst db" FKST [UTC-3]",a,0;Falk
Psrt db" SRT [UTC-3]",a,0
Puyt db" UYT[UTC-3]",a,0
Pwgt db" WGT [UTC-3]",a,0;GREEN
Pndt db" NDT [UTC-2½]",a,0;M2_5
Pbrst db" BRST [UTC-2]",a,0
PGST db" GST [UTC-2]",a,0;GULF UAE
Puyst db" UYST [UTC-2]",a,0
Pwgst db" WGST [UTC-2]",a,0;GREEN
Pcvt db" CVT [UTC-1]",a,0;CAPE VERDE
Pazot db" AZOT [UTC-1]",a,0;Azores
Pazost db" AZOST [UTC+0]",a,0;Portugal
Pwet db" WET [UTC+0]",a,0
Pgmt db" GMT [GMT+0]",a,0;U13 UTC+0London
Putc db" UTC [UTC+0]",a,0;UTC+0GMT+0UK
Pbst db" BST [UTC+1]",a,0;U14 UTC+1GMT+1England
Pcet db" CET [UTC+1]",a,0;U14 Central European
Eist db" IST [UTC+1]",a,0;U14 Ireland Day Erie
Pwest db" WEST [UTC+1]",a,0
Pwat db" WAT [UTC+1]",a,0;West AFRICA
Peet db" EET [UTC+2]",a,0;East Europe
Pcest db" CEST [UTC+2]",a,0;U15Central Euro Day 
PIST db" IST [UTC+2]",a,0;Israel
Psast db" SAST [UTC+2]",a,0;U15 S AFRICA
Parst db" AST [UTC+3]",a,0;Arab Std
Peat db" EAT [UTC+3]",a,0;East Africa
Peest db" EEST [UTC+3]",a,0
Pidt db" IDT [UTC+3]",a,0
Pmkt db" MKT [UTC+3]",a,0;U16Moscow CIS
Pirst db" IRST [UTC+3½]",a,0;3½ Iran
Pgst db" GST [UTC+4]",a,0;Gulf UAE
Psamt db" SAMT [UTC+4]",a,0;U17
Psct db" SCT [UTC+4]",a,0
Pret db" RET [UTC+4]",a,0
Paft db" AFT [UTC+4½]",a,0
Pirdt db" IRDT [UTC+4½]",a,0
Ppkt db" PKT [UTC+5]",a,0;U18Paki
Pyekt db" YEKT [UTC+5]",a,0;U18
Pist db" IST [UTC+05½]",a,0;5½ India Std
Pnpt db" NPT [UTC+05¾]",a,0
Piot db" IOT [UTC+6]",a,0;Diego Garcia
Pomst db" OMST [UTC+6]",a,0;U19
Pnovt db" NOVT [UTC+6]",a,0;U19
Pmmt db" MMT [UTC+6½]",a,0;Myanmar-Burma
Pkrat db" KRAT [UTC+7]",a,0;U20,Russia-CIS
Pcxt db" CXT [UTC+7:00]",a,0;Christmas
Pict db" ICT [UTC+7]",a,0;U20Vietnam IndoChina
Pwib db" WIB [UTC+7]",a,0;Jakrarta,Indonesia
Pawst db" AWST [UTC+8:00]",a,0;Darwin NT
Pchi db" CST [UTC+8]",a,0;CHINA
Pirkt db" IRKT [UTC+8]",a,0;U20Irkutsk
Pmyt db " MYT [UTC+8]",a,0
Ppht db" PHT [UTC+8]",a,0
Psgt db" SGT [UTC+8]",a,0
Ppyt db" PYT [UTC+8½]",a,0;N Korea
Pjst db" JST [UTC+9]",a,0;U22Japan
PU22 db" ACST [UTC+9]",a,0;U22Australia
Pyakt db" YAKT [UTC+9]",a,0;U22CIS
Pkst db" KST [UTC+9]",a,0;U22South Korea
Pacst db" ACST [UTC+09½]",a,0;Central
Paest db" AEST [UTC+10.0]",a,0;U23Sydney,NSW,Australia
Pchst db" ChST [UTC+10]",a,0;Guam
Ppett db" PETT [UTC+10]",a,0;U23
Pmagt db" MAGT [UTC+10]",a,0;R23M
Psakt db" SAKT [UTC+10]",a,0;R23S
Pvlat db" VLAT [UTC+10]",a,0;R23V
Pacdt db" ACDT [UTC+10½]",a,0
Plhst db" LHST [UTC+10½]",a,0
Plhdt db" LHDT [UTC+11.0]",a,0;LORD HOWE
Paedt db" AEDT [UTC+11.0]",a,0
Pnct db" NCT [UTC+11]",a,0;New Caledonia
Psret db" SRET [UTC+11]",a,0
Panat db" ANAT [UTC+12]",a,0
Pfjt db" FJT [UTC+12]",a,0;U25Fiji
Pmht db" MHT [UTC+12]",a,0;Marshall,Bikini
Pnzst db" NZST [UTC+12.00]",a,0
Pwakt db" WAKT [UTC+12]",a,0;WAKE
Pfjst db" FJST [UTC+13]",a,0;U26FIJI
Pnzdt db" NZDT [UTC+13.00]",a,0;NEW ZEALAND
Pchadt db" CHADT [UTC+13¾]",a,0;P13¾ NZ
Pchast db" CHAST [UTC+12¾]",a,0;NZ
.code
A4
I_TX PROTO Stm:LPVOID
I_TX proc Stm:LPVOID
push esi
m esi,Stm
call zeroHour
pop esi
I GT_F,2057,TF24,Stm,A tf,eax,32
R4
I_TX endp
;EDI>Out ESI>to In Direction Flag is UP
CAZ proc
mov eax,MAXCity
cmp eax,esi
jc @2
lodsb
cmp al,7;BackSpace
jnz @F
mov al," "
@@:
stosb
and al,al
jnz CAZ
D edi
R4
CAY proc;CAZ&Space
CA CAZ
push eax
m al," "
stosb
pop eax
R4
CAY endp
@2:
Z
int 3;*L1035*
mov esi,O LSUsaTDay
;Fudge ESI too Large
R4
CAZ endp
A1HR proc;+1Hour
P[edx].FILETIME.dwLowDateTime,061C46800h
adc[edx].FILETIME.dwHighDateTime,8
D cx
jnz A1HR
R4
A1HR endp
S1HR proc;-1Hour
sub[edx].FILETIME.dwLowDateTime,061C46800h
sbb[edx].FILETIME.dwHighDateTime,8
D cx
jnz S1HR
R4
S1HR endp
A30M proc;430E23400h+½Hour
P[edx].FILETIME.dwLowDateTime,030E23400h
adc[edx].FILETIME.dwHighDateTime,4
R4
A30M endp
S30M proc;-½Hour
sub[edx].FILETIME.dwLowDateTime,030E23400h
sbb[edx].FILETIME.dwHighDateTime,4
R4
S30M endp
A15M proc;218711A00h+15min
P[edx].FILETIME.dwLowDateTime,018711A00h
adc[edx].FILETIME.dwHighDateTime,2
R4
A15M endp
S15M proc;218711A00h-15Min
sub[edx].FILETIME.dwLowDateTime,018711A00h
sbb[edx].FILETIME.dwHighDateTime,2
R4
S15M endp
A45M proc;+¾Hour
CA A30M
CA A15M
R4
A45M endp
AH30 proc;+CX Hour+½Hour
CA A1HR
CA A30M
R4
AH30 endp
SH30 proc;-CX -½Hour
CA S1HR
CA S30M
R4
SH30 endp
PT proc USES EDI _ST:LPVOID,_b:LPVOID,_A:LPSTR,_TZ:LPSTR,_LC:DWORD
;36000000000=1Hour 18000000000=30Minute
m edi,_b
I GD_F,_LC,0,_ST,A dfo,edi,98
.if eax
add eax,edi
D eax
.else
m eax,edi
.endif
I I_TX,_ST
m esi,_b
@@:
lodsb
and al,al
jnz @B
D esi
mov al,32
mov[esi],al
inc esi
m edi,esi
m esi,_TZ
call CAZ
inc edi
m ax,YN
and ax,ax
jz @F
I MB,0,_b,_A,K
@@:
R4
PT endp
.data
include \masm32\bin\time\city
;X\masm32\bin\time\world*L1122*
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #4 on: April 18, 2016, 12:32:26 PM »
;WORLD.ASM Tuesday, December 08, 2015 12:57:51 AM EST
;*Herge*Sunday, April 17, 2016 9:50:45 PM EDT
;Windows Build-Show World Times!
include \masm32\include\masm32rt.inc
include \masm32\bin\time\world
include \masm32\bin\time\motto
include \masm32\bin\time\cita
WORLD SEGMENT PUBLIC 'DATA'
ASSUME DS:WORLD,ES:WORLD
.data
A4
LSNZ Q $;NZ
d NZDT;U26UTC+13Day
d g
d Ham
d NZ
d B26
d Chr
d NZ
d B26
d Wel
d NZ
d B26
d NZST;U25UTC+12Std
d cr
d Chr
d NZ
d B25
d Ham
d NZ
d B25
d Wel
d NZ
d B25
d CHAST;Chatham S
d cr
d ChI
d NZ
d BCHA;P13¾ Chatham D
d CHADT;Chatham D
d cr
d ChI
d NZ
d BCHD;P13¾ D
d 0
LSAUStd Q $;Australia
d Adel
d SOA
d B22A
d Adel
d SOA
d BADS
d Alice
d NT
d B22A
d Bris
d QL
d BAES
d Canb
d ACT
d BAED
d Canb
d ACT
d BAES
d CXI
d BCX
d Hob
d TAS
d BAED
d Hob
d TAS
d BAES
d Dar
d NT
d B22A
d LHI
d BLHD
d LHI
d BLHS
d Mel
d VIC
d BAED
d Mel
d VIC
d BAES
d Per
d WA
d BAWS
d Syd
d NSW
d BAED
d Syd
d NSW
d BAES;Sydney,New South Wales,AUSTRALIA
d 0
include \masm32\bin\time\CAN
LSUkDay Q $;London,England-United Kingdom
d B13;UTC+0 GMT+0 Universal Co-Ordinated Time-Greenwich Mean-Std
d B14;UTC+1 BST+0 British Summer-Day-London,England-United Kingdom
d 0
LSBR Q $;Brazil
d BU10LB;-3
d BBRT
d BAMT
d 0
LSIR Q $;Iran
d BIRD
d BIRS
d 0
LSIS Q $;Israel
d Bis
d BID
d 0
LSCU Q $
d Bcs
d B8
d 0
LSMX Q $;Mex
d BMXS
d BMXD
d 0
LSCH Q $;Chile
d Span
d San
d BCLS
d Span
d East
d BEA
d 0
include\masm32\bin\time\su;Read Me
.code
A4
SU0 proc;-13NO EDIT Address
I GS_T,A U0
I ST2FT,O U0,O Y
m cx,g
m edx,O Y
CA S1HR
I FT2ST,edx,O U0
SU0 endp
SU1 proc;-12
I GS_T,A U1
I ST2FT,O U1,O Y
m cx,12
m edx,O Y
CA S1HR
I FT2ST,edx,O U1
SU1 endp
SU2 proc;-11HAST Hawaii
I GS_T,A U2
I ST2FT,O U2,O Y
m cx,11
m edx,O Y
CA S1HR
I FT2ST,edx,O U2
SU2 endp
SU3 proc;-10Adak
I GS_T,A U3
I ST2FT,O U3,O Y
m cx,a
m edx,O Y
CA S1HR
I FT2ST,edx,O U3
SU3 endp
SU4 proc;-9PIS
I GS_T,A U4
I ST2FT,O U4,O Y
m cx,9
m edx,O Y
CA S1HR
I FT2ST,edx,O U4
SU4 endp
SU5 proc;-8MST PDT British Columbia-California
I GS_T,A U5
I ST2FT,O U5,O Y
m cx,8
m edx,O Y
CA S1HR
I FT2ST,edx,O U5
SU5 endp
SU6 proc;-7
I GS_T,A U6
I ST2FT,O U6,O Y
m cx,7
m edx,O Y
CA S1HR
I FT2ST,edx,O U6
SU6 endp
SU7 proc;-6GALTGalapagos
I GS_T,A U7
I ST2FT,O U7,O Y
m cx,6
m edx,O Y
CA S1HR
I FT2ST,edx,O U7
SU7 endp
SU8 proc;-5EASST Easter Is EST Buffalo,N Y Toronto,ON
I GS_T,A U8
I ST2FT,O U8,O Y
m cx,5
m edx,O Y
CA S1HR
I FT2ST,edx,O U8
SU8 endp
SM4_5 proc;UTC-4.5Venezeuela
I GS_T,A M4_5
I ST2FT,O M4_5,O Y
m cx,4
m edx,O Y
CA SH30
I FT2ST,edx,O M4_5
SM4_5 endp
SU9 proc;-4Buffalo,N Y,USA-Cuba D-Toronto,ON,CANADA
I GS_T,A U9;CDT ADT EDT
I ST2FT,O U9,O Y
m cx,4
m edx,O Y
CA S1HR
I FT2ST,edx,O U9
SU9 endp
SM3_5 proc;-3.5Newfoundland & Labrador,CANADA
I GS_T,A M3_5
I ST2FT,O M3_5,O Y
m cx,3
m edx,O Y
CA SH30
I FT2ST,edx,O M3_5
SM3_5 endp
SU10 proc;-3ADT ART BRT CLST FKST SRT WGT UYT Atlantic Argentina Brazil Chile Falklands Greenland Uruguay
I GS_T,A U10
I ST2FT,O U10,O Y
m cx,3
m edx,O Y
CA S1HR
I FT2ST,edx,O U10
SU10 endp
SM2_5 proc;U-2.5Newfoundland & Labrador
I GS_T,A M2_5
I ST2FT,O M2_5,O Y
m cx,2
m edx,O Y
CA SH30
I FT2ST,edx,O M2_5
SM2_5 endp
SU11 proc
I GS_T,A U11;-2Greenland-Denmark
I ST2FT,O U11,O Y
m cx,2
m edx,O Y
CA S1HR
I FT2ST,edx,O U11
SU11 endp
SU12 proc;-1AZOT Azores
I GS_T,A U12
I ST2FT,O U12,O Y
m cx,1
m edx,O Y
CA S1HR
I FT2ST,edx,O U12
SU12 endp
SU13 proc;UTC,GMT+0London,England-UK-Iceland
I GS_T,A U13;SYSTEMTIME UTC+00 GMT+00
I ST2FT,O U13,O Y
m edx,O Y
I FT2ST,edx,O U13
SU13 endp
SU14 proc;1 BST CET British Day Central European S
I GS_T,A U14
I ST2FT,O U14,O Y
m cx,1
m edx,O Y
CA A1HR
I FT2ST,edx,O U14
SU14 endp
SU15 proc;2CEST SEE SCPT Paris-Europe Day-South Africa Std
I GS_T,A U15
I ST2FT,O U15,O Y
m cx,2
m edx,O Y
CA A1HR
I FT2ST,edx,O U15
SU15 endp
SU16 proc;3EES EAT MKT Libya Kenya Russia CIS
I GS_T,A U16
I ST2FT,O U16,O Y
m cx,3
m edx,O Y
CA A1HR
I FT2ST,edx,O U16
SU16 endp
SP3_5 proc;3.5Iran
I GS_T,A P3_5
I ST2FT,O P3_5,O Y
m cx,3
m edx,O Y
CA AH30
I FT2ST,edx,O P3_5
SP3_5 endp
SU17 proc;4GST SCT UAE-Persian Gulf-United Arab Emirates
I GS_T,A U17;4Gulf,Reunion,Seychelles
I ST2FT,O U17,O Y
m cx,4
m edx,O Y
CA A1HR
I FT2ST,edx,O U17
SU17 endp
SP4_5 proc;UTC+04.5Kabul,Afghanistan-Tehran,Iran
I GS_T,A P4_5
I ST2FT,O P4_5,O Y
m cx,4
m edx,O Y
CA AH30
I FT2ST,edx,O P4_5
SP4_5 endp
SU18 proc;5Islambabad,Pakistan PKT U18
I GS_T,A U18
I ST2FT,O U18,O Y
m cx,5
m edx,O Y
CA A1HR
I FT2ST,edx,O U18
SU18 endp
SU19 proc;6Deigo Garcia IOT
I GS_T,A U19
I ST2FT,O U19,O Y
m cx,6
m edx,O Y
CA A1HR
I FT2ST,edx,O U19
SU19 endp
SU20 proc;7Christmas CXT Indonesia WIB KRAT
I GS_T,A U20
I ST2FT,O U20,O Y
m cx,7
m edx,O Y
CA A1HR
I FT2ST,edx,O U20
SU20 endp
SU21 proc;8MY AWST Perth,WA
I GS_T,A U21
I ST2FT,O U21,O Y
m cx,8
m edx,O Y
CA A1HR
I FT2ST,edx,O U21
SU21 endp
SU22 proc;9Japan Korea JS KS
I GS_T,A U22
I ST2FT,O U22,O Y
m cx,9
m edx,O Y
CA A1HR
I FT2ST,edx,O U22
SU22 endp
SP5_5 proc;+5.5New Delhi,India
I GS_T,A P5_5;India Std
I ST2FT,O P5_5,O Y
m cx,5
m edx,O Y
CA AH30
I FT2ST,edx,O P5_5
SP5_5 endp
SP5_45 proc;5¾ Katmandu,Nepal
I GS_T,A P5_45
I ST2FT,O P5_45,O Y
m cx,5
m edx,O Y
CA A1HR
CA A45M
I FT2ST,edx,O P5_45
SP5_45 endp
SP6_5 proc;6.5Rangoon,Burma
I GS_T,A P6_5
I ST2FT,O P6_5,O Y
m cx,6
m edx,O Y
CA AH30
I FT2ST,edx,O P6_5
SP6_5 endp
SP8_5 proc;8.5North Korea PY
I GS_T,A P8_5
I ST2FT,O P8_5,O Y
m cx,8
m edx,O Y
CA AH30
I FT2ST,edx,O P8_5
SP8_5 endp
SU23 proc;+10
I GS_T,A U23
I ST2FT,O U23,O Y
m cx,a
m edx,O Y
CA A1HR
I FT2ST,edx,O U23
SU23 endp
SP10_5 proc;10.5Lord Howe
I GS_T,A P10_5
I ST2FT,O P10_5,O Y
m cx,a
m edx,O Y
CA AH30
I FT2ST,edx,O P10_5
SP10_5 endp
SU24 proc;+11
I GS_T,A U24
I ST2FT,O U24,O Y
m cx,11
m edx,O Y
CA A1HR
I FT2ST,edx,O U24
SU24 endp
SU25 proc;12AUSTRALIA FIJI
I GS_T,A U25
I ST2FT,O U25,O Y
m cx,12
m edx,O Y
CA A1HR
I FT2ST,edx,O U25
SU25 endp
SP12_45 proc;+12X Chatham Islands,NZ
I GS_T,A P12X
I ST2FT,O P12X,O Y
m cx,g
m edx,O Y
CA A1HR
CA A45M
I FT2ST,edx,O P12X
SP12_45 endp
SU26 proc;+13NEW ZEALAND
I GS_T,A U26
I ST2FT,O U26,O Y
m cx,g;**
m edx,O Y
CA A1HR
I FT2ST,edx,O U26
SU26 endp
SP13_45 proc;+13X Chatham
I GS_T,A P13X
I ST2FT,O P13X,O Y
m cx,g
m edx,O Y
CA A1HR
CA A45M
I FT2ST,edx,O P13X
SP13_45 endp
SSS proc;-11Return is Here Midway
R4;         See SU2 WAY Above
SSS endp
zeroHour proc
push eax
;ESI>Stm if midnight hour change 0 to a 12
;Make sure ESI > to SYSTEMTIME
m al,[esi]
cmp al,0DFh
jnz @1
m ax,word ptr[esi+8];get wHour
and ax,ax;is Hour 0?
jnz @F
m ax,12;Twelve
m[esi+8],ax;System.wHour
@@:
pop eax
ret
@1:
pop eax
;int 3
mov esi,O LSUsaTDay
R4
zeroHour endp
SBEJ proc;Bejing
m edi,O B
m esi,O B21
CA CAZ
I MB,0,A B,A ANCHI,K
R4
SBEJ endp
SIJ proc;Israel
m esi,O Bis
CA CAZ
m esi,O BID
CA CAZ
I MB,0,A B,A ANis,K
R4
SIJ endp
LAZ proc;Load Ascii 0
mov edi,O B
LAZ0:
mov eax,dword ptr[esi]
and eax,eax
jz LAZx
push esi
mov esi,eax
call CAZ
pop esi
add esi,sizeof DWORD
jmp LAZ0
LAZx:;EAX 0 Exit
R4
LAZ  endp
CIS proc;Moscow,Commonwealth of Independent States
nop
I PT,A U16,A R16,A MKT,A Pmkt,U;UTC+3 Moscow,CIS=Russia
R4
CIS endp
BUCH proc;Bucharest,Romania
nop
I PT,A U16,A BROMS,A ANROM,A Peest,LRO;3 EEST Buc,Rom
I PT,A U15,A BROM,A ANROM,A Peet,LRO; +2 EET  Buc,Rom
I PT,A U16,A BROMSE,A ANROM,A Peest,U;+3 EEST
I PT,A U15,A BROME,A ANROM,A Peet,U;+2 EET
R4
BUCH endp
ATLCAN proc;Atlantic CANADA-Halifax,Nova Scotia,CANADA
nop
I PT,A U9,A BAST,A ANAD,A Past,U;-4  U9 Atlantic S
I PT,A U10,A B10C,A ANAD,A Padt,U;-3 U8 Atlantic D
R4
ATLCAN endp;Alice Springs,Northern Territory,Australia
Alice_Springs proc;ACST DateTime*L519*00000BF8h
nop
I PT,A U22,A B22A,A ANACS,A Pacst,U;L*523*Alice Springs
I PT,A P10_5,A BADS,A ANACS,A Pacdt,U;+10.5ACDT Australia
R4
Alice_Springs endp
call CIS
ERIE proc;Ireland
nop
I PT,A U13,A E13,A ANX,A Putc,2108;+0 Dublin S
I PT,A U14,A E14,A ANX,A Eist,2108;+1 Dublin D
R4
ERIE endp
Hanoi proc
nop
I PT,A U20,A BIC,A ANIC,A Pict,1066;+8.5 Hanoi,IndoChina
R4
Hanoi endp
_LAX proc;LAX Airport,Los Angeles,California,USA
nop
I PT,A U5,A B5,A PST,A Ppst,V;U5-8Pacific Std
I PT,A U6,A B6,A PDT,A Ppdt,V;U6-7Pacific Day
ret
A4
_LAX endp
Paddington proc
nop
I PT,A U8,A B8P,A ANPET,A Ppet,U;-5 U8 Lima,PERU*L546
R4
Paddington endp
Rangoon proc
nop
I PT,A P6_5,A BMM,A ANMM,A Pmmt,U;6.5 Rangoon,Burma
R4
Rangoon endp
Stanley proc;Falkland-South Atlantic-South America
nop;Falklands War-1982
I PT,A U10,A B10,A ANFK,A Pfkst,U;-3
R4
Stanley endp
Toronto proc
nop
H
I PT,A U8,A B8S,A EST,A Pest,V;-5ES East S Toronto,ON Buffalo,N Y Concord,Vermont
I PT,A U9,A B9D,A EDT,A Pedt,V;-4ED East D Toronto,ON Buffalo,N Y Concord,Vermont
;G
R4
Toronto endp
Winago proc;CS CD Central Time Winnipeg or Chicago or A.A. Milne-When We Are Six-Winnie the Pooh
nop
;H
I PT,A U7,A B7S,A CST,A Pcst,V;-6CST Central S Winnipeg,Man Chicago,ill
I PT,A U8,A B8D,A CDT,A Pcdt,V;-5CDT Central D Winnipeg,Man Chicago,ill
R4
Winago endp
UTAH proc;Park City,UTAH,USA
nop
H
I PT,A U7,A BMD,A MDT,A Pmst,U;-6 Mtn S
I PT,A U7,A BMD,A ANPCUT,A Pmst,U;-6 Mtn S
I PT,A U6,A B6,A ANPCUT,A Pmdt,U;-7 Mtn D
I PT,A U6,A B6,A MST,A Pmdt,U;-7 Mtn D
G
R4
UTAH endp
GO proc; GO Code-end start
start:
nop
CA SU0;<SYSTEMTIME> (s)
m DST,1
I PT,A U13,A BSYS,A ANGREEN,A Pgmt,U;Greenwich Mean
; Time GMT or Universal Co-ordinated Time UTC-U13
I PT,A U14,A B14,A ANBS,A Pbst,U;Greenwich,UNITED KINGDOM
I PT,A U13,A BSYS,A ANSYS,A Putc,U;UTC Time in London,ENGLAND
I PT,A U14,A BCET,A ANABU,A Pwat,U;Abuja,Nigeria
;G;Print OFF
I PT,A U3,A BHAD,A ANHAD,A Phadt,U;-10
I PT,A U16,A B16,A ANADE,A Parst,U;UTC+3Aden
I PT,A U14,A BCET,A ANALG,A Pcet,LF;1 ALGERIA;*L597*
GO endp
call Alice_Springs
I PT,A U14,A B14D,A ANDUT,A Pcet,LN;1Amsterdam,Netherlands
I PT,A U15,A B15D,A ANDUT,A Pcest,LN;2Amsterdam
I PT,A U25,A R25,A ANANAT,A Panat,U;13Anat,CIS
I PT,A U15,A BTUKS,A ANTUK,A Peet,1055;+2TURKEYS
I PT,A U16,A BTUKD,A ANTUK,A Peest,1055;+3TURKEYD
;G;PRINT Off
call ATLCAN;Halifax,Nova Scotia
I PT,A U8,A B8C,A ANED,A Pest,LC;-5East Std
I PT,A U9,A B9C,A ANED,A Pedt,LC;-4East Day
;G
I PT,A U24,A BAED,A ANAU,A Paedt,U;+11Sydney,NSW
I PT,A U23,A BAES,A ANAU,A Paest,U;10
I PT,A U21,A BAWS,A ANAU,A Pawst,U;+08;8Perth WA
I PT,A U12,A BPz,A ANAZ,A Pazot,LP;-1Azores S
I PT,A U13,A BPzS,A ANAZ,A Pazost,LP;+0Azores D
I PT,A U16,A B16,A ANIRQ,A Parst,U;Baghdad,IRAQ
I PT,A U21,A B21,A ANCHI,A Pchi,U;B China Hong Kong
I MB,0,A B8S,A ChHB,U;-5Hudson Bay
I MB,0,A B9D,A ChHBD,U;-4Churchill,Manitoba
I PT,A U25,A BMH,A ANMH,A Pmht,U;13Bikini Marshall
I PT,A U9,A B9,A ANBAR,A Past,U;BARBADOS
I PT,A U14,A BCET,A ANSLO,A Pcet,1051;1SLOVAKIA
I PT,A U15,A BCES,A ANSLO,A Pcest,1051;2
I PT,A U10,A BBRT,A ANBR,A Pbrt,LB;-3BRAZIL
I PT,A U11,A BU11LB,A ANBR,A Pbrst,LB;-2BRAZIL
I PT,A U10,A BU10LB,A ANBR,A Pamt,LB;-3Man Amaz
call BUCH
I PT,A U15,A BHUS,A ANHUN,A Pcest,LH;2Budapest,
I PT,A U14,A BHUN,A ANHUN,A Pcet,LH;1HUNGARY
call Winago; Burlington,Vermont,USA
I PT,A U10,A BAR,A ANAR,A Part,U;Bu Arg
I PT,A U15,A BEEC,A ANEg,A Peet,U;2Cairo,Egypt
I PT,A U13,A BCIWET,A ANCI,A Pwet,LS;+0Canary
I PT,A U14,A BCIWEST,A ANCI,A Pwest,LS;1Canary
CapeTown proc
nop
I PT,A U15,A BSAS,A ANSAST,A Psast,U;2C S Africa
CapeTown endp
I PT,A U13,A BW,A ANW,A Putc,1106;0Cardiff,Wales
I PT,A U14,A BWS,A ANW,A Pbst,1106;1Wales,UK
I PT,A M4_5,A BVET,A ANVET,A Pvet,U;UTC-4.5Caracas,VENEZUELA
I PT,A U13,A BWET,A ANWE,A Pwet,U;0Mor
I PT,A U14,A BWES,A ANWE,A Pwest,U;1Mor
I PT,A P12X,A BCHA,A ANCH,A Pchast,U;12¾ Chatham S
I PT,A P13X,A BCHD,A ANCH,A Pchadt,U;13¾ Chatham D
call Winago;Winnipeg,Man,CANADA-Chicago,ill,USA
I PT,A U10,A BCLS,A ANCL,A Pclst,LCH;UTC-3CHILE
I PT,A U10,A BCL,A ANCL,A Pclt,LCH;-3CHILE
I PT,A U7,A B7S,A ANCDT,A Pcst,V;-6Central S
I PT,A U8,A B8D,A ANCDT,A Pcdt,V;-5Central D
I PT,A U20,A BCX,A ANCX,A Pcxt,U;7Christmas I
I PT,A U8,A BPAN,A ANPAN,A Pest,U;-5Colon,PANAMA
call Toronto;Concord,Vermont
I PT,A U16,A BEES,A ANCZ,A Peest,1029;+3CZECH
I PT,A U7,A B7S,A ANDov,A Pest,U;7Dover
I PT,A U8,A B8D,A ANDov,A Pedt,U;8Dover,Delaware

I PT,A U19,A BIO,A ANDG,A Piot,U;6Diego Garcia
I PT,A U16,A B16F,A ANDJI,A Peat,LF;+3DJI EAT East Africa
I PT,A U16,A B16,A ANDJI,A Peat,U;3EAT
call ERIE;Ire
Easter proc;Island
nop
I PT,A U8,A BEA,A ANEA,A Peasst,LCH;-5CHILE
Easter endp
I PT,A U16,A BEES,A ANest,A Peest,1061;3ESTONIA
I PT,A U15,A BEE,A ANest,A Peet,1061;2ESTONIA
I PT,A U14,A BeCET,A ANCET,A Pcet,U;1 Europe E S
I PT,A U15,A B15,A ANCES,A Pcest,U;2 Europe E D
I PT,A U3,A B3,A ANAK,A Pakst,V;-10 Alaksa S
I PT,A U4,A BAKD,A ANAK,A Pakdt,V;-9Alaska D
I PT,A U7,A BGA,A ANGA,A Pgalt,U;-6Galapagos
I PT,A U15,A B15F,A ANF,A Pcest,LSF;2SwF
I PT,A U14,A B14F,A ANF,A Pcet,LSF;+1SwF
I PT,A U11,A B11LD,A ANWG,A Pwgst,LD;-2Green
I PT,A U10,A BU10,A ANWG,A Pwgt,LD;-3Green
I PT,A U23,A BCh,A ANCh,A Pchst,U;10Guam
I MB,0,A B9,A ANBER,K;-4Ham,Bermuda
I MB,0,A B10C,A ANBER,K;-3
;H
call Hanoi;indoChina-Vietnam
I PT,A U8,A Bcs,A ANcst,A PCST,U;-5CUBA
I PT,A U9,A B9,A ANcst,A PCDT,U;-4CUBA
I PT,A U16,A BEESF,A EEST,A Peest,1035;3Helsinki,FINLAND
I PT,A U15,A BEETF,A EET,A Peet,1035;2
;G
I PT,A U2,A B2,A ANHAS,A Phast,U;-11Hawaii 50
I PT,A U21,A R21,A ANR21I,A Pirkt,U;8IRKT
I PT,A U18,A B18,A ANPKT,A Ppkt,U;5Pakistan
I PT,A U20,A BWIB,A ANWIB,A Pwib,U;7Jakarta
I PT,A U15,A Bis,A ANis,A PIST,U;2ISRAEL
I PT,A U16,A B16,A ANis,A Pidt,U;3ISRAEL
;G
I PT,A P4_5,A BAFT,A ANAFT,A Paft,U;4.5 Kabul
I PT,A U15,A R15,A ANKa,A Peet,U;+2Kalin
I PT,A P5_45,A BNP,A ANNPT,A Pnpt,U;5¾ NEPAL
I PT,A U16,A B16,A ANEAT,A Peat,U;KENYA Dji SOMOLIA
I PT,A U22,A B22,A ANKST,A Pkst,U;9SKorea
I PT,A U21,A b21,A ANMY,A Pmyt,U;8Malay
I PT,A U20,A B20,A ANKRAT,A Pkrat,U;7KRAT
I PT,A U15,A BEE,A ANEES,A Peet,U;2
I PT,A U16,A B16,A ANEES,A Peest,U;3
call Paddington;PERU
I PT,A U13,A BPo,A ANPORT,A Putc,LP;0Port
I PT,A U14,A BPoS,A ANPORT,A Pwest,LP;1
;H
I PT,A U13,A B13,A ANUTC,A Putc,U;0UK UTC Greenwich
I PT,A U14,A B14,A ANBS,A Pbst,U;1UK British D
I PT,A P10_5,A BLHS,A ANLH,A Plhst,U;Lord Howe
I PT,A U24,A BLHD,A ANLH,A Plhdt,U
call _LAX
G;
I PT,A U15,A BS,A CEST,A Pcest,LS;2Spain D ANS
I PT,A U14,A BSS,A CET,A Pcet,LS;1Spain S
;G
;H
I PT,A U23,A R23M,A ANMAGT,A Pmagt,U;10Magdan
;G
I PT,A U9,A BAMT,A ANAMT,A Pamt,U;-4Man,BRAZIL
I PT,A U21,A BPH,A ANPHT,A Ppht,U;8Manila
I PT,A U7,A BMXS,A CST,A Pcst,LM;-6MEXICO
I PT,A U8,A BMXD,A CDT,A Pcdt,LM;-5Mex
I PT,A U2,A BSST,A ANSST,A Psst,U;UTC-11Midway
I PT,A U16,A B16,A ANB16,A Peat,U;+3 EAT Mog SOMOLIA
I PT,A U10,A BUD,A ANY,A Puyt,R;-3Std URUGUAY S
I PT,A U11,A BUS,A ANY,A Puyst,R;-2M Uru D
I PT,A U8,A B8F,A ANQ,A Pest,PQ;-5Quebec
I PT,A U9,A B9F,A ANQ,A Pedt,PQ;-4PQ
call CIS;Russia aka Moscow aka CIS
I PT,A U17,A R17,A SAMT,A Psamt,U;4 Samara,CIS
I PT,A P5_5,A BIS,A ANIS,A Pist,U;+5.5INDIA Standard Time
call Toronto;ED,ES Eastern of North America
;H
I PT,A U24,A BNCT,A ANNCT,A Pnct,U;N NEW CALEDONIA
I PT,A U19,A R19O,A ANR19O,A Pomst,U;+6 Omsk
I PT,A U15,A BNOR,A CEST,A Pcest,U;2NORWAY
I PT,A U14,A BNOS,A CET,A Pcet,U;1
;G
I PT,A U2,A BSST,A ANASAM,A Psst,U;Pago Pago
I PT,A U25,A R25P,A ANPETT,A Ppett,U;+13R25 Petr,CIS
I PT,A U10,A BSRT,A ANSRT,A Psrt,LN;Surin
I PT,A U18,A B18,A PKT,A Ppkt,U;5PAKISTAN PKT
I PT,A U14,A B14F,A CET,A Pcet,LF;1 Paris,FRANCE AP
I PT,A U15,A B15F,A CEST,A Pcest,LF;+2 French
;H
call UTAH
I PT,A U4,A BPIS,A ANPIST,A Ppist,U;PITCAIRN
I MB,0,A B9,A ANTRI,K;nidad
I PT,A U14,A BCV,A ANCV,A Pcvt,LP;1P CAPE VERDE
;H
I PT,A P8_5,A BPY,A ANPY,A Ppyt,U;+8.5N KOREA
I PT,A U8,A BEC,A ANEC,A Pect,U;Ecuador
I PT,A U13,A BICE,A ANICE,A Putc,1039;0R ICELAND
;G
I PT,A U17,A BRET,A ANRET,A Pret,U;4REUNION
I PT,A U9,A B9,A ANANT,A Past,U;-4S ANTIGUA
I PT,A M2_5,A BND,A ANNDT,A Pndt,LC;Newfoundland
I PT,A M3_5,A BNS,A ANNDT,A Pnst,LC;NFLD
I PT,A U17,A R17,A ANR17,A Psamt,U;4Sama
I PT,A U24,A BSRE,A ANSRET,A Psret,U;Sret,CIS
I PT,A U25,A BFJ,A ANFJ,A Pfjt,U;12Suva,FIJI
I PT,A U26,A BFJS,A ANFJ,A Pfjst,U;13Suva,FIJI
I PT,A P3_5,A BIRS,A ANIRST,A Pirst,U;+3.5Tehran,IRAN
I PT,A P4_5,A BIRD,A ANIRST,A Pirdt,U;4.5
I PT,A U13,A BWET,A ANFa,A Pwet,U;0 S Canary
I PT,A U14,A BWES,A ANFa,A Pwest,U;1 D
I PT,A U15,A BLI,A ANLI,A Peet,U;2Tripoli,LIBYA-USMC Hymn
I PT,A U14,A BTUN,A ANTUN,A Pcet,U;1TUNISA
call Rangoon
I PT,A U2,A BCK,A ANCKT,A Pckt,U;-11Cook
I PT,A U15,A BI,A ANR,A Pcest,LIT;2CEST Italy D
I PT,A U14,A BIS,A ANR,A Pcet,LIT;1CET Italy S
I PT,A U22,A B22A,A ANACS,A Pacst,U;9Town like Alice
I PT,A U22,A B22,A ANJST,A Pjst,U;9JAPAN
I PT,A U22,A BK22,A ANKST,A Pkst,U;9SOUTH KOREA
I PT,A U16,A BARS,A ANARST,A Parst,U;3R Saud
I PT,A U21,A BSGT,A ANSGT,A Psgt,U;+8Singapore
I PT,A U16,A BEES,A ANBUL,A Peest,U;3S BULGARIA
I PT,A U15,A BEE,A ANBUL,A Peet,U;2
I PT,A U11,A BSGI,A ANSG,A PGST,U;-2S GEORGIA I
I PT,A U15,A BSWE,A ANSWE,A Pcest,S;2S SWEDEN D
I PT,A U14,A BSWES,A ANSWE,A Pcet,S;1 S
I PT,A U15,A BI,A ANI,A Pcest,LSI;2Swi Itl D
I PT,A U14,A BIS,A ANI,A Pcet,LSI
I PT,A U15,A BEE,A ANEE,A Peet,U
I PT,A U17,A BGU,A ANGU,A Pgst,U;4United Arab Emirates-UAE Gulf
I PT,A U14,A BM,A ANMAL,A Pcet,U
I PT,A U15,A BMS,A ANMAL,A Pcest,U;2V Malta
I PT,A U17,A BSCT,A ANSCT,A Psct,U;4V Seyc
Vienna proc;,AUSTRIA
nop
I PT,A U15,A BU,A ANv,A Pcest,v;2D
I PT,A U14,A BV,A ANv,A Pcet,v;1S
Vienna endp
I PT,A U23,A BVLA,A ANVLA,A Pvlat,U;+10V,CIS
I MB,0,A R16,A ANVOR,K;+3Veronezh,CIS;U16 MKT
I PT,A U25,A BWAK,A ANWAK,A Pwakt,U;WAKE
I PT,A U14,A BPCET,A ANP,A Pcet,LPO;PORTUGAL
I PT,A U15,A BPCES,A ANP,A Pcest,LPO
;H
I PT,A U25,A B25,A ANNZ,A Pnzst,U;12W NEW ZEALAND
I PT,A U26,A B26,A ANNZ,A Pnzdt,U;13W NEW ZEALAND
I PT,A U18,A R18,A ANR18Y,A Pyekt,U;5Yeka,CIS
I PT,A U15,A BCES,A ANCRO,A Pcest,1050;Z Croatia
I PT,A U14,A BCET,A ANCRO,A Pcet,1050
Zurich proc;Swiss German
nop
I PT,A U15,A BGS,A ANG,A Pcest,LSG;2
I PT,A U14,A BG,A ANG,A Pcet,LSG;1
H
Zurich endp
m esi,O Carr
CA LAZ
I MB,0,A B,A ANBEAN,r
m esi,O USMO
CA LAZ
I MB,0,A B,A ANUSMO,r
CA LAZ
m esi,O LSUsaDay
WHY:;add esi,400000h;*WHY
CA LAZ
I MB,0,A B,A ANUsa,r
m esi,O LSUsaTDay
CA LAZ
I MB,0,A B,A ANUsa,r
m esi,O LTUsaDay
CA LAZ
I MB,0,A B,A ANUsa,r
m esi,O LSUsaStd
CA LAZ
I MB,0,A B,A ANUsa,r
crash proc
nop
crash endp
CMW proc
nop
m esi,O LSUsaTStd
CMW endp
CA LAZ
I MB,0,A B,A ANUsa,r
CMB proc
m esi,O LTUsaStd
CA LAZ
I MB,0,A B,A ANUsa,r
mov esi,O LSUsaTStd
CMB endp
CA LAZ
I MB,0,A B,A ANUsa,r
m esi,O TEXAS
CA LAZ
I MB,0,A B,A ANTX,r
m esi,O Carr
CA LAZ
I MB,0,A B,A ANBEAN,r
m esi,O LSAUStd
CA LAZ
I MB,0,A B,A ANAU,r
m esi,O LSCanDay
CA LAZ
I MB,0,A B,A ANCan,r
m esi,O LSCanStd
CA LAZ
I MB,0,A B,A ANCan,r
m esi,O OntPlaces
CA LAZ
I MB,0,A B,A ANON,r
m esi,O LSUkDay
CA LAZ
I MB,0,A B,A ANUK,K
m esi,O LSEuDay
CA LAZ
I MB,0,A B,A ANEu,r
m esi,O LSEuStd
CA LAZ
I MB,0,A B,A ANEu,r
m esi,O LSNZ
CA LAZ
I MB,0,A B,A ANNZ,r
call Moscow
CA SBEJ
m esi,O LSIS
CA LAZ
I MB,0,A B,A ANis,K
m esi,O LSIR
CA LAZ
I MB,0,A B,A ANIRST,K
I MB,0,A B22,A ANJST,K
m esi,O LSCU
CA LAZ
I MB,0,A B,A ANcst,K
m esi,O LSMX
CA LAZ
I MB,0,A B,A ANMX,K
m esi,O LSBR
CA LAZ
I MB,0,A B,A ANBR,K
m esi,O LSCH
CA LAZ
I MB,0,A B,A ANCL,K
m esi,O TZFullName
CA LAZ
I MB,0,A B,A ANTZName,K
m edi,O B
call Stanley
m esi,O Wai
CA LAZ
xor al,al
m esi,O B;NO Buffer B
mov [esi],al
I MB,0,A B,A Wai,K
exit
END GO
;X \masm32\bin\TIME\WORLD.ASM *L912*
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #5 on: April 18, 2016, 12:33:48 PM »
;masm32\bin\time\CITA Sunday, January 24, 2016 1:11:35 AM EST
;Herge Sunday, April 17, 2016 9:28:14 PM EDT
.code
Moscow proc;Commonwealth of Independent States-CIS-Russian Areas
nop
m edi,O B
m esi,O ANUTC;UTC+0 Standard London GMT+0
CA CAY
m esi,O BSYS;U13 U+0
CA CAZ
m esi,O ANBS;+1BST Day British Summer London
CA CAY
mov esi,O B14;U14BST Day GMT+1
CA CAZ
m esi,O ANKAL
CA CAY
m esi,O R15;UTC+2Kalin,CIS
CA CAZ
m esi,O ANMOS;+3MKT Moscow,COMMONWEALTH OF INDEPENDENT STATES
CA CAY
m esi,O R16;3Voro U16
CA CAZ
m esi,O ANR16V
CA CAY
m esi,O R16;Voro
CA CAZ
m esi,O ANSAM
CA CAY
m esi,O R17;SAMT
CA CAZ
m esi,O ANR18Y;5Yekt
CA CAY
m esi,O R18;U18 YEKT
CA CAZ
m esi,O ANR19N;6NOVT Novo
CA CAY
m esi,O R19N;Novo
CA CAZ
m esi,O R20;KRAT
CA CAZ
m esi,O ANR19O;6OMST Omsk
CA CAY
m esi,O R19O;Omsk
CA CAZ
m esi,O ANKra;7Kras KRAT
CA CAY
m esi,O B20;U20KRAT
CA CAZ
m esi,O R21I;Irku,CIS
CA CAY
m esi,O R21;IRKT
CA CAZ
m esi,O ANMAGA;U2310 Maga
CA CAY
m esi,O R23M;10U23MAGT Maga
CA CAZ
m esi,O ANR24S;11SRET U24 Srednek
CA CAY
m esi,O BSRE
CA CAZ
mov esi,O ANAna;12ANAT Anadyr
CA CAY
m esi,O R25;U25+12ANAT
CA CAZ
mov esi,O R25Petr;12PPET Petropavlovsk,CIS
CA CAY
m esi,O R25P;U25+12PPET
CA CAZ
I MB,0,A B,A ANMK,r
R4
Moscow endp
.data
A4
ALERT db"Alert,Nunavut,CANADA",0;ES,ED
J ANBAH
db "BAHAMAS",0;242
J ANBEAN
db"Carribbean",0; 809
J ANBER
db"Hamilton,BERMUDA",0;441
J ANBVI
db"BRITISH VIRGIN ISLANDS",0;284
J ANCI
db"CANARY ISLANDS",0;?Spain??
J ANANT
db"ANTIGUA & BARBUDA",0;268
J ANBAR
db"BARBADOS",0;246
ANCAY db"CAYMAN ISLANDS",0;345
J ANDR
db"DOMINICAN REPUBLIC",0;809
J ANJAM
db"JAMAICA",0;876
J ANPCUT
ANPCit db"Park City,Utah,USA",0
J ANPR
db"Puerto Rico",0;787
J ANPRSJ
db"San Juan, Puerto Rico",0;939
J ANSL
db"SAINT LUCIA",0;758
J ANKa
ANKAL db"Kaliningrad,CIS",0;UTC+2U15 EET
J ANKRAT
ANKra db"Krasnoyarsk,CIS",0;+7U20 KRAT
J ANMAGT
ANMAGA db"Magadan,CIS",0;+10 U23 R23M MAGT
J ANMKT
ANMOS db"Moscow,COMMONWEALTH OF INDEPENDENT STATES-Russia ",0;+3U16 MKT
J ANVOR
ANR16V db"Voronezh,CIS",0;+3U16 MKT Moscow,Russia aka CIS
J ANR17
ANSAM db"Samara,CIS",0;+4U17 SAMT
J ANR18
ANR18Y db"Yekaterinburg,CIS",0;+5YEKT
J ANNOVT
ANR19N db"Novosibirsk,CIS",0;+6U19 NOVT
J ANOMST
ANR19O db"Omsk,CIS",0;+6U19 OMST
J ANR21I; 8 R21
R21I db"Irkutsk,CIS",0;+8IRKT
J ANR23S
ANR23Y db"Yuzhno-Sakhalin,CIS",0;10SAKT Sakhalinsk
J ANSRET
ANR24S db"Srednekolymsk,CIS",0;11U24 SRET
J ANPETT
R25Petr db"Petropavlovsk,CIS",0,0;+12 U25 PETT
A4
AGB db"Alexander Graham Bell ",0
Allen db"Allen Park",0;Satelite Earth Station
Alma db"Alma",0
Bres db"Breslau",0
Bur db "Burlington",0;Vermont,USA EDT or EST
ChHBD db"Churchill,Manitoba",0;CDT UTC-8 UTC-9Hudson Bay-Arctic Port
Edmu db"Edmunston",0;New Brunswick
Ethel db"Ethel",0; ON
FErie db"Fort Erie",0;Little or No Snow,Fort Erie,ON,CANADA,Piles of Snow,Buffalo,NY,USA
KitM db"Kitimat",0;British Columbia-ALCAN Aluminium Factory
PColb db"Port Colborne",0;West end of Welland Canal Lake Erie
;Saint Lawrence Seaway Montreal to Lake Huron
QueenH db"Queenston Heights",0;Sir Issac Brock-British i e CANADA
;War of 1812-Niagara-on-the-Lake,Fort George,Fort Niagara in New York State other side of Niagara river.
SeI db"Sept Isles",0;St. Lawrence River
SGeo db"St. George",0
Sjac db"St. Jacobs",0;First HEPC Hydro Electric Power Commission Power Station before Ontario Hydro
SXav db"St. Xavier",0;Nova Scotia University
TCity db"Telephone City",0,"Wanye Gretzy 99",0;Brantford-Brant's Ford i e Joseph Brant
Thor db"Thorold",0;Inn@Lock 7 Welland Canal
O1C db 10,"1785 First Church in Ontario:His Majesty Royal Chapel for the Mohawks ",a,0
;Church of England i e Anglican Church for Mohawk Indians
GTC db"Georgetown",0; 345 Cayman 400 Banks for 200,000 People?
Nas db"Nassau",0; 242BAHAMAS
PR db"Puerto Rico",0; 767,939-UNITED STATES OF AMERICA
SJuan db"San Juan",0,0;Puerto Rico, USA
BK22b db" "
BK22 db 120 dup(0);+9South Korea KST
db 0
A4
Carr Q $
d GTC
d X
d ANCAY
d X
d B8
d Nas
d X
d P242
d B9C
d SJuan
d X
d PR
d X
d US
d X
d BAST
d GTC
d X
d ANCAY
d X
d B9C
d Nas
d X
d P242
d B9C
d SJuan
d X
d PR
d X
d US
d X
d BAST
d 0
ANTZShort db"Time Zone Short Name ",0
A4
sHAST db"HAST ",0; U2 U-10 Adak,Alaska
sAKST db"AKST ",0; U4 UTC-9
sAKDT db"AKDT ",0; U5 -8
sPST db"PST ",0;   U4  -8 B4
sPDT db"PDT ",0;   U5  -7 B5
sMST db"MST ",0;   U6  -7 Mountain Std
sMDT db"MDT ",0;   U7  -6 Mountain Day
sCDT db"CDT ",0;   U7  -6 Central Day
sCST db"CST ",0;   U8  -5 Central Std
sEST db"EST ",0;   U8  -5 Eastern Std
sEDT db"EDT ",0;   U9  -4 Eastern Day
sAST db"AST ",0;   U9  -3 B9  Atlantic Std
sADT db"ADT ",0;   B10C-3 U10 Atlantic Day
sWGT db"WGT ",0;   U10 -3 Nuuk(Godthab),Western GREENLAND
sFKST db"FKST ",0; U-3 B10 Stanley,FALKLAND ISLANDS-South America
sWGST db"WGST ",0; U-2 Nuuk
sEGT db"EGT ",0;   U12-1 Ittoqqortoormiit East GREENLAND
sEGST db"EGST ",0; UTC+0 East GREENLAND Day
sGMT db"GMT U13 GMT+0 OLD",0;Greenwich Mean Time-London,UNITED KINGDOM
sUTC db"UTC U13 UTC+0 NEW",0;England UNITED KINGDOM ReadMe SU
sBST db"BST U14 ",0;British Summer Time UTC+1 GMT+1 BST+0 CET+0
sCET db"CET ",0;U14 GMT+1 UTC+1 CET+0 Central European Time
; Bonn,GERMANY Brussels,BELGIUM Bucharest,ROMANIA Budapest,HUNGARY
; Copenhagen,DENMARK GIBRALTAR Helsinki,FINLAND Lisbon,PORTUGAL
; Madrid,SPAIN Oslo,NORWAY Paris,FRANCE Prague,CZECH Rome,ITALY
; Stockholm,SWEDEN Vienna,AUSTRIA Warsaw,POLAND Zurich,SWITZERLAND
sEIST db"IST ",0;U14Erie or Ireland Day
sCEST db"CEST ",0;UTC+2U15 Central European Day
sSAST db"SAST ",0;+2 U15 South Africa Std
sEET db"EET ",0;U15 U+2Eastern European
sEEST db"EEST ",0;U16+3Eastern European
sIRST db"IRST ",0;+3.5P3_5 Iran Std-Tehran
sIRDT db"IRDT ",0;+4.5P4_5 Iran Day-Tehran
sPKT db"PKT ",0;+5U18 Pakistan S-Islambabad
sIST db"IST ",0;+5.5P5_5 India S-New Delhi
sIsT db"IST ",0;  +3U16 Israel S-Jerulesum
sIDTX db "IDT ",0;+2U15 Israel D-Jerulesum
sEAT db"EAT ",0;+3 U16East African Time-KENYA,YEMEN,SOMOLIA
sMKT db"MKT ",0;+3 U16Moscow Std-COMMONWEALTH OF INDEPENDENT STATES-Russia
sSAMT db"SAMT ",0;+4U17Samara,CIS
sYEKT db"YEKT ",0;+5U18Yekaterinburg,CIS
sOMST db"OMST ",0;+6U19Omsk,CIS
sNOVT db"NOVT ",0;+6U19Novosibirsk,CIS
sKRAT db"KRAT ",0;+7U20Krasnoyarsk,CIS
sCXT db"CXT ",0;  +7U20The Settlement,Christmas Island,Western Australia
sWIB db"WIB ",0;  +7U20Indonesia
sAWST db"AWST ",0; +8U21Perth,Western Australia,AUSTRALIA
sIRKT db"IRKT ",0; +8U21Irkutsk,CIS
sYAKT db"YAKT ",0; +9U22Yakutsk,CIS
sACST db"ACST ",0; +9.5Alice Springs,Northern Territory,AUSTRALIA
sAEST db"AEST ",0; +10.0U23 Sydney,New South Wales,AUSTRALIA
sVLAT db"VLAT ",0; +10U23 Vladivostok,CIS
sMAGT db"MAGT ",0; +10U23 Magadan,CIS
sSAKT db"SAKT ",0; +10U23 Sakhalin,CIS
sAEDT db"AEDT ",0; +11.0U24 Sydney,New South Wales,Australia
sSRET db"SRET ",0; +11U24Srednekolymsk,CIS
sANAT db"ANAT ",0; +12U25Anadyr,CIS
sPETT db"PETT ",0; +12U25Kamchatka,CIS-Petropavlovsk,CIS
sNZST db"NZST ",0; +12U25NEW ZEALAND Standard-Wellington
sCHAST db"CHAST ",0;+12:45 P12_45 Chatham Std NZ
sNZDT db"NZDT ",0;  +13U26NEW ZEALAND Daylight-Wellington
sCHADT db"CHDT ",0; +13:45P13.75 Chatham Day NZ
db 0
ANTZName db"Time Zone Full Name ",0
A4
HAST db"Hawaiian Aleutian Standard Time UTC-10 ",0;Adak,Alaska
AKST db"Alaska Standard Time UTC-9 ",0;Juneau Anchorage Fairbanks
AKDT db"Alaska Daylight Time UTC-8 ",0;Juneau Anchorage Fairbanks
PST db"Pacific Standard Time UTC-8 ",0;B4 British Columbia,California
PDT db"Pacific Daylight Time UTC-7 ",0;B5 British Columbia,California
MST db"Mountain Standard Time UTC-7 ",0;Reno,Nevada,USA REM song Reno
MDT db"Mountain Daylight Time UTC-6 ",0;Reno,Nevada,USA
CDT db"Central Daylight Time UTC-5 ",0;Chicago,illinois,USA/Winnipeg,Manitoba,CANADA
CST db"Central Standard Time UTC-6 ",0;Chicago/Winnipeg
EST db"Eastern Standard Time UTC-5 ",0;Bufalo,NY/Toronto,ON
EDT db"Eastern Daylight Time UTC-4 ",0;Buffalo,NY/Toronto,ON
AST db"Atlantic Standard time UTC-4 ",0;B9C Halifax
ADT db"Atlantic Daylight Time UTC-3 ",0;B10C Halifax
FKST db"Falkland Islands Summer Time UTC-3 ",0;Stanley
WGT db"West Greenland Time UTC-3 ",0;Nuuk(Godthab)-DENMARK
WGST db"Western Greenland Summer Time UTC-2 ",0;Nuuk
EGT db"East Greenland Time UTC-1 ",0;Ittoqqortoormiit
EGST db"East Greenland Summer Time ",0;UTC+00 GMT+00
GMT db"Greenwich Mean Time U13 GMT+0 UTC+0 ",0;Greenwich,London,England
UTC db"Universal Co-ordinated Time U13 UTC+0 GMT+0 ",0;London,UNITED KINGDOM
BST db"British Summer Time UTC+1 GMT+1 ",0; U14 +1 BST Day
; United Kingdom-England,Scotland,Wales,Northern Ireland,Hebredies,Isle of Man,Jersey.
CET db"Central European Time UTC+1 GMT+1 CET+0 ",0;Europe
EIST db"Irish Summer Time UTC+1 ",0; U14;IRELAND Day Erie
CEST db"Central European Summer Time UTC+2 ",0;Europe D
SAST db"South Africa Standard Time UTC+2 ",0;Cape Town
EET db"Eastern European Time UTC+2 ",0;Tripoli,LIBYA
EEST db"Eastern European Summer Time UTC+3 ",0;Helsinki,FINLAND
IRST db"Iran Standard Time UTC+3:30 ",0;Iran,Tehran
IRDT db"Iran Daylight Time UTC+4:30 ",0;Iran,Tehran
PKT db"Pakistan Standard Time UTC+5 ",0;Islambabad
IST db"India Standard Time UTC+5.5 ",0;New Delhi,India
IsT db"Israel Daylight Time UTC+2 ",0;Jerulesum
IDT db"Israel Standard Time UTC+3 ",0;Tel Aviv
EAT db"Eastern African Time UTC+3 ",0;KENYA,SOMOLIA,UGANDA,YEMEN
MKT db"Moscow Standard Time UTC+3 ",0;Moscow,COMMONWEALTH OF INDEPENDENT STATES(Russia)
SAMT db"Samara Time UTC+4 ",0;Samara,CIS
YEKT db"Yekaterinburg Time UTC+5 ",0;Yekt,CIS
NOVT db"Novosibirsk Time UTC+6 ",0;Novo,CIS
OMST db"Omsk Standard Time UTC+6 ",0;Omsk,CIS
KRAT db"Krasnoyarsk Time UTC+7 ",0;Kras,CIS
CXT db"Christmas Island Time UTC+7 ",0;The Settlement,Christmas Island,WA
; Tourist Office PO Box 63, CHRISTMAS ISLAND, Western Australia 6798, Indian Ocean,AUSTRALIA
WIB db"Western Indonesian Time U20 UTC+7 ",0;Jakarta
AWST db"Australian Western Standard Time UTC+8 ",0;Perth,WA,AUSTRALIA
IRKT db"Irkutsk Time U21 UTC+8 ",0;CIS
YAKT db"Yakutsk Time U22 UTC+9 ",0;CIS
ACST db"Australian Central Standard Time UTC+09:00 ",0;Alice Springs,Northern Territory,AUSTRALIA
AEST db"Australian Eastern Standard Time UTC+10:00 ",0;Sydney,New South Wales,AUSTRALIA
AEDT db"Australian Eastern Daylight Time UTC+11:00 ",0;Sydney,New South Wales,AUSTRALIA
MAGT db"Magadan Time UTC+10 ",0;Magadan,CIS
SAKT db"Sakhalin Time UTC+10 ",0;Sakhalin,CIS
VLAT db"Vladivostok Time UTC+10 ",0;Vladivostok,CIS
SRET db"Srednekolymsk Time UTC+11 ",0;Srednekolymsk,CIS
ANAT db"Anadyr Time UTC+12 ",0;Anadyr,CIS
PETT db"Kamchatka Time U25 UTC+12 ",0;Kamchakta,CIS
NZST db"New Zealand Standard Time UTC+12:00 ",0;Wellington
CHAST db"Chatham Standard Time UTC+12:45 ",0; Chatham Islands,NEW ZEALAND
NZDT db"New Zealand Daylight Time UTC+13:00 ",0;Wellington
CHADT db"Chatham Daylight Time UTC+13:45 ",0,0; Note Extra Zero
lf db 10,0
A4
R15b db" "
R15 db 120 dup(0);UTC+2EET U15 Kaliningrad
db 0
R16b db" "
R16 db 120 dup(0);UTC+3MKT U16 Moscow,CIS
db 0
R16Vb db" "
R16V db 120 dup(0);+3MKT U16 Vero
db 0
R17b db" "
R17 db 120 dup(0);4SAMT U17 Samara
db 0
R18b db" "
R18 db 120 dup(0);5???? U18 ????
db 0
R19Nb db" "
R19N db 120 dup(0);6NOVT U19 Novosibirsk
db 0
R19Ob db" "
R19O db 120 dup(0);6OMSK U19 Omsk
db 0
R20b db" "
R20 db 120 dup(0);7KRAT U20 Krasnoyarsk
db 0
R21b db" "
R21 db 120 dup(0);8IRKT U21 Irkutsk
db 0
R22b db" "
R22 db 120 dup(0);9YAKT U22 Yakutsk
db 0
R23Mb db" "
R23M db 120 dup(0);10MAGT U23 Magadan
db 0
R23Sb db" "
R23S db 120 dup(0);10SAKT U23 Sakhalin
db 0
R23Vb db" "
R23V db 120 dup(0);10 VLAT U23 Vladivostok
db 0
R24b db" "
R24 db 120 dup(0);11 SRET U24 Srednekolymsk
db 0
R25b db" "
R25 db 120 dup(0);12 ANAT U25 Anadyr
db 0
R25Pb db" "
R25P db 120 dup(0);+12 PETT U25 Petropavlovsk
db 0
A4
TZFullName Q $
d HAST
d B2
d AKDT
d B3
d AKST
d BAKD
d PDT;-7
d B6
d PST
d B4
d MDT
d BMD
d MST
d B5
d CDT
d B9C
d CST
d B8D
d EST
d B8
d EDT
d B9
d WGT
d BU10
d FKST;UTC-3Falkland-S Atlantic
d B10
d WGST
d B11LD;-2Green
d ADT;Halifax,Nova Scotia,CANADA
d B10
d AST;Halifax,Nova Scotia,CANADA
d B9C
d EGT
d B12
d EGST
d B13
d GMT;+0U13 UTC Greenwich Mean GMT+0 U13
d B13
d UTC;+0U13 GMT London,United Kingdom
d B13
d BST;British Day UTC+1U14 England
d B14;+1 U14 GMT+1 UTC+1
d CET;+1 U14 UTC+1 GMT+1Central European
d B14
d EIST;Irish U14 Day Time
d B14
d CEST;+2U15
d B15
d SAST;South Africa Std-Cape Town,South Africa
d BSAS;+2U15
d EET;Tripoli,Libya
d B15;
d EEST
d B16
d IsT;+2Israel Std
d Bis 
d IDT;+3Israel Day
d B16
d EAT
d B16
d MKT
d R16
d IRST;P3_5UTC3.5Tehran,Iran
d BIRS
d IRDT;P4_5UTC4.5Tehran,Iran
d BIRD
d PKT
d B18
d CXT;+7U20Christmas Islands
; Tourist Office,PO Box 63,CHRISTMAS ISLAND,WA 6798,Indian Ocean
d BCX
d SRET;+11U24Sret,CIS
d BSRE
d BWIB
d IST; 5.5India Std India P5_5
d BIS
d WIB;+7U20Jakarta,Indonesia
d BAWS
d AWST;+8U21Perth Western Australai,AUSTRALIA
d BADS;Alice Springs,NT,AUSTRALIA
d ANACS
d B22
d ACST
d BADS
d BAES
d AEST
d AEDT
d BAED
d B25
d NZST;UTC+12Wellington,New Zealand Std
d BCHA
d CHAST;P12_45
d B26
d NZDT;UTC+13Day
d CHADT;P13_45
d BCHD
d 0
;Greenland(Denmark)
;Thule Air Base Atlantic Std              -04 U9
;West Greenland Time Nuuk                 -03 U10
;EGT East Greenland Time Ittoqqortoormiit -01 U12
;GMT Greenwich Mean Time Danmarkshavn     +00 U13 GMT UTC
;EET  +02Eastern European Kaliningrad, CIS
;MSK  +03Moscow Standard Time - MKT
;SAMT +04Samara Time Samara
;YEKT +05Yekaterinburg Time
;OMST +06Omsk Standard Time
;NOVT +06Novosibirsk Time
;KRAT +07Krasnoyarsk Time
;IRKT +08Irkutsk Time
;YAKT +09Yakutsk Time
;VLAT +10Vladivostok Time
;MAGT +10Magadan Time
;SAKT +10Sakhalin Time Yuzhno-Sakhalinsk
;SRET +11Srednekolymsk Time
;ANAT +12Anadyr Time
;PETT +12Kamchatka Time Petropavlovsk
EndWORLD db"** END of WORLD.EXE **",0
A4
MAXCity dd EndWORLD
d 0
;X\masm32\bin\time\CITA
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #6 on: April 18, 2016, 12:35:13 PM »
;CITY Monday, November 09, 2015 7:15:38 PM EDT
;*Herge*Sunday, April 17, 2016 8:37:17 AM EDT
.data
A4
;Name
P213 db"ALGERIA",0
P54 db"ARGENTINA",0
P61 db"AUSTRALIA",0
P43 db"AUSTRIA",0
P242 db"BAHAMAS",0
P880 db"BANGLADESH",0
P32 db"BELGIUM",0
P387 db"BOSNIA HERZEGOVINA",0
P55 db"BRAZIL",0
P56 db"CHILE",0
P86 db"CHINA",0
P57 db"COLUMBIA",0
P7 db"COMMONWEALTH OF INDEPENDENT STATES",0;Moscow,Russia
P506 db"COSTA RICA",0
P385 db"CROATIA",0
P357 db"CYPRUS",0
P420 db"CZECH REPUBLIC",0
P45 db"DENMARK",0
P20 db"EGYPT",0
P503 db"EL SALVADOR",0
P372 db"ESTONIA",0
P381 db"FEDERAL REPUBLIC OF YUGOSLOVIA",0
P358 db"FINLAND",0
P33 db"FRANCE",0
P369 db"FYR MACEDONIA",0
P49 db"GERMANY",0
P30 db"GREECE",0
P502 db"GUATEMALA",0
P592 db"GUYANA",0
P509 db"HAITI",0
P852 db"HONG KONG",0
P36 db"HUNGARY",0
P91 db"INDIA",0
P602 db"INDONESIA",0
P98 db"IRAN",0
P353 db"IRELAND",0
P972 db"ISRAEL",0
P39 db"ITALY",0
P81 db"JAPAN",0
P996 db"KYRGYZ REPUBLIC",0
P371 db"LATAVIA",0
P961 db"LEBANON",0
P370 db"LITHUANIA",0
P60 db"MALAYASIA",0
P52 db"MEXICO",0
P373 db"MOLDOVA",0
P212 db"MOROCCO",0
P31 db",NETHERLANDS",0
P64 db"NEW ZEALAND",0
P47 db"NORWAY",0
P92 db"PAKISTAN",0
P507 db"PANAMA",0
P51 db"PERU",0
P63 db"PHILLIPINES",0
P48 db"POLAND",0
P351 db"PORTUGAL",0
P40 db"ROMANIA",0
P966 db"SAUDI ARABIA",0
P65 db"SINGAPORE",0
P421 db"SLOVAK REPUBLIC",0
P27 db"SOUTH AFRICA",0
P82 db"SOUTH KOREA",0
P34 db"SPAIN",0
P94 db"SRI LANKA",0
P294 db"SUDAN",0
P46 db"SWITZERLAND",0
P886 db"TAIWAN",0
P66 db"THAILAND",0
P216 db"TUNISA",0
P90 db"TURKEY",0
P380 db"UKRAINE",0
P971 db"UNITED ARAB EMIRATES",0
P44 db"UNITED KINGDOM",0
P58 db"VENEZUELA",0,0
;Area Code
A4
N213 db"213",0;Alg
N54 db"54",0;Arg
N61 db"61",0;Syd
N43 db"43",0;Austria
N242 db"242",0;Bahamas
N880 db"880",0;Bang
N32 db"32",0;Bel
N387 db"387",0;Bos Herz
N55 db"55",0;Bra
N56 db"56",0;Chile
N86 db"86",0;China
N57 db"57",0;Columbia
N7 db"7",0;Russia
N506 db"506",0;C R
N385 db"385",0;Cro
N357 db"357",0;Cyp
N420 db"420",0;Cz
N45 db"45",0;Den
N20 db"20",0;Egy
N503 db"503",0;El Salv
N372 db"372",0;Est
N381 db"381",0;Yugo
N358 db"358",0;Fin
N33 db"33",0;Fran
N369 db"369",0;Mace
N49 db"49",0;Ger
N30 db"30",0;Gre
N502 db"502";Gua
N592 db"592",0;Guy
N509 db"509",0;Haiti
N852 db"852",0;HK
N36 db"36",0;Hun
N91 db"91",0;India
N602 db"602",0;Indo
N98 db"98",0;Iran
N353 db"353",0;Ire
N972 db"972",0;Israel
N39 db"39",0;Ita
N81 db"81",0;Jap
N996 db"996",0;Kyrgyz
N371 db"371",0;Lat
N961 db"961",0;Leb
N370 db"370",0;Lith
N60 db"60",0;Malay
N52 db"52",0;Mex
N373 db"373",0;Mol
N212 db"212",0;Mor
N31 db"31",0;Nether
N64 db"64",0;NZ
N47 db"47",0;Nor
N92 db"92",0;Pak
N507 db"507",0;Pan
N51 db"51",0;Peru
N63 db"63",0;Phil
N48 db"48",0;Pole
N351 db"351",0;Port
N40 db"40",0;Romania
N966 db"966",0;Saudi A
N65 db"65",0;Sing
N421 db"421",0;Slov
N27 db"27",0;SAfr
N82 db"82",0;SKor
N34 db"34",0;Spa
N94 db"94",0;SriL
N294 db"294",0;Sud
N46 db"46",0;Sui
N886 db"886",0;Tai
N66 db"66",0;Thai
N216 db"216",0;Tun
N90 db"90",0;Tur
N380 db"380";Ukr
N971 db"971",0;UAE
N44 db"44",0;+0 England
N58 db"58",0,0;Ven
A4
T213 dd U14;1Alg
T54 dd U11;-3Arg
T61 dd U25;12Australia
T43 dd U14;1Austria
T880 dd U19;6Bang
T32 dd U14;Bel
T387 dd U14;Bos Herz
T55 dd U11;?Bra
T56 dd U10;Chile
T86 dd U21;8China
T57 dd U8;?COL:Col
T7 dd U16;3CIS-Russia
T506 dd U8;CR:C R
T385 dd U14;1Cro
T357 dd U15;2CYP
T420 dd U16;3Cz
T45 dd U14;1Den
T20 dd U15;2Egy
T503 dd U8;El S
T372 dd U15;2Esto
T381 dd U14;1FRYugo
T358 dd U15;2Fin
T33 dd U14;1France
T369 dd U15;2FYR Mace
T49 dd U14;1Ger
T30 dd U15;2Gre
T502 dd U8;-5Gua
T592 dd U7;-6Guy
T509 dd U8;-5Haiti
T852 dd U21;9HK
T36 dd U14;1Hun
T91 dd P5_5;+5.5India
T602 dd U20;Indo
T98 dd P4_5;4.5Iran
T353 dd U13;Ire
T972 dd U15;Israel
T39 dd U14;Ita
T81 dd U22;Jap
T996 dd U15;Kyrgyz
T371 dd U15;Lat
T961 dd U15;Leb
T370 dd U14;Lith
T60 dd U21;Malay
T52 dd U7;Mx
T373 dd U14;Mol
T212 dd U14;Mor
T31 dd U14;Nether
T64 dd U25;NZ
T47 dd U14;Nor
T92 dd U18;Pak
T507 dd U8;Pan
T51 dd U8;Peru
T63 dd U21;Phil
T48 dd U14;Pole
T351 dd U13;Port
T40 dd U15;Roma
T966 dd U16;SArab
T65 dd U21;8Sing
T421 dd U14;Slo
T27 dd U16;SAfr
T82 dd U22;SKor
T34 dd U14;Spa
T94 dd U18;5SriL
T294 dd U16;3Sud
T46 dd U14;1Swiss
T886 dd U21;8Tai
T66 dd U14;Tha
T216 dd U14;Tun
T90 dd U15;Tur
T380 dd U16;3Ukr
T971 dd U17;4UAE
T44 dd U13;England UTC+0 GMT,U14 UTC+1BST GMT+1
T58 dd M4_5;-4.5Venezuela
dd 0
Arab db"Arabic ",0
Eng db"English ",0
Fre db"French ",0
Dutch db"Dutch ",0
Ger db"German  ",0
Irish db"Irish ",0
Ita db"Italian ",0
Hun db"Hungarian ",0
Finn db"Finnish ",0
Pol db"Polish ",0
Port db"Portugese ",0
Romi db"Romanian ",0
Span db"Spanish ",0
Swi db"Swiss ",0
Welsh db"Welsh ",0
Ontario equ $
Aly db"Alymer",0
Bran db"Brantford",0
Cam db"Cambridge",0
Chat db"Chatham",0
Elm db"Elmira",0
Gue db"Guelph",0;Homewood
Ham db"Hamilton",0
HuV db"Huntsville",0
King db"Kingston",0
KIT db" your link does not work IDIOT er",0
Leam db"Leamington",0
NoB db"North Bay",0
OwS db"Owen Sound",0
ParS db"Parry Sound",0
Sud db"Sudbury",0
ThB db"Thunder Bay",0
Tob db"Tobermory",0
Tor db"Toronto",0
WAT db"Waterloo",0;WATFIV WATerloo Fortran Four IV
Win db"Windsor",0
Woo db"Woodstock",0;
db 0
A4
OntPlaces Q $;EDT1D U9 UTC-4
d EDT
d lf
d Aly
d On
d CAN
d B9D
d AGB
d TCity
d O1C
d Bran
d On
d CAN
d B9D
d Cam
d On
d CAN
d B9D
d Chat
d On
d CAN
d B9D
d Elm
d On
d CAN
d B9D
d Gue
d On
d CAN
d B9D
d Ham
d On
d CAN
d B9D
d HuV
d On
d CAN
d B9D
d King
d On
d CAN
d B9D
d KIT
d On
d CAN
d B9D
d Leam
d On
d CAN
d B9D
d NoB
d On
d CAN
d B9D
d OwS
d On
d CAN
d B9D
d ParS
d On
d CAN
d B9D
d FRI
d PD
d On
d CAN
d B9D
d Sud
d On
d CAN
d B9D
d ThB
d On
d CAN
d B9C
d Tob
d On
d CAN
d B9D
d Tor
d On
d CAN
d B9C
d WAT;UW
d On
d CAN
d B9D
d Win
d On
d CAN
d B9D
d Woo
d On
d CAN
d B9D
d EST;U8-5EST S0
d lf
d Aly;OPP College
d On
d CAN
d B9D
d AGB
d TCity
d O1C
d Bran
d On
d CAN
d B8S
d Cam
d On
d CAN
d B8S
d Chat
d On
d CAN
d B8S
d Elm
d On
d CAN
d B8S
d Gue
d On
d CAN
d B8S
d Ham
d On
d CAN
d B8S
d HuV
d On
d CAN
d B8S
d King
d On
d CAN
d B8S
d KIT
d On
d CAN
d B8S
d Leam
d On
d CAN
d B8S
d NoB
d On
d CAN
d B8S
d OwS
d On
d CAN
d B8S
d ParS
d On
d CAN
d B8S
d FRI
d PD
d On
d CAN
d B8S
d Sud
d On
d CAN
d B8S
d ThB
d On
d CAN
d B8S
d Tob
d On
d CAN
d B8S
d Tor
d On
d CAN
d B8S
d Win
d On
d CAN
d B8S
d WAT;UW
d On
d CAN
d B8S
d Woo
d On
d CAN
d B8S
d 0
Wai db" W a i t  For O K A Y  << Click OK >> Oklahoma is OK  O K A Y Ontario Yours to Discover",0;**
Abuj db"Abuja",0
addi db"Addis Ababa",0
Alamo db"Alamo",0
Amst db"Amsterdam",0
anc db"Anchorage",0
Bang db"Bangor",0
Bas db"Basel",0
Bel db"Belfast",0
Ber db"Berlin",0
BON db"Bonn",0
Buca db"Bucharest",0
Buda db"Budapest",0
BUF db"Buffalo",0
Car db "Cardiff",0
Cairo db"Cairo",0
Calg db"Calgary",0
CKV db"Clarksville",0
Cle db"Cleveland",0
C_T db"Charlottetown",0;PEI
ChI db"Chatham Islands",0;NZ
Chic db"Chicago",0
Chr db"Christchurch",0
Dal db"Dallas",0
DET db"Detriot",0
Dub db"Dublin",0
East db"Easter Island",0
EDM db"Edmonton",0
Eur db"Europe",0
Fai db"Fairbanks",0
Fie db"Field",0
Fred db"Fredrickton",0
Gage db"Gagetown",0
Galv db"Galvelston",0
Gan db"Gander",0
Gib db"Gibraltar",0
GrB db"Green Bay",0
Hal db"Halifax",0
Hel db"Helsinki",0
Hou db"Huston",0
Jer db"Jersey",0
KeyW db"Key West",0
Lisbon db"Lisbon",0
London db"London",0
Lou db"Louisville",0
Mad db"Madrid",0
Mai db"Maimi",0
Mon db"Montreal",0
NO db"New Orleans",0
NYC db"New York City",0
NGF db"Niagara Falls",0;ON/NY
Orl db"Orlando",0
Ott db"Ottawa",0;Canada
Paris db"Paris",0
PIT db"Pittsburg",0
Pont db"Pontiac",0;Detriot Lions
QC db"Quebec City",0
Reg db"Regina",0
Rome db"Rome",0
SJnb db"Saint John",0
SJs db"Saint John",27h,"s",0
Sj db"San Juan",0
San db"Santiago",0
SSM db"Sault Sainte Marie",0;ON/Mic
Tam db"Tampa",0
Tri db"Tripoli",0
Vic db"Victoria",0
Vien db"Vienna",0
War db"Warsaw",0
WDC db"Washington DC,",0;USA
Wel db"Wellington",0
WIN db"Winnipeg",0
Yel db"Yellowknife",0,0
X db",",0,0;Note the 0
A4
Country Q $
CAN db"CANADA ",0
CR db",COSTA RICA ",0
CYP db",CYPRUS ",0
Eth db",ETHOPIA,",0
Lib db",LIBYA ",0
NI db",NORTHERN IRELAND ",0
NIG db",NIGERIA ",0
NZ db",NEW ZEALAND ",0
Soma db",SOMOLIA",0
SWISS db",SWITZERLAND ",0
WALES db",WALES ",0
US db"USA ",0,0
A4
Stat Q $;US States
ALA db",Alaska,",0;1
ala db",Alabama,",0;2
Arz db",Arizona,",0;3
Ark db",Arkansas,",0;4
Cali db",California,",0;5
Colo db",Colorado,",0;6
Con db",Connecticut,",0;7
Del db",Delaware,",0;8
Flo db",Florida,",0;9
Geo db",Georgia,",0;10
Haw db",Hawaii,",0;11
Ida db",Idaho,",0;12
ill db",illinois,",0;13
Ind db",Indiana,",0;14
IA db",Iowa,",0;15
Kan db",Kansas,",0;16
KEN db",Kentucky,",0;17
La db",Louisiana,",0;18
MN db",Maine,",0;19
ML db",Maryland,",0;20
Mass db",Massachusetts,",0;21
Mic db",Michigan,",0;22
Min db",Minnesota,",0;23
ms db",Mississippi,",0;24
mr db",Missouri,",0;25
MT db",Montana,",0;26
nb db",Nebraska,",0;27
NC db",North Carolina,",0;28
NDK db",North Dakota,",0;29
NHS db",New Hampshire,",0;30
NJ db",New Jersey,",0;31
NM db",New Mexico,",0;32
NV db",Nevada,",0;33
NY db",New York,",0;34
Ohi db",Ohio,",0;35
OK db",Oklahoma,",0;36
Ore db",Oregon,",0;37
Penn db",Pennsylvania,",0;38
RHI db",Rhode Island,",0;39
SCar db",South Carolina,",0;40
SDK db",South Dakota,",0;41
Tenn db",Tennessee,",0;42
TEX db",Texas,",0;43Republic of
UT db",Utah,",0;44
VA db",Virginia,",0;45
VER db",Vermont,",0;46
Vir db",Virginia,",0;47
Wash db",Washington,",0;48
Wis db",Wisconsin,",0;49
Wyo db",Wyoming,",0;50
WVA db",West Virginia,",0;51
db 0
A4
USCAPSTATE Q $
Jun db"Juneau",0;Alas1
mtg db"Montgomery",0;Alab2
Pho db"Phoenix",0;Arz3
Lit db"Little Rock",0;Ark4
Sacr db"Sacramento",0;Cali5
DEN db"Denver",0;Col6
Hart db"Hartford",0;Conn7
Tal db"Tallahassee",0;Flo8
ATL db"Atlanta",0;Geo9
Hono db"Honolulu",0;Hawa10
BOI db"Boise",0;Ida11
Spr db"Springfield",0;ill12
Indy db"Indianapolis",0;Ind13
DM db"Des Moines",0;Iowa14
Top db"Topeka",0;Kan15
Fran db"Frankfort",0;Ken16
BR db"Baton Rouge",0;La17
AUG db"Augusta",0;Maine18
Ann db"Annapolis",0;Mary19
BOS db"Boston",0;Mass20
LAN db"Lansing",0;Mic21
STP db"Saint Paul",0;Min22
Jack db"Jackson",0;Missi23
JefC db"Jefferson City",0;Misso24
HEL db"Helena",0;Mon25
Lin db"Lincoln",0;NB26
SFE db"Santa Fe",0;NM27
Ral db"Raleigh",0;NC28
db"Bismarck",0;ND29
CON db"Concord",0;NH30
Tre db"Trenton",0;NJ31
CC db"Carson City",0;Nev32
ALB db"Albany",0;NY33
Col db"Columbus",0;Ohi34
OKC db"Oklahoma City",0;35 is OK
Sal_ db"Salem",0;Ore36
HAR db"Harrisburg",0;Pen37
Dov db"Dover",0;Del38
PRO db"Providence",0;RI39
COL db",Columbia,",0;SC40
PIE db"Pierre",0;SDak41
Nash db"Nashville",0;Ten42
SLC db"Salt Lake City",0;Uta43
AUS db"Austin",0;Tex,",0;44
Bism db"Bismarck",0;ND45
Ric db"Richmond",0;Vir46
Mont db"Montpelier",0;Ver47
Sea db"Seattle",0;Wash48
MAD db"Madison",0;Wis49
Che db"Cheyenne",0;Wyo50
Char db"Charleston",0;WVir51
db 0
A4
USTerr Q $
ASAM db",AMERICAN SAMOA,",0
Guam db",GUAM,",0
USVI db",US VIRGIN ISLANDS",0
db 0
A4
FRI db"Friday,13th Port Dover",a,0
THE db"Remember The Alamo",a,0
db 0
A4
TEXAS Q $
d CST
d THE
d Alamo
d TEX
d US
d B7S
d AUS
d TEX
d US
d B7S
d Dal
d TEX
d US
d B7S
d Galv
d TEX
d US
d B7S
d Hou
d TEX
d US
d B7S
d CDT
d THE
d Alamo
d TEX
d US
d B8D
d AUS
d TEX
d US
d B8D
d Dal
d TEX
d US
d B8D
d Galv
d TEX
d US
d B8D
d Hou
d TEX
d US
d B8D
dd 0
Prov equ $
Alb db",Alberta,",0;1
B_C db",British Columbia,",0;2
Man db",Manitoba,",0;3
NB db",New Brunswick,",0;4
NFLD db",Newfoundland & Labrador,",0;5
NWT db",Northwest Territories,",0;6
ns db",Nova Scotia,",0;7
On db",Ontario,",0;0
PEI db",Prince Edward Island,",0;9
qp db",Quebec,",0;A
Sask db",Saskatchewan,",0,0;B
A4
Australia Q $;States
ACT db",Australian Capital Territory,",0
NSW db",New South Wales,",0
NT db",Northern Territory,",0
QL db",Queensland,",0
SOA db",South Australia,",0
Syd db"Sydney",0
TAS db",Tasmania",0
VIC db",Victoria,",0
WA db",Western Australia,",0,0
A4
Adel db"Adelaide",0
Alice db"Alice Springs",0
Bris db"Brisbane",0
Canb db"Canberra",0
CapK db"Cape Kennedy",0
CharlA db"Charlotte Amalie",0
ChHB db"Churchill",0;Manitoba-Hudson Bay-Arctic
Cold db"Cold Lake",0
Colu db"Columbia",0
Dar db"Darwin",0;NT,AUSTRALIA
Eva db"Evansville",0
Fair db"Fairbanks",0
FCK db"Fort Campbell",0
Hag db"Hagatna",0
LAX db"Los Angeles",0
Hob db"Hobart",0
Lab db"Labrador City",0
LHI db"Lord Howe Island",0
Mel db"Melbourne",0
OrP db"Orchard Park",0;Buffallo Bills Joe Kelly
Pago db"Pago Pago",0
Per db"Perth",0
PD db"Port Dover",0
PH db"Port Huron",0
Reno db"Reno",0
Sarn db"Sarnia",0
SDC db"San Diego",0
SFO db"San Francisco",0
ThHB db"Thompson",0;
Van db"Vancouver",0
Yuk db",Yukon,",0
WH db"Whitehorse",0,0
A4;East Africa
LSUAfrDay Q $
dd ANABU
dd BCET
dd ANB16;Mog,Som
dd B16
dd addi 
dd Eth
dd B16
dd 0
LSUAfrStd Q $
;Missing
dd 0
dd 0
LSEuDay Q $
d Dutch
d Amst
d P31
d B15D
d Swi
d Bas
d X
d P46
d BGS
d Eng
d Bel
d NI;Ire
d B14
d Ger
d Ber
d X
d P49
d BGS
d Hun
d X
d Buda
d X
d P36
d BHUS
d Arab
d Cairo
d X
d P20
d BEEC
d Welsh
d Car
d WALES;P44UK
d BWS
d Irish
d Dub
d X
d P353
d E14
d Eng
d Eur
d B15
d Eng
d Gib
d B15
d Finn
d Hel
d X
d P358
d BEESF
d Eng
d Jer
d B14
d Port
d Lisbon
d X
d P351
d BPoS
d Eng
d London
d X
d P44
d B14
d Span
d Mad
d X
d P34
d BS
d Fre
d Paris
d X
d P33
d B15F
d Ita
d Rome
d X
d P39
d BI
d Arab
d Tri
d X
d Lib
d BEE
d Ger
d Vien
d X
d P43
d BU
d Pol
d War
d X
d P48
d BPCES
d 0
LSEuStd EQU $
d Dutch
d Amst
d P31
d B14D
d Swi
d Bas
d X
d P46
d BG
d Eng
d Bel
d NI
d B13
d Ger
d Ber
d X
d P49
d BG
d Hun
d Buda
d X
d P36
d BHUN
d Arab
d Cairo
d X
d P20
d BEEC
d Welsh
d Car
d WALES
d BW
d Irish
d Dub
d B13;E13
d Eng
d Eur
d BeCET
d Eng
d Gib
d BeCET
d Finn
d Hel
d X
d P358
d BEETF
d Eng
d Jer
d B13
d Port
d Lisbon
d X
d P351
d BPo
d Eng
d London
d B13
d Fre
d Paris
d X
d P33
d B14F
d Span
d Mad
d X
d P34
d BSS
d Ita
d Rome
d X
d P39
d BIS
d Arab
d Tri
d Lib
d X
d BEE
d Ger
d Vien
d X
d P43
d BV
d Pol
d War
d X
d P48
d BPCET
d 0
LSUsaTDay Q $;USTerr
d CharlA
d USVI
d B9C
d Hag
d Guam
d BCh
d Sj
d X
d PR
d X
d US
d B9C
d Pago
d ASAM
d BSST
dd 0
LSUsaTStd Q $
d CharlA
d USVI
d B8S
d Hag
d Guam
d BCh
d Sj
d X
d PR
d X
d US
d B8S
d Pago
d ASAM
d BSST
dd 0
LTUsaDay Q $
d Alamo
d TEX
d US
d B8D
d anc
d ALA
d US
d BAKD
d Bang
d MN
d US
d B9D
d BUF
d NY
d US
d B9D
d CapK
d Flo
d US
d B9D
d Chic
d ill
d US
d B8D
d CKV
d Tenn
d US
d B8D
d Cle
d Ohi
d US
d B9D
d Dal
d TEX
d US
d B8
d DET
d Mic
d US
d B9D
d Eva
d Ind
d US
d B8D
d Fai
d ALA
d US
d BAKD
d FCK
d KEN
d US
d B9D
d Galv
d TEX
d US
d B8D
d GrB
d Wis
d US
d B8D
d Hou
d TEX
d US
d B8D
d KeyW
d Flo
d US
d B9D
d LAX
d Cali
d US
d B5
d Lou
d KEN
d US
d B9D
d Mai
d Flo
d US
d B9D
d NGF
d NY
d US
d B9D
d NO
d La
d US
d B8D
d NYC
d NY
d US
d B9D
d OrP;NFL Bills
d NY
d US
d B9D
d Orl
d Flo
d US
d B9D
d PIT
d Ohi
d US
d B9D
d Pont;NFL Detriot Lions
d Mic
d US
d B9D
d PH
d Mic
d US
d B9C
d Reno
d NV
d US
d B5
d SDC
d Cali
d US
d B5
d SFO
d Cali
d US
d B5
d SSM
d Mic
d US
d B9D
d Sea
d Wash
d US
d B5
d Tam
d Flo
d US
d B9D
d 0
LSUsaDay Q $;Cap
d ALB
d NY
d US
d B8S
d Ann
d ML
d US
d B8S
d ATL
d Geo
d US
d B8S
d AUG
d MN
d US
d B9C
d AUS
d TEX
d US
d B8
d BR
d La
d US
d B8
d Bism
d NDK;N Dak
d US
d B8
d BOI
d Ida
d US
d BMD
d BOS
d Mass
d US
d B8S
d CC
d NV
d US
d B5
d Char
d WVA
d US
d B8S
d Che
d Wyo
d US
d BMD
d Colu
d SCar
d US
d B8S
d Col
d Ohi
d US
d B8S
d CON
d VER
d US
d B8S
d DEN
d Colo
d US
d BMD
d DM
d IA
d US
d B8
d Dov
d Del
d US
d B8S
d Fran
d KEN
d US
d B9C
d HAR
d Penn
d US
d B8S
d Hart
d Con
d US
d B8S
d HEL
d MT
d US
d BMD
d Hono
d Haw
d US
d B2
d Indy
d Ind
d US
d B9
d Jack
d ms
d US
d B8
d JefC
d mr
d US
d B8
d Jun
d ALA
d US
d BAKD
d LAN
d Mic
d US
d B8S
d Lin
d nb
d US
d B8
d Lit
d Ark
d US
d B8
d MAD
d Wis
d US
d B8
d Mont
d VER
d US
d B9C
d mtg
d ala
d US
d B8S
d Nash
d Tenn
d US
d B8S
d OKC
d OK
d US
d B8
d Pho
d Arz
d US
d B5;
d PIE
d SDK
d US
d B8
d PRO
d RHI
d US
d B8S
d Ral
d NC
d US
d B8S
d Ric
d Vir
d US
d B8S
d Sacr
d Cali
d US
d B5
d STP
d Min
d US
d B8
d SFE
d NM
d US
d BMD
d Sal_
d Ore
d US
d B5
d SLC
d UT
d US
d BMD
d Sea
d Wash
d US
d B5
d Spr
d ill
d US
d B8
d Tal
d Flo
d US
d B9C
d Top
d Kan
d US
d B8
d Tre
d NJ
d US
d B9C
d WDC
d US
d B9C
dd 0
LTUsaStd Q $
d Alamo
d TEX
d US
d B7S
d anc
d ALA
d US
d B3
d Bang
d MN
d US
d B8
d BUF
d NY
d US
d B8
d CapK
d Flo
d US
d B8
d CC
d NV
d US
d B4
d Chic
d ill
d US
d B7S
d Cle
d Ohi
d US
d B8
d CKV
d Tenn
d US
d B7S
d Dal
d TEX
d US
d B7S
d DET
d Mic
d US
d B8
d Eva
d Ind
d US
d B7S
d Fai
d ALA
d US
d B3
d FCK
d KEN
d US
d B8
d Fran
d KEN
d US
d B8
d Galv
d TEX
d US
d B7S
d GrB
d Wis
d US
d B7S
d Hou
d TEX
d US
d B7S
d LAX
d Cali
d US
d B4
d KeyW
d Flo
d US
d B8
d Lou
d KEN
d US
d B8
d Mai
d Flo
d US
d B8
d NO;N Orleans
d La
d US
d B7S
d NYC
d NY
d US
d B8
EQUNGF d NGF
d NY
d US
d B8;*d NOT D*
EQUOrp d OrP
d NY
d US
d B8
d Orl
d Flo
d US
d B8
d PIT
d Ohi
d US
d B8
d Pont;Detriot Lions
d Mic
d US
d B8
d PH
d Mic
d US
d B8
d Reno
d NV
d US
d BMD
d SDC
d Cali
d US
d B4
d SFO
d Cali
d US
d B4
d SSM
d Mic
d US
d B8
d Sea
d Wash
d US
d B4
d Tam
d Flo
d US
d B8
dd 0
LSUsaStd equ $
d ALB;1
d NY
d US
d B8
d Ann;2
d ML
d US
d B9
d ATL;3
d Geo
d US
d B8
d AUG;4
d MN
d US
d B8
d AUS;5
d TEX
d US
d B7S
d BR;6
d La
d US
d B7S
d Bism;7
d NDK;N Dak
d US
d B7S
d BOI;8
d Ida
d US
d B5
d BOS;9
d Mass
d US
d B8
d CC;10
d NV
d US
d B4
d Char;11
d WVA
d US
d B9
d Che;12
d Wyo
d US
d B5
d Colu;13
d SCar
d US
d B9
d Col;14
d Ohi
d US
d B8
d CON;15
d VER
d US
d B8
d DEN;16
d Colo
d US
d B5
d DM;17
d IA
d US
d B7S
d Dov;18
d Del
d US
d B8
d Fran;19
d KEN
d US
d B8
d Jun;20
d ALA
d US
d B3
d HAR;21
d Penn
d US
d B8
d Hart;22
d Con
d US
d B8
d HEL;23
d MT
d US
d B5
d Hono;24
d Haw
d US
d B2
d Indy;25
d Ind
d US
d B8
LSUsaStd25 Q $;Jackson,Missouri
d Jack;26
d ms
d US
d B7S
d JefC;27
d US
d B7S
d LAN;28
d Mic
d US
d B8
d Lin;29
d nb
d US
d B8
d Lit;30
d Ark
d US
d B8
d MAD;31
d Wis
d US
d B8
d Mont;32
d VER
d US
d B8
d mtg;33
d ala
d US
d B8
d OKC;34
d OK
d US
d B8
d Pho;35
d Arz
d US
d B5
d PIE;36
d SDK
d US
d B8
d PRO;37
d RHI
d US
d B8
d Ral;38
d NC
d US
d B8
d Ric;39
d Vir
d US
d B8
d Sacr;40
d Cali
d US
d B5
d STP;41
d Min
d US
d B7S
d Sal_;42
d Ore
d US
d B5
d SFE;43
d NM
d US
d BMD
d SLC;44;Salt Lake
d UT;Utah
d US
d B5
d Sea;45
d Wash
d US
d B4
d Tal;46
d Flo
d US
d B9
d Top;47
d Kan
d US
d B7S
d Tre;48
d NJ
d US
d B8
d WDC;49
d US
d B8
d 0
;X D:\masm32\bin\time\city
;* $$ EOJ
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #7 on: April 18, 2016, 12:38:26 PM »
; \masm32\bin\world\code Saturday, January 23, 2016 1:40:54 PM EST
; Sunday, April 17, 2016 9:28:47 PM EDT

<< Code >> and Now Dial - Phone numbers

;DIAL Monday, January 04, 2016 3:57:10 PM EST
; Sunday, April 17, 2016 9:29:26 PM EDT
.data
A4
dALAB db"205",0;Little Rock,Alabama
dALAS db"907",0;Juneau,Alaska
dARIZ db"602",0;Phoneix,Arizona
dARIZTU db"520",0;Tucson AZ
dARKA db"501",0;Arkansas AK
dCALIA db"714",0;Anahiem,California
dCALIB db"805",0;Bakersfield,CA
dCALIF db"209",0;Fresno CA
dCALILB db"310",0;Long Beach
dCALIX db"213",0;Los Angeles
dCALIO db"519",0;Oakland
dCALIP db"818",0;Pasadena
dCALIS db"915",0;Sacramento
dCALIBE db"909",0;San Bernardino 
dCALID db"419",0;San Diego
dCALIF db"415",0;San Francisco
dCALIJ db"408",0;San Jose
dCALIR db"707",0;Santa Rosa,California
dCOLOS db"719",0;Colorado Springs,Colorado
dCOLOD db"303",0;Denver
dCOLOC db"970",0;Fort Collins,Colorado
dCONNB db"203",0;Bridgeport,Connecticut
dCONNH db"860",0;Hartford,Connecticut
dFLORD db"904",0;Daytona Beach,Florida
dFLORL db"954",0;Fort Lauderdale
dFLORM db"941",0;Fort Meyers
dFLORG db"352",0;Gainsville
dFLORm db"305",0;Miami
dFLORO db"407",0;Orlando
dFLORS db"727",0;Saint Petersburg
dFLORT db"813",0;Tampa,Florida
dGEORa db"706",0;Athens,Georgia
dGEORA db"404",0;Atlanta
dGEORG db"720",0;Griffin
dGEORS db"912",0;Savannah,Georgia
dHAWA db"808",0,0;Honolulu,HAWAII
; X U Have Read \masm32\bin\time\DIAL
; * $$ EOJ



Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #8 on: April 18, 2016, 12:42:22 PM »

 Good morning this is MOTTO.
 It's Mottos of United States of America. States of America, and
 is Quite Short. We Do weird thing with MACROS and fractions,
 also a few mistakes 4 CDT and CST which I have NOT Sorted
 Out Yet!
 << MOTTO >>
Code: [Select]
.data
A4
;*Mottos of States of United States of America - USA - *Sunday, April 17, 2016 9:45:26 PM EDT
mALAB db"Audemus jura nostra defendere",a,0;1We Dare Defend Our Rights - Alabama
mALAS db"North to the future",a,0;2Alaska
mARIZ db"Ditat Deus",a,0;3God Enriches-Arizona
mARKA db"Regnat populus",a,0;4Arkansas
mCALI db"Eureka",a,0;5I have found it! California Gold Rush
mCOLO db"Nil sine numine",a,0;6Nothing without the Deity-Colorado
mCONN db"Qui transtulit sustinet",a,0;7He who is transplanted still sustains
mDELA db"Liberty and independence",a,0;8Delaware
mFLOR db"In God we trust",a,0;9Florida
mGEOR db"Wisdom, Justice, Moderation",a,0;10Georgia
mHAWA db"Ua Mau ke Ea o ka Aina i ka Pono",a,0;11The life of the land is perpetuated in righteousness-Hawaii
mIDAH db"Esto perpetua",a,0;12 Let it be perpetual-Idaho
mILLI db"State Sovereignty, National Union",a,0;13 illinois
mIOWA db"Our liberties we prize and our rights we will maintain",a,0;14Iowa
mINDI db"The Crossroads of America",a,0;15 Indiana
mKANS db"Per aspera ad astra",a,0; To the Stars Through Difficulty;16
mKENT db"United we stand, divided we fall",a,0;17
mLOUI db"Union,Justice and Confidence",a,0;18
mMAIN db"Dirigo",a,0;19 latin? I lead
mMARY db"Fatti maschii, parole femine",a,0;20 Manly deeds, Womanly words
mMASS db"Ense petit placidam sub libertate quietem",a,0;21By the sword we seek peace, but peace only under liberty
mMICH db"Si Quaeris Peninsulam Amoenam Circumspice",a,0;22If you seek a pleasant peninsula, look about you
mMINN db"L'Étoile du Nord",a,0;23The Star of the North
mMISS db"Seal of Mississippi",a,0;24
mMISR db"Salus populi suprema lex esto",a,0;25Missouri
mMONT db"Gold and Silver",a,0;26Montana
mNEBR db"Equality before the law",a,0;27
mNEWH db"Live Free or Die",a,0;28New Hampshire
mNEWJ db"Liberty and Prosperity",a,0;29New Jersey
mNEWM db"Crescit eundo",a,0;30It grows as it goes-New Mexico
mNEVA db"All for Our Country",a,0;31Nevada
mNEWY db"Excelsior",a,0;32Nickname Empire State-New York
mNCAR db"Esse quam videri",a,0;33To be, rather than to seem-North Carolina
mNDAK db"Liberty and union, now and forever, one and inseparable",a,0;34North Dakoto
mOAKL db"Labor omnia vincit",a,0;35Red People Okla Humma
mOHIO db"With God, all things are possible",a,0;36
mOREG db"Alis volat propriis",a,0;37She Flies With Her Own Wings
mPENN db"Virtue, liberty, and independence",a,0;38
mRHOD db"Hope",a,0;39Rhode Island
mSCAR db"Dum spiro spero",a,0;40While I breathe, I hope-S Carolina
mSDAK db"Under God the people rule",a,0;41S Dakota
mTENN db"Agriculture and Commerce",a,0;42Tennessee
mTEXA db"Friendship",a,0;43Texas
mUTAH db"Industry",a,0;44Utah
mVERM db"Live Free or Die",a,0;45
mVIRG db"Sic semper tyrannis",a,0;47Virgina
mWASH db"Alki",a,0; Bye and Bye;48Washington
mWVIR db"Montani semper liberi",a,0;49W Virgina
mWISC db"Forward",a,0;50Wisconsin
mWYOM db"Equal Rights",a,0;51Wyoming
db 0
d 0
BB db 7," ",0; backspace & space
ANUSMO db"United States of America - State Mottos ",0
db 0
A4
USMO Q $
d ala;1
d BB
d mALAB
d ALA;2
d BB
d mALAS
d Arz;3
d BB
d mARIZ;4
d Ark
d BB
d mARKA
d Cali;5
d BB
d mCALI
d Colo;6
d BB
d mCOLO
d Con;7
d BB
d mCONN
d Del;8
d BB
d mDELA
d Flo;9
d BB
d mFLOR
d Geo;A
d BB
d mGEOR
d Haw;B
d BB
d mHAWA
d Ida;C
d BB
d mIDAH
d ill;D
d BB
d mILLI
d Ind;E
d BB
d mINDI
d IA;F
d BB
d mIOWA
d Kan;16
d BB
d mKANS
d KEN;17
d BB
d mKENT
d La;18
d BB
d mLOUI
d MN;19
d BB
d mMAIN
d ML;20
d mMARY
d Mass;21
d BB
d mMASS
d Mic;22
d BB
d mMICH
d Min;23
d BB
d mMINN
d ms;24
d BB
d mMISS
d mr;25
d BB
d mMISR
d MT;26
d BB
d mMONT
d nb;27
d BB
d mNEBR
d NV;28
d BB
d mNEVA
d NHS;29
d mNEWH
d NJ;30
d BB
d mNEWJ
d NM;31
d BB
d mNEWM
d NY;32 20H
d BB
d mNEWY
d NC;33
d BB
d mNCAR
d NDK;34
d BB
d mNDAK
d OK;35
d BB
d mOAKL
d Ohi;36
d BB
d mOHIO
d Ore;37
d BB
d mOREG
d Penn;38
d BB
d mPENN
d RHI;39
d BB
d mRHOD
d SCar;40
d BB
d mSCAR
d SDK;41
d BB
d mSDAK
d Tenn;42
d BB
d mTENN
d TEX;43
d BB
d mTEXA
d UT;44
d BB
d mUTAH
d VER;45
d BB
d mVERM
d BB
d Wash;46
d BB
d mWASH
d WVA;47
d BB
d mWVIR
d Wis;48
d BB
d mWISC
d Wyo;49
d BB
d mWYOM
d 0
; Sunday, April 17, 2016 9:45:55 PM EDT UTC-04
; * $$ EOJ

 
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #9 on: April 18, 2016, 12:46:29 PM »
Warning There is No Code in Here!
just Comments U can Toss it Out but It is helpful
2 figure out what the hell we think we I trying 2
Do!
<SU>> It Starts Now!

.data
A4
;*Mottos of States of United States of America - USA - *Sunday, April 17, 2016 9:45:26 PM EDT
mALAB db"Audemus jura nostra defendere",a,0;1We Dare Defend Our Rights - Alabama
mALAS db"North to the future",a,0;2Alaska
mARIZ db"Ditat Deus",a,0;3God Enriches-Arizona
mARKA db"Regnat populus",a,0;4Arkansas
mCALI db"Eureka",a,0;5I have found it! California Gold Rush
mCOLO db"Nil sine numine",a,0;6Nothing without the Deity-Colorado
mCONN db"Qui transtulit sustinet",a,0;7He who is transplanted still sustains
mDELA db"Liberty and independence",a,0;8Delaware
mFLOR db"In God we trust",a,0;9Florida
mGEOR db"Wisdom, Justice, Moderation",a,0;10Georgia
mHAWA db"Ua Mau ke Ea o ka Aina i ka Pono",a,0;11The life of the land is perpetuated in righteousness-Hawaii
mIDAH db"Esto perpetua",a,0;12 Let it be perpetual-Idaho
mILLI db"State Sovereignty, National Union",a,0;13 illinois
mIOWA db"Our liberties we prize and our rights we will maintain",a,0;14Iowa
mINDI db"The Crossroads of America",a,0;15 Indiana
mKANS db"Per aspera ad astra",a,0; To the Stars Through Difficulty;16
mKENT db"United we stand, divided we fall",a,0;17
mLOUI db"Union,Justice and Confidence",a,0;18
mMAIN db"Dirigo",a,0;19 latin? I lead
mMARY db"Fatti maschii, parole femine",a,0;20 Manly deeds, Womanly words
mMASS db"Ense petit placidam sub libertate quietem",a,0;21By the sword we seek peace, but peace only under liberty
mMICH db"Si Quaeris Peninsulam Amoenam Circumspice",a,0;22If you seek a pleasant peninsula, look about you
mMINN db"L'Étoile du Nord",a,0;23The Star of the North
mMISS db"Seal of Mississippi",a,0;24
mMISR db"Salus populi suprema lex esto",a,0;25Missouri
mMONT db"Gold and Silver",a,0;26Montana
mNEBR db"Equality before the law",a,0;27
mNEWH db"Live Free or Die",a,0;28New Hampshire
mNEWJ db"Liberty and Prosperity",a,0;29New Jersey
mNEWM db"Crescit eundo",a,0;30It grows as it goes-New Mexico
mNEVA db"All for Our Country",a,0;31Nevada
mNEWY db"Excelsior",a,0;32Nickname Empire State-New York
mNCAR db"Esse quam videri",a,0;33To be, rather than to seem-North Carolina
mNDAK db"Liberty and union, now and forever, one and inseparable",a,0;34North Dakoto
mOAKL db"Labor omnia vincit",a,0;35Red People Okla Humma
mOHIO db"With God, all things are possible",a,0;36
mOREG db"Alis volat propriis",a,0;37She Flies With Her Own Wings
mPENN db"Virtue, liberty, and independence",a,0;38
mRHOD db"Hope",a,0;39Rhode Island
mSCAR db"Dum spiro spero",a,0;40While I breathe, I hope-S Carolina
mSDAK db"Under God the people rule",a,0;41S Dakota
mTENN db"Agriculture and Commerce",a,0;42Tennessee
mTEXA db"Friendship",a,0;43Texas
mUTAH db"Industry",a,0;44Utah
mVERM db"Live Free or Die",a,0;45
mVIRG db"Sic semper tyrannis",a,0;47Virgina
mWASH db"Alki",a,0; Bye and Bye;48Washington
mWVIR db"Montani semper liberi",a,0;49W Virgina
mWISC db"Forward",a,0;50Wisconsin
mWYOM db"Equal Rights",a,0;51Wyoming
db 0
d 0
BB db 7," ",0; backspace & space
ANUSMO db"United States of America - State Mottos ",0
db 0
A4
USMO Q $
d ala;1
d BB
d mALAB
d ALA;2
d BB
d mALAS
d Arz;3
d BB
d mARIZ;4
d Ark
d BB
d mARKA
d Cali;5
d BB
d mCALI
d Colo;6
d BB
d mCOLO
d Con;7
d BB
d mCONN
d Del;8
d BB
d mDELA
d Flo;9
d BB
d mFLOR
d Geo;A
d BB
d mGEOR
d Haw;B
d BB
d mHAWA
d Ida;C
d BB
d mIDAH
d ill;D
d BB
d mILLI
d Ind;E
d BB
d mINDI
d IA;F
d BB
d mIOWA
d Kan;16
d BB
d mKANS
d KEN;17
d BB
d mKENT
d La;18
d BB
d mLOUI
d MN;19
d BB
d mMAIN
d ML;20
d mMARY
d Mass;21
d BB
d mMASS
d Mic;22
d BB
d mMICH
d Min;23
d BB
d mMINN
d ms;24
d BB
d mMISS
d mr;25
d BB
d mMISR
d MT;26
d BB
d mMONT
d nb;27
d BB
d mNEBR
d NV;28
d BB
d mNEVA
d NHS;29
d mNEWH
d NJ;30
d BB
d mNEWJ
d NM;31
d BB
d mNEWM
d NY;32 20H
d BB
d mNEWY
d NC;33
d BB
d mNCAR
d NDK;34
d BB
d mNDAK
d OK;35
d BB
d mOAKL
d Ohi;36
d BB
d mOHIO
d Ore;37
d BB
d mOREG
d Penn;38
d BB
d mPENN
d RHI;39
d BB
d mRHOD
d SCar;40
d BB
d mSCAR
d SDK;41
d BB
d mSDAK
d Tenn;42
d BB
d mTENN
d TEX;43
d BB
d mTEXA
d UT;44
d BB
d mUTAH
d VER;45
d BB
d mVERM
d BB
d Wash;46
d BB
d mWASH
d WVA;47
d BB
d mWVIR
d Wis;48
d BB
d mWISC
d Wyo;49
d BB
d mWYOM
d 0
; Sunday, April 17, 2016 9:45:55 PM EDT UTC-04
; * $$ EOJ

regards Herge
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #10 on: April 18, 2016, 12:51:33 PM »


 Good Morning;

 This is makpdbl.bat

Code: [Select]
REM MAKPDBL.BAT @DATE @TIME EST
REM Monday, January 18, 2016 5:25:11 AM EST
REM From Masm Forum
\masm32\bin\ml /c /coff /Zi /Zd /Fl "%1".ASM
\masm32\bin\link /SUBSYSTEM:WINDOWS /OPT:NOREF /RELEASE /DEBUG /DEBUGTYPE:CV "%1".obj
set _debug_this=c:\masm32\bin\%1.exe
dir "%1".*
pause


Good Bye: Herge!

I think I have sent everthing U need 4 World.EXE but
I could of forgot something.
if it EXES and don't crash so Enjoy!
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.

herge

  • Member
  • ***
  • Posts: 480
Re: End GO
« Reply #11 on: April 18, 2016, 12:55:09 PM »

Sh*t I forgot SU Bummer!

<< this is SU - Sorry!

Code: [Select]
;\masm32\bin\time\su Saturday, March 26, 2016 3:43:06 AM EST
;*Herge* Sunday, April 17, 2016 9:53:25 PM MINUS Four EDT
; This program WORLD.EXE does tell the time on Earth i e
; United Kingdom,London,England Edinburgh,Scotland Cardiff,Wales
; Belfast,Northern Ireland,Gibraltar.
; - John Lennon & Yoko Ono got married here in Gibraltar.
; Western Europe which is either U14 UTC+01 or U15 UTC+02. Brussels,Belgium
; Eastern Europe which is either U15 UTC+02 or U16 UTC+03. Helsinki,FINLAND Moscow,CIS
; (NEW) UTC is Universal Co-Ordinated Time U13 UTC+00 GMT+00 Standard England
; (OLD) GMT is Greenwich Mean Time GMT+0 London,England UTC+00 UNITED KINGDOM-UK
; BST is British Summer Time U14 Day UTC+01 GMT+01 CET+01 Std
; CET is Central European Time U14 UTC+01 Standard,UTC+01
; CEST is Central European Summer Time U15 UTC+02 Daylight
; Time in Western Europe i e Paris,FRANCE CET or CEST U14 or U15 UTC+01=CET UTC+02=CEST
; Time in Eastern Europe i e Helsinki,FINLAND EET or EEST U14 or U15 UTC+02=EET UTC+03=EEST
;
; Standard Std S Std+00 i e UTC+00 U13
; United Kingdom is England,Scotland,Wales,Northern Ireland,Hebrides,Jersey(Channel Islands)
; Summer Daylight D Std+01 i e BST British Summer Time U14 UTC+01 GMT+01
;
; Europe Standard Std S  Std+0 i e CET  UTC+01 U14 BST - Bonn,Brussels,Bucharest,Budapest,Copenhagen,
; Europe Daylight Summer Std+1 i e CEST UTC+02 U15 Day   Geneva,Gibraltar,Helsinki,Lisbon,Madrid,Oslo,
;                                                        Paris,Prague,Rome,Stockholm,Vienna,Zurich
;
; North America i e Alaska,CANADA,MEXICO,Newfoundlabd & Labrador,UNITED STATES OF AMERICA(USA)
;
; Eastern Standard Time Std Std+0 EST+0 i e EST UTC-5 U8 CANADA & USA ie New York City,New York,
;                                                                        United States of America
; Eastern Daylight Time Day Std+1 EDT+0 i e EDT UTC-4 U9 CANADA & USA ie Albany,New York
;                                                                        Ancaster,Ontario
;                                                                        Atlanta,Georgia
;                                                                        Ayr,Ontario
;                                                                        Baltimore,Maryland
;                                                                        Bangor,Maine
;                                                                        Boston,Mass.
;                                                                        Buffalo,New York,USA(Crown Anchor-Chicken Wings)
;                                                                        Chuck Yeager worked Here!
;                                                                        Burlington,Ontario
;                                                                        Burlington,Vermont
;                                                                        Cambridge,Ontario
;                                                                        Cape Kennedy,Florida
;                                                                        Charleston,South Carolina
;                                                                        Charlotte,North Carolina
;                                                                        Cincinatti,Ohio
;                                                                        Cleveland,Ohio
;                                                                        Concord,New Hampshire
;                                                                        Dansbury,Connecticut(SPERRY)-Railway Inspection!
;                                                                        Dayton,Ohio-NCR HQ
;                                                                        Dearborn,Michigan-FORD HQ
;                                                                        Detriot,Michigan
;                                                                        Dorval,PQ(Airport)
;                                                                        Dover,Delaware
;                                                                        Ethel,Ontario
;                                                                        Field,Ontario(Steam Powered Lumber Yard)
;                                                                        Fort Erie,Ontario
;                                                                        Foxboro,Mass.
;                                                                        Goderich,Ontario
;                                                                        Hamilton,Ontario
;                                                                        Hartford,Connecticut
;                                                                        Key West,Florida
;                                                                        Lachine,PQ
;                                                                        Leamington,Ontario
;                                                                        Lewistown,New York,USA
;                                                                        Miami,Florida
;                                                                        Montreal,Quebec(PQ)
;                                                                        Newark,New Jersey
;                                                                        Niagara Falls,New York
;                                                                        Niagara Falls,Ontario
;                                                                        Niagara-on-the-Lake,Ontario
;                                                                        Oklahoma City,Oklahoma(FAA Parts Depot,NCR Disribution Warehouse)
;                                                                        Orchard Park,New York,USA
;                                                                        Orlando,Florida
;                                                                        Ottawa,Ontario,CANADA
;                                                                        Owen Sound,Ontario
;                                                                        Parry Sound,Ontario
;                                                                        Peachtree,Georgia(NCR Warehouse)
;                                                                        Pittsburgh,Pennsylvania
;                                                                        Pontiac,Michigan
;                                                                        Port Colborne,Ontario
;                                                                        Port Huron,Michigan
;                                                                        Quebec City,PQ(Quebec)
;                                                                        Rochester,New York(Kodak,Universal)
;                                                                        Sarnia,Ontario-Port Huron,Michigan
;                                                                        Sault Sainte Marie,Michigan-Sault Sainte Marie,Ontario
;                                                                        Sept Isles,PQ-Seven Islands
;
;                                                                        Stratford,Ontario,CANADA - GEXR,David Adair,Elaine Adair,Emily Adair,
; Thomas " Alva " Edison. Edison was A Telegraph Operator in Stratford, He went on 2 B father of the MP3 Player
; aka DRUM RECORD! Note it was NOT called A MP3(#) Player Until MUCH Latter! Improved & Made
; A USEABLE Light Bulb! Became A Patent Lawyer! Has A few patent(s) himself!
;
;                                                                        Tampa,Florida
;                                                                        Thorold,Ontario(Felland Canal)
;                                                                        Tobermory,Ontario
;                                                                        Toledo,Ohio
;
;                                                                        Toronto,Ontario aka York,Ontario-War of 1812(Port Dover & Toronto were Trashed by Americans)
;                                                                        Wairton,Ontario,CANADA (Airport & Coast Guard Statiom)
; British, Royal Navy were told to " TRASH " , Washington (City of)
; and their did a VERY Good JOB,Library of Congress,
; was BURNT 2 GROUND! Other Buildings also got burnt.
; President's Mansion needed a LOT of White-WASH!
; (City of Washington, USA aka Capital of USA) Washington,District of Columbia(DC),
; United States of America-War of 1812(Washington Was BURNT buy British,Royal Navy)
;                                                                        Windsor,Ontario-Detriot,Michigan
;                                                                         
;
; Note: SU0 Routine ends at the ret in SSS routine
; Midway So Don't Edit it! i e we run all
; the SU0 thru SU26 routines one by one until
; U (you) hit the ret in SSS Midway.
;
; Odd Ball Time Zones i e one's that have a M or P
; in front of them. Offset(s) NOT on an Hourly
; boundary. i e AFGHANISTAN,BURMA,INDIA,IRAN,NEPAL,
; Newfoundland & Labrador,NORTH KOREA,Lord Howe Island,
; VENEZUELA. In Southern Hemisphere Chatham Islands,
; NEW ZEALAND. AUSTRALIA Also has a few ½ Half Hour Offsets.
;
; M Minus    - Offset from UTC London, UNITED KINGDOM (England,Northern Ireland,Scotland,Wales)
; P Positive + Offset from UTC London, UNITED KINGDOM (England,Northern Ireland,Scotland,Wales)
;
; M4_5 UTC-04.5 Caracas,VENEZUELA - South America
; M3_5 UTC-03.5 Saint John's,Newfoundland & Labrador,CANADA Std
; M2_5 UTC-02.5 Newfoundland & Labrador Day -2.5 0.5 = 30 Minutes
; U12  -01 AZOT Azores-Portugal
; U13  +00 GMT+0 Standard-UNITED KINGDOM, ICELAND
; U14  +01 CET+0 Daylight-British Summer Time, Central European Time
; U15  +02 CEST+0 Central European Summer Time
; U15  +02 SAST South Africa Standard Time-Cape Town, SOUTH AFRICA
; U16  +03 EAT East Africa Time-DJIBOUTI, KENYA, SOMALIA, YEMEN
; U16  +03 MKT Moscow Time-COMMONWEALTH OF INDEPENDEMT STATES-CIS-Russia
; P3_5 +03:30 Iran Standard,Tehran,Iran UTC-3.5;30 Minutes=0.5 Hours
; U17  +04 SAMT Samara Samara,CIS
; P4_5 +04.5 AFGHANISTAN,IRAN Day
; U18  +05 PAKT Pakistan Time-PAKISTAN
; P5_5 +05.5 IST India Standard-New Delhi,INDIA
; P5_45 +05.75 Katmandu,NEPAL .75 = 45 Minutes
; U19  +06 OMST Omsk Time Omsk,CIS
; P6_5 +6.5 MYANMAR-Rangoon,BURMA
; U20  +07 KRAT Krasnoyarsk Time
; U21  +08 IRKT Irkutsk Time -CIS
; P8_5 +08.5 NORTH KOREA
; U22  +09 YAKT Yakutsk Time -CIS
; P9_5 +09.5 UTC+9.5 ACST Australia Central Standard Time
; U23  +10 SAKT Sakhalin Time Sakhalin,CIS
; P10_5 +10.5 ACDT Australia Central Daylight Time
; P10_5 +10.5 Lord Howe
; U24  +11 AUSTRALIA
; U25  +12 NEW ZEALAND Std-Wellington
; P12_45 +12:45 Chatham Std NEW ZEALAND
; U26 UTC+13 NEW ZEALAND Day-Wellington
; P13_45 UTC+13:45 Chatham Daylight NEW ZEALAND
;
; U0 UTC-13
; U1 UTC-12
; U2  -11 CKT Cook Island SST Midway HAST Hawaii
; U3  -10 Alaska
; U4  -09  Pacific Daylight AKDT PIS-8
; U5  -08  Mountain Standard -Western USA
; U6  -07  Mountain Daylight
; U7  -06  Central Standard GALT Galapagos
;          Chicago,illinois,USA-Winnipeg,Manitoba,CANADA
; U8  -05  ECT Ecuador Lima,Peru-Paddington's Aunt lives here
; U9  -04  Central Day cdt CUBA D
; U10 -03 UY,SRT,CLS URUGUAY CHILE
; U11 -02 UYS Montevideo,URUGUAY Day GREENLAND
; U12 -01 AZOT Azores Standard
; U13 +00 AZOST Azores Summer
; U13 +00 UTC+0 GMT+0 UNITED KINGDOM England-Western European WET
; U14 +01 UK Day BST British Summer CET Azores
; U14 +01 Western European Summer MOROCCO WEST
; U15 +02 EET FINLAND,LIBYA European Summer CEST Tis ISRAEL
; U15 +02 Cape Town, SOUTH AFRICA-SAST
; U16 +03 EEST FINLAND,SAUDIA ARABIA Arabian Standard AST KENYA EAT ISRAEL TID
; U16 +03 MKT Moscow,COMMOMWEALTH OF INDEPENDENT STATES,CIS-Russia
; U17 +04 Persian Gulf UAE UNITED ARAB EMIRATES
; U18 +05 PAKISTAN PKT
; U19 +06 DIEGO GARCIA IOT
; U20 +07 Christmas Island,Western Australia,AUSTRALIA CXT-WIB INDONESIA
; U21 +08 CHINA Perth,WA,AUSTRALIA-WA=Western Australia
; U22 +09 KOREA KST-ACST Australia Central Standard-JST JAPAN Standard
; U23 +10 GUAM
; U24 +11 Lord Howe Island,AUSTRALIA
; U25 +12 FIJI NEW ZEALAND Standard-Bikini Atoll,MARSHALL ISLANDS
; U26 +13 FIJI NEW ZEALAND Daylight
;
; UTC +00 Universal Co-Ordinated (New) London,England-UNITED KINGDOM
; GMT +00 U13      Greenich Mean (Old) London,England
; U13* Greenwich Observatory is on Thames River in London,UNITED KINGDOM
;      London, England.
; U13 is what you get if you ask for System Time. i e UTC+00 GMT+00
;
; .data
; Y FILETIME<>
; .code
; SU13 proc;UTC+0 GMT+0 London,England United Kingdom Greenland
; invoke GetSystemTime,A U13;SYSTEMTIME UTC+00 GMT+00
; invoke SystemTimeToFileTime,O U13,O Y
; mov edx,O Y
; invoke FileTimeToSystemTime,edx,O U13
; SU13 endp
; SU14 proc;
; R4; Read \masm32\bin\time\WORLD; R4 MACRO definition.
; ; ret
; ; dd 0
; SU14 endp
; END GO
;
; HAST U2 is UTC-11 Hawaiian Aleutian Standard-Honolulu, Hawaii
; AKST U3 is UTC-9  Alaska Standard-Adak,Alaska
; BST U14 is British Summer    U14 UTC+1 GMT+1
; CET U14 is Central European U14 UTC+1 GMT+1 Bonn,Germany Brussels,Belgium Paris,France
; CEST    is Central European Summer UTC+2 Bonn,Germany Brussels,Belgium Paris,France
; CET,CEST Geneva,Switzerland Madrid,Spain Rome,Italy Vienna,Austria Zurich,Switzerland
; AST     is Atlantic Standard Time U9 UTC-4 Atlantic Canada-New Brunskwick,Nova Scotia,
;         Newfoundland & Labrador,Quebec,Charlatown,Prince Edward Island,
;         Fredrickton,New Brunswick Halifax,Nova Scotia
;
; EDT U9  is Eastern Daylight Time  U9 -4 Eastern Canada/America i e Ottawa,Ontario
; EST U8  is Eastern Standard Time  U8 -5 Eastern Canada/America i e Washington,Distric of Columbia (DC)
; ADT U8  is Atlantic Daylight Time U8 -5 Atlantic Canada Halifax,Nova Scotia
; ADT U8  is Charlotown,Prince Edward Island Frederickton,New Brunswick Halifax,Nova Scotia
; CDT U8  is Central Daylight Time  U8 -5 Winnipeg,Manitoba Chicago,illinois
; CST U7  is Central Standard Time  U7 -6 Winnipeg,Manitoba Chicago,illinois
; MDT U7  is Mountain Daylight Time U7 -6 Edmonton, Alberta Helena, Montana
; MST U6  is Mountain Standard Time U6 -7 Helena,Montana Edmonton,Alberta
; PDT U6  is Pacific Daylight Time  U6 -7 Whitehorse,Yukon Seattle,Washington(State of) NOT Washington DC
; PST U5  is Pacific Standard Time  U5 -8 Whitehorse,Yukon Vancouver,British Columbia
; AKDT U4 is Alaska Daylight Time   U4 -9 Juneau Fairbanks Anchorage
; AKST U3 is Alaska Standard Time   U3 -8 Juneau Fairbanks Anchorage
;
; U short for UTC see U13* Above.
; UK UNITED KINGDOM see U13+ Below. Lomdon,England
;
; M4_5   is UTC-4.5 VENEZUELA-South America 0.5=30 Minutes
;
; U8     is UTC-5 EST Eastern Standard Time Buffalo,New York,USA-Toronto,Ontario,CANADA
; U9     is UTC-4 EDT Eastern Daylight Time Buffalo,New York,USA-Toronto,Ontario,CANADA
;
; Eastern Canada & East Coast USA
;
; i e Atlanta,Bangor,Baltimore,Boston,Buffalo,Charlston,Cleveland,Detriot,Dover,
;   Erie,Foxboro,Little Rock,Miami,Newark,New York City,Philidelphia,Pittsburg,
;   Orlando,Raleigh,Toledo,Washington,DC(District of Columbia).
;
; Alabama,Connecticut,District of Columbia(DC),Florida,Georgia,Maine,
;  Maryland,Mass.,Michigan,New Hampshire,New Jersey,New York,North Carolina,
;  Ohio,Pennsylvania,Rhode Islands & Plantations,South Carolina,Vermont,
;  Virgina,West Virgina
;
; Canada:Brantford,Ontario Ethel,Ontario Field,Ontario Goderich,Ontario
;  Hamilton,Ontario Catherines,Ontario Leamington,Ontario London,Ontario
;  Niagara Falls,Ontario Niagara-on-the-Lake,Ontario Saint Catherines,Ontario
;  Sarnia,Ontario Thorold,Ontario Toronto,Ontario Ottawa,Ontario Port Colborne,
;  Ontario Port Dover,Ontario Sarnia,Ontario Stratford,Ontario Woodstock,Ontario
;
;  Dorval,Quebec Lachine,Quebec Montreal,Quebec Quebec City,Quebec
;  Sept Isles,Quebec
;
; U10 U-03 ADT ART BRT CLST FKST SRT WGT UYT Atlantic Day ARGENTINA
; U10 UTC-03 BRAZIL CHILE GREENLAND FALKLAND
; U11 U-02;UYS Montevideo,URUGUAY D GREENLAND
; U12 U-01 Azores PORTUGAL
; U13 UTC+00 ICELAND
; U13+ UTC+00 UNITED KINGDOM is England,Scotland,Wales,
;             Northern Ireland,Isle of Man,Jersey,Hebrides
; U13 UTC+00 London,England UK GMT+0 Greenwich Mean
; U14 UTC+01 BST British Summer CET Central European
; U14 Berlin Copenhagen Lisbon Madrid Oslo Paris Rome Vienna Zurich
; U14 GERMANY DENMARK PORTUGAL SPAIN NORWAY FRANCE ITALY AUSTRIA SWITZERLAND
; U14 Bonn Copenhagen Lisbon Madrid Oslo Paris Rome Vienna Bern (Capitals)
; U15 UTC+2 CEST Central European Summer Time-Bonn Madrid Paris Rome Vienna Zurich
; U16 +03 EEST EAT Tripoli,LIBYA Nairobi,KENYA
; U16 +03 MKT Moscow,CIS-Russia
; U17 +04 GST SCT UNITED ARAB EMIRATES Persian Gulf
; P5_5 +05:30 IST India Stamdard
; P6_5 +06.5 Rangoon,BURMA
; P8_5 +08.5 NORTH KOREA PYT
; P10_5 +10.5 AUSTRALIA Lord Howe
; U21 +08 MY AWST Australian Western Standard Time
; ACST Australian Central Standard-Alice Springs,Northern Territory,AUSTRALIA
; U21 Perth,Western Australia,AUSTRALIA aka Perth WA
; U23,U24 Sydney,New South Wales,AUSTRALIA
; U23 +10 AEST Australian Eastern Std
; U24 +11 AEDT Australian Eastern Day 
; U25 +12 NZST NEW ZEALAND Standard Wellington
; U26 UTC+13 NZDT NEW ZEALAND Day
;X \masm32\bin\time\su U have read SU Read Me File Thursday, March 10, 2016 10:47:42 PM EST **L253

Good Bye - herge
Regards herge
Read "Slow Death by Rubber Duck"
for chemical Laughs.