Improve The Third Person View with Zoom: Difference between revisions

From EDukeWiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
Line 1: Line 1:
Add this code to GAME.CON, after include USER.CON&nbsp;.<br>
Add this code to GAME.CON, after <code>include USER.CON</code>.
<pre>
gamevar cameraonwall 0 1
gamevar camzoomcontrol 65536 1


onevent EVENT_LOOKUP
gamevar cameraonwall 0 1
setvar RETURN -1
gamevar camzoomcontrol 65536 1
addvar camzoomcontrol -8192 //cam zoom in speed
ifvarl camzoomcontrol 0 { setvar camzoomcontrol 0 } //cam max zoom in
onevent EVENT_LOOKUP
endevent
    setvar RETURN -1
 
    addvar camzoomcontrol -8192 // cam zoom in speed
onevent EVENT_LOOKDOWN
    ifvarl camzoomcontrol 0
setvar RETURN -1
        setvar camzoomcontrol 0 // cam max zoom in
addvar camzoomcontrol 8192 //cam zoom out speed
endevent
ifvarg camzoomcontrol 1048576 { setvar camzoomcontrol 1048576 } //cam max zoom out
endevent
onevent EVENT_LOOKDOWN
 
    setvar RETURN -1
onevent EVENT_DISPLAYROOMS
    addvar camzoomcontrol 8192 // cam zoom out speed
setvar cameradist 0
    ifvarg camzoomcontrol 1048576
updatesectorz camerax cameray cameraz cameraonwall
        setvar camzoomcontrol 1048576 // cam max zoom out
ifvarn cameraonwall -1
endevent
{ addvarvar cameradist camzoomcontrol }
else
onevent EVENT_DISPLAYROOMS
ifvare cameraonwall -1
    setvar [[cameradist]] 0
{ addvar camzoomcontrol -8192 addvarvar cameradist camzoomcontrol }
    updatesectorz [[camerax]] [[cameray]] [[cameraz]] cameraonwall
endevent</pre>
    ifvarn cameraonwall -1
        addvarvar cameradist camzoomcontrol
    else
    {
        addvar camzoomcontrol -8192
        addvarvar cameradist camzoomcontrol
    }
endevent

Latest revision as of 17:04, 14 July 2012

Add this code to GAME.CON, after include USER.CON.

gamevar cameraonwall 0 1
gamevar camzoomcontrol 65536 1

onevent EVENT_LOOKUP
    setvar RETURN -1
    addvar camzoomcontrol -8192 // cam zoom in speed
    ifvarl camzoomcontrol 0
        setvar camzoomcontrol 0 // cam max zoom in
endevent

onevent EVENT_LOOKDOWN
    setvar RETURN -1
    addvar camzoomcontrol 8192 // cam zoom out speed
    ifvarg camzoomcontrol 1048576
        setvar camzoomcontrol 1048576 // cam max zoom out
endevent

onevent EVENT_DISPLAYROOMS
    setvar cameradist 0
    updatesectorz camerax cameray cameraz cameraonwall
    ifvarn cameraonwall -1
        addvarvar cameradist camzoomcontrol
    else
    {
        addvar camzoomcontrol -8192
        addvarvar cameradist camzoomcontrol
    }
endevent