You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
33 lines
2.0 KiB
Fortran
33 lines
2.0 KiB
Fortran
! Winteracter module created : 07/Nov/1998 14:27:06
|
|
!
|
|
MODULE MENUED
|
|
INTEGER, PARAMETER :: IDR_MENU1 = 30001
|
|
INTEGER, PARAMETER :: ID_FILE = 40001
|
|
INTEGER, PARAMETER :: ID_EXIT = 40002
|
|
INTEGER, PARAMETER :: ID_NODE = 40003
|
|
INTEGER, PARAMETER :: ID_ELTS = 40004
|
|
INTEGER, PARAMETER :: ID_ORDR = 40005
|
|
INTEGER, PARAMETER :: ID_CCLN = 40006
|
|
INTEGER, PARAMETER :: ID_CSEC = 40007
|
|
INTEGER, PARAMETER :: ID_ZOOM = 40008
|
|
INTEGER, PARAMETER :: ID_DRAW = 40009
|
|
INTEGER, PARAMETER :: ID_HELP = 40010
|
|
INTEGER, PARAMETER :: ID_STRING1 = 50001
|
|
INTEGER, PARAMETER :: ID_STRING2 = 50002
|
|
INTEGER, PARAMETER :: ID_STRING3 = 50003
|
|
INTEGER, PARAMETER :: ID_STRING4 = 50004
|
|
INTEGER, PARAMETER :: ID_STRING5 = 50005
|
|
INTEGER, PARAMETER :: ID_ITEM11 = 40011
|
|
INTEGER, PARAMETER :: ID_ITEM12 = 40012
|
|
INTEGER, PARAMETER :: ID_ITEM13 = 40013
|
|
INTEGER, PARAMETER :: ID_ITEM14 = 40014
|
|
INTEGER, PARAMETER :: ID_ITEM15 = 40015
|
|
INTEGER, PARAMETER :: ID_ITEM16 = 40016
|
|
INTEGER, PARAMETER :: ID_ITEM17 = 40017
|
|
INTEGER, PARAMETER :: ID_ITEM18 = 40018
|
|
INTEGER, PARAMETER :: ID_ITEM19 = 40019
|
|
INTEGER, PARAMETER :: IDF_STRING1 = 1002
|
|
INTEGER, PARAMETER :: IDF_GROUP1 = 1001
|
|
INTEGER, PARAMETER :: IDF_STRING3 = 1003
|
|
END MODULE MENUED
|