Y_repeatさん、お答えありがとうございます。
上のモジュールのデバックをしてHSP実行のボタンをおして正しく動きましたので
下に正しく動いたモジュールのスクリプトを記しておきます。
また、モジュールは20カテゴリーにわけました。
Y_repeatさんのおしゃているとほり、プリプロセッサ命令は改名できないようです。
こちらでも試してみましたがエラーで動きませんでしので#define以外のほかの
機能で改名できないか試してみます。
#cmpopt optcode 0の事について調べてみて
http://quasiquote.org/hspwiki/HSP%E3%81%AE%E4%BB%95%E6%A7%98
のページを見ました。このページにも書かれていないことについても調べて試してみます。
//#defineを使うときに氣を付けることを下に記す。
//改名にスペースを含めるとエラーになる。
//改名した命令、関数、マクロは、アルファベットの大文字と小文字を區別せず動く。
//#define命令は、すべて小文字で書かないと動かない。
//#define globalのglobalは、大文字で書いても動く。
//行内の#defineの前にコメント//または/**/を書くとエラーになるので書かないこと。
//改名する時、改名前と改名後が同じ場合はエラーになる。例えると#define Global Input inputになる。
//既に定義済みの命令名、関数名、マクロ名は改名後の名前に使うことは許されずエラーとなる。
//#defineの改名に使える文字にアルファベット、ひらがな、かたかな、漢字、数字がある。ただし、改名の初めに数字を使うとエラーになる。
//#define命令は、#から始まるすべてのプリプロセッサ命令の名前を改名することができない。
//二つ以上の#define命令で同じ改名を使うとエラーになる。
//#define命令は、#から始まるプリプロセッサ命令以外の命令と関数、マクロ、変数、数値を改名することが行える。
/* 20カテゴリー */
/*_COMオブジェクト操作関数_1 */
#cmpopt optcode 1
#module
#define Global Component_Object_Model_Event_Dispatch_ID comevdisp
#global
/*_COMオブジェクト操作命令_6 */
#cmpopt optcode 0
#module
#define Global New_Component_Object_Model newcom
#define Global Query_Component_Object_Model querycom
#define Global Component_Object_Model_Event_Parameters_arguments comevarg
#define Global SafeArray_Column_Variable sarrayconv
#define Global Component_Object_Model_Event comevent
#define Global Delete_Component_Object_Model delcom
#global
/*_HSPシステム制御命令_2 */
#cmpopt optcode 0
#module
#define Global Log_Message logmes
#define Global _Assert assert
#global
/*_オブジェクト制御命令_14 */
#cmpopt optcode 0
#module
#define Global Object_Combo_Box combox
#define Global Object_Input input
#define Global Object_List_Box listbox
#define Global Object_Message_Box mesbox
#define Global Object_Enable objenable
#define Global Object_Mode objmode
#define Global Object_Parameter objprm
#define Global Object_Select objsel
#define Global Object_Size objsize
#define Global Object_Skip objskip
#define Global Object_Button button
#define Global object_Image objimage
#define Global Object_Check_Box chkbox
#define Global Object_Clear_Object clrobj
#global
/*_システム変数_63_*/
#cmpopt optcode 0
#module
#define Global Reference_String refstr
#define Global String_Size strsize
#define Global Subroutine_Level sublev
#define Global This_Module thismod
#define Global Windows_Param wparam
#define Global Counter cnt
#define Global Directory_Command_Line dir_cmdline
#define Global Directory_Current dir_cur
#define Global Directory_Desk_Top dir_desktop
#define Global Directory_Executable_File dir_exe
#define Global Directory_My_Document dir_mydoc
#define Global Directory_System dir_sys
#define Global Directory_Tv dir_tv
#define Global Directory_Windows dir_win
#define Global Error err
#define Global General_Information_Accelerometer_Value_X ginfo_accx
#define Global General_Information_Accelerometer_Value_Y ginfo_accy
#define Global General_Information_Accelerometer_Value_Z ginfo_accz
#define Global General_Information_Active ginfo_act
#define Global General_Information_Current_Position_X ginfo_cx
#define Global General_Information_Current_Position_Y ginfo_cy
#define Global General_Information_Desk_Top_X ginfo_dispx
#define Global General_Information_Desk_Top_Y ginfo_dispy
#define Global General_Information_Message_X ginfo_mesx
#define Global General_Information_Message_Y ginfo_mesy
#define Global General_Information_New_Window_Id ginfo_newid
#define Global General_Information_Window_ID_At_The_Time_Of_Message_Interrupt ginfo_intid
#define Global General_Information_Mouse_Cursor_X ginfo_mx
#define Global General_Information_Mouse_Cursor_Y ginfo_my
#define Global General_Information_Pallet_USE ginfo_paluse
#define Global General_Information_Red ginfo_r
#define Global General_Information_Green ginfo_g
#define Global General_Information_Blue ginfo_b
#define Global General_Information_Select ginfo_sel
#define Global General_Information_Size_X ginfo_sizex
#define Global General_Information_Size_Y ginfo_sizey
#define Global General_Information_Screen_X ginfo_sx
#define Global General_Information_Screen_Y ginfo_sy
#define Global General_Information_v_x ginfo_vx
#define Global General_Information_v_y ginfo_vy
#define Global General_Information_Window_X ginfo_winx
#define Global General_Information_Window_Y ginfo_winy
#define Global General_Information_Window_X1 ginfo_wx1
#define Global General_Information_Window_X2 ginfo_wx2
#define Global General_Information_Window_Y1 ginfo_wy1
#define Global General_Information_Window_Y2 ginfo_wy2
#define Global Hot_Soup_Processor_Status hspstat
#define Global Hot_Soup_Processor_Version hspver
#define Global Loop_NestLevel looplev
#define Global Microsoft_Windows_Gothic msgothic
#define Global Microsoft_Windows_Mincho msmincho
#define Global Mouse_Wheel mousew
#define Global Mouse_X mousex
#define Global Mouse_Y mousey
#define Global Note_Max notemax
#define Global Note_Size notesize
#define Global Status stat
#define Global Current_Device_Context hdc
#define Global Current_Instance_Handle hinstance
#define Global Handle_Window hwnd
#define Global Interrupt_Param iparam
#define Global ID_Param lparam
#define Global Reference_Double_Value refdval
#global
/*_ファイル操作命令_10_*/
#cmpopt optcode 0
#module
#define Global Memory_File memfile
#define Global Change_Choose_Data_Protection_Manager chdpm
#define Global Buffer_Copy bcopy
#define Global Buffer_Load bload
#define Global Buffer_Save bsave
#define Global Change_Directory chdir
#define Global File_Delete delete
#define Global Directory_List dirlist
#define Global File_Exist exist
#define Global Make_Directory mkdir
#global
/*_プリプロセッサ命令_34_*/
/*#から始まるプリプロセッサ命令は#defineで改名できない。なのでコメントで無効とする。
#cmpopt optcode 0
#module
#define Global Command #cmd
#define Global Compile_Option #cmpopt
#define Global Component_Object_Model_Function #comfunc
#define Global Constant #const
#define Global End_If #endif
#define Global Enum #enum
#define Global Function #func
#define Global _If #if
#define Global _Else #else
#define Global Include #include
#define Global Module_Term #modterm
#define Global Module_C_Type_Function #modcfunc
#define Global Module_Function #modfunc
#define Global Module_Constructor #modinit
#define Global Module #module
#define Global User-defined_Function #defcfunc
#define Global Global #global
#define Global User_defined_Function #deffunc
#define Global User_defined_Macro_Function #define
#define Global Un_Define #undef
#define Global Pack_Option #packopt
#define Global Pack #pack
#define Global Encryption_Pack #epack
#define Global Run_Time #runtime
#define Global Use_Component_Object_Model #usecom
#define Global Use_Library #uselib
#define Global Addition #addition
#define Global C_Type_Function #cfunc
#define Global If_Defined #ifdef
#define Global If_Not_Defined #ifndef
#define Global Register_Command #regcmd
#define Global Aht_Message #ahtmes
#define Global Aht #aht
#define Global Boot_Option #bootopt
#global
*/
/*_プログラム制御マクロ_13_*/
#cmpopt optcode 0
#module
#define Global Macro_Switch switch
#define Global Macro_Until until
#define Global Macro_Wend wend
#define Global Macro_While while
#define Global Macro_Break _break
#define Global Macro_Case case
#define Global Macro_Continue _continue
#define Global Macro_Default default
#define Global Macro_Do do
#define Global Macro_For for
#define Global Macro_Next next
#define Global Macro_Switch_End swend
#define Global Macro_Switch_Swend_Break swbreak
#global
/*_プログラム制御命令_23 */
#cmpopt optcode 0
#module
#define Global __If if
#define Global __Else else
#define Global On_Click onclick
#define Global On_Command oncmd
#define Global On_Error onerror
#define Global On_Exit onexit
#define Global On_Key onkey
#define Global _On on
#define Global _Repeat repeat
#define Global _Loop loop
#define Global _Return return
#define Global _Run run
#define Global _Stop stop
#define Global _Wait wait
#define Global Extra_Go_To exgoto
#define Global _Await await
#define Global __Break break
#define Global __Continue continue
#define Global _End end
#define Global Execute exec
#define Global For_Each foreach
#define Global Go_Subroutine gosub
#define Global Go_To goto
#global
/*_マルチメディア制御命令_4_*/
#cmpopt optcode 0
#module
#define Global Media_Control_Interface_Multimedia_Control_Interface mci
#define Global Multi_Media_Load mmload
#define Global Multi_Media_Play mmplay
#define Global Multi_Media_Stop mmstop
#global
/*_メモリ管理関数_3_*/
#cmpopt optcode 0
#module
#define Global Wide_Peek wpeek
#define Global Long_Peek lpeek
#define Global _Peek peek
#global
/*_メモリ管理命令_16 _*/
#cmpopt optcode 0
#module
#define Global Dimension dim
#define Global Label_Dimension ldim
#define Global Memory_Copy memcpy
#define Global Memory_Expand memexpand
#define Global Memory_Set memset
#define Global New_Label newlab
#define Global New_Module newmod
#define Global Long_Poke lpoke
#define Global _Poke poke
#define Global Wide_Poke wpoke
#define Global String_Dimension sdim
#define Global Component_Object_Model_Set_Method_Return_Assignment_Variable comres
#define Global _Alloc alloc
#define Global Delete_Module delmod
#define Global Dimension_Type dimtype
#define Global Double_Dimension ddim
#global
/*_画面制御命令_41 _*/
#cmpopt optcode 0
#module
#define Global Graphic_Roll groll
#define Global Graphic_Rotate grotate
#define Global Graphic_Setting_Select gsel
#define Global Point_Get pget
#define Global Point_Set pset
#define Global ActiveX_Object axobj
#define Global Box_Fill boxf
#define Global Buffer_Screen bgscr
#define Global _Buffer buffer
#define Global Cell_Load celload
#define Global Cell_Output celput
#define Global _Circle circle
#define Global Clear_Screen cls
#define Global _Color color
#define Global Current_Position pos
#define Global Dialog_Box dialog
#define Global _Font font
#define Global Graphical_Square gsquare
#define Global Graphical_Zoom gzoom
#define Global Hue_Saturation_Value_Color hsvcolor
#define Global _Line line
#define Global Message mes
#define Global _Print print
#define Global Microsoft_Windows_Bitmap_Image_Save bmpsave
#define Global Palette_Color palcolor
#define Global _Palette palette
#define Global Picture_Load picload
#define Global _Redraw redraw
#define Global _Screen screen
#define Global Send_Window_Message sendmsg
#define Global System_Color syscolor
#define Global System_Font sysfont
#define Global _Title title
#define Global _Width width
#define Global Window_Object winobj
#define Global Cell_Division celdiv
#define Global Change_Display chgdisp
#define Global Graphic_Copy gcopy
#define Global Graphic_Mode gmode
#define Global Graphic_Radf gradf
#define Global Graphic_Rect grect
#global
/*_基本入出力関数_34 */
#cmpopt optcode 0
#module
#define Global Directory_Information dirinfo
#define Global _Double double
#define Global Find_Power powf
#define Global General_Information ginfo
#define Global Get_Time gettime
#define Global Integer int
#define Global _Length1 length
#define Global _Length2 length2
#define Global _Length3 length3
#define Global _Length4 length4
#define Global _Limit limit
#define Global Logarithm_Function logf
#define Global Object_Information objinfo
#define Global Random_Number rnd
#define Global Sine sin
#define Global String_Length strlen
#define Global _String str
#define Global System_Infomation sysinfo
#define Global Tangent tan
#define Global Variable_Pointer varptr
#define Global Variable_Size varsize
#define Global Variable_Type vartype
#define Global Variable_Use varuse
#define Global Exponential_Function_Float expf
#define Global Get_Easing getease
#define Global Get_Easing_Float geteasef
#define Global Library_Pointer libptr
#define Global Limit_By_Float limitf
#define Global Square_Root sqrt
#define Global Absolute_Value abs
#define Global Absolute_Value_ absf
#define Global Arctangent_Value atan
#define Global Call_Func callfunc
#define Global Cosine_Value cos
#global
/*_基本入出力制御命令_10 */
#cmpopt optcode 0
#module
#define Global Sort_Get sortget
#define Global Sort_Note sortnote
#define Global Sort_Numerical_Value sortval
#define Global Sort_String sortstr
#define Global _Stick stick
#define Global Get_Key getkey
#define Global Method_Call mcall
#define Global _Mouse mouse
#define Global _Randomize randomize
#define Global Set_The_Calculation_Formula_Of_The_Easing_Function setease
#global
/*_数学定数_1 */
#cmpopt optcode 0
#module
#define Global Math_Perimetros M_PI
#global
/*_特殊代入命令_3 */
#cmpopt optcode 0
#module
#define Global Duplicate dup
#define Global Memory mref
#define Global Duplicate_Pointer dupptr
#global
/*_標準定義マクロ_39 */
#cmpopt optcode 0
#module
#define Global File __file__
#define Global Font_Antialiasing font_antialias
#define Global Font_Style_Bold font_bold
#define Global Font_Style_Italic font_italic
#define Global Font_Style_Normal font_normal
#define Global Font_Style_Strikeout font_strikeout
#define Global Font_Style_Underline font_underline
#define Global Graphical_Mode_Red_Green_Blue_0 gmode_rgb0
#define Global Graphical_Mode_Addition gmode_add
#define Global Graphical_Mode_Alpha gmode_alpha
#define Global Graphical_Mode_Memory gmode_mem
#define Global Graphical_Mode_Pixel_Alpha_Blend gmode_pixela
#define Global Graphical_Mode_Red_Green_Blue_0_Alpha gmode_rgb0alpha
#define Global Graphics_Device_Interface gmode_gdi
#define Global Hot_Soup_Processor_Version_ __hspver__
#define Global Hot_Soup_Processor_3_0 __hsp30__
#define Global __Line __line__
#define Global Object_Information_BMSCR_Structure objinfo_bmscr
#define Global Object_Information_Handle objinfo_hwnd
#define Global Object_Information_Mode objinfo_mode
#define Global Object_Mode_Graphical_User_Interface_Font objmode_guifont
#define Global Object_Mode_Normal objmode_normal
#define Global Object_Mode_Use_Font objmode_usefont
#define Global Degree2_Radian deg2_Rad
#define Global Radian2_Degree rad2_Deg
#define Global Screen_Fixed_Size screen_fixedsize
#define Global _Screen_Frame screen_frame
#define Global _Screen_Hide screen_hide
#define Global _Screen_Normal screen_normal
#define Global _screen_palette screen_tool
#define Global Subtraction gmode_sub
#define Global Time __time__
#define Global _And and
#define Global _Not not
#define Global _Or or
#define Global Exclusive_OR xor
#define Global Date __date__
#define Global Debug _debug
#global
/*_文字列操作関数_9 */
#cmpopt optcode 0
#module
#define Global String_Middle strmid
#define Global String_Trim strtrim
#define Global Convert_ANSI_String_To_Regular_String cnvatos
#define Global Convert_Unicode_To_Regular_String cnvwtos
#define Global Get_Path getpath
#define Global In_String instr
#define Global Note_Find notefind
#define Global Note_Information noteinfo
#define Global String_Format strf
#global
/*_文字列操作命令_12 */
#cmpopt optcode 0
#module
#define Global Note_Select notesel
#define Global Note_Un_Select noteunsel
#define Global _Split split
#define Global Strings_Replace strrep
#define Global Convert_Normal_Strings_To_Unicode cnvstow
#define Global Convert_Regular_Strings_To_ANSI_Strings cnvstoa
#define Global Get_String getstr
#define Global Note_Addition noteadd
#define Global Note_Delete notedel
#define Global Note_Get noteget
#define Global Note_Load noteload
#define Global Note_Save notesave
#global
おちついたので解決とします。
もし、上のデバックしたモジュールをみなさんが
実行してエラーになった時はこのスレッドにお知らせください。
よろしくお願いいたします
HSP言語の命令の名前の多くは省かれていますが、省かれる前の元となった単語を知りたいです。
