Post
Sun Jan 20, 2013 2:13 pm
Another script update to cater for running .com stuff like scott adams adventures :-
;********************************
;* Oricutron GEMUS Script *
;* 23rd August 2012 *
;********************************
;
; PLEASE SET YOUR EMULATOR PROPERTIES AS FOLLOWS:
;
; Emulator File: ORICUTRON.EXE
; Associated Script File (1): Oricutron.cfg
; Use Short Filenames: YES
; File Types: TAP;DSK;WAV
; (Compressed File Types: GZ;Z;BZ2;ZIP;TAR;TZG;ZOO)
;
; This script was written for Oricutron 0.9,
; but may work with other versions too.
;
; YOU MUST PLACE AN [options] SECTION MARKER AT TOP OF ORICUTRON.CFG FILE FOR SCRIPT TO WORK
If Key_version CONTAINS(atmos)
Set_INI_Value(1||options||machine|| atmos)
Else
Set_INI_Value(1||options||machine|| oric1)
End If
If Key_version CONTAINS(telestrat)
Set_INI_Value(1||options||machine|| telestrat)
End If
If Key_version CONTAINS(pravetz)
Set_INI_Value(1||options||machine|| pravetz)
End If
If GameType CONTAINS(tap||wav)
Add_CLP(-t%gamepathfile%)
End If
If GameType CONTAINS(Dsk)
Add_CLP(-d%gamepathfile%)
End If
; Render mode (soft, opengl)
Set_INI_Value(1||options||rendermode|| soft)
; Show scanlines? (yes/no)
Set_INI_Value(1||options||scanlines|| no)
; Horizontal stretch? (yes/no) <-- opengl only
Set_INI_Value(1||options||hstretch|| no)
; PAL ghosting? (yes/no) <-- opengl only
Set_INI_Value(1||options||palghost|| no)
; Start fullscreen?
Set_INI_Value(1||options||fullscreen|| no)
; Lightpen (yes/no)
Set_INI_Value(1||options||lightpen|| no)
; Joystick interface for Atmos/Oric-1 mode. Telestrat has its own built-in standard.
; Options are 'none', 'altai', 'pase' or 'ijk'
Set_INI_Value(1||options||joyinterface|| altai)
; How to emulate joysticks attached to the above interface
; Options are 'none', 'kbjoy1', 'kbjoy2', 'sdljoyN' (where n is 0 to 9)
Set_INI_Value(1||options||joystick_a|| kbjoy1)
Set_INI_Value(1||options||joystick_b|| none)
; How to emulate joysticks attached to the telestrat
; Options are 'none', 'kbjoy1', 'kbjoy2', 'sdljoyN', 'mouse'
Set_INI_Value(1||options||telejoy_a|| kbjoy1)
Set_INI_Value(1||options||telejoy_b|| none)
; Keys to emulate joystick, set 1
; NOTE: "fire2" is only available on telestrat
Set_INI_Value(1||options||kbjoy1_up|| 'KP8')
Set_INI_Value(1||options||kbjoy1_down|| 'KP2')
Set_INI_Value(1||options||kbjoy1_left|| 'KP4')
Set_INI_Value(1||options||kbjoy1_right|| 'KP6')
Set_INI_Value(1||options||kbjoy1_fire1|| 'KP_ENTER')
Set_INI_Value(1||options||kbjoy2_fire2|| 'KP_PLUS')
; Keys to emulate joystick, set 2
Set_INI_Value(1||options||kbjoy2_up|| 'W')
Set_INI_Value(1||options||kbjoy2_down|| 'S')
Set_INI_Value(1||options||kbjoy2_left|| 'A')
Set_INI_Value(1||options||kbjoy2_right|| 'D')
Set_INI_Value(1||options||kbjoy2_fire1|| 'SPACE')
Set_INI_Value(1||options||kbjoy2_fire2|| 'N')
If Key_autorun CONTAINS(no)
Run_Emulator_Send_Keys([4] run{enter}||50)
Else
If %runcom_value% CONTAINS(*.com*)
Run_Emulator_Send_Keys([3]%runcom_value%{enter}||50)
Else
Run_Emulator()
End If
End If
- You'll need to add runcom value, eg:- (runcom=adv01.com for Adventureland) in key-value section for every game that needs it.
