Scribd
Upload
1K views13 pages

PML Moving and Rotation Animation of Aveva E3d-Pdms

This document provides instructions for using PML code to create animation movements and rotations in Aveva E3D and PDMS models. The PML code defines methods for moving an object by entering start and end values, distance, and direction. It also defines a method for rotating an object by entering values for angle, axis, and direction. The document explains how to save and run the PML code in E3D and PDMS to select and animate objects for moving and rotating.

Uploaded by

Sargunam Sankaravadivel
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
1K views13 pages

PML Moving and Rotation Animation of Aveva E3d-Pdms

This document provides instructions for using PML code to create animation movements and rotations in Aveva E3D and PDMS models. The PML code defines methods for moving an object by entering start and end values, distance, and direction. It also defines a method for rotating an object by entering values for angle, axis, and direction. The document explains how to save and run the PML code in E3D and PDMS to select and animate objects for moving and rotating.

Uploaded by

Sargunam Sankaravadivel
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
You are on page 1/ 13

By : Mansyur Usman (mansyur.usm@gmail.

com)

PML MANUAL

PML FOR MOVING AND ROTATION ANIMATION OF AVEVA E3D AND PDMS

Save file MSRANIMATION.pmlfrm for Aveva


(x86)\AVEVA\Plant\E3D1.1.0\PMLLIB\design\forms\

Save
file
MSRANIMATION.pmlfrm
for
C:\AVEVA\Plant\PDMS12.1.SP4\PMLLIB\design\forms\

- Open Aveva E3D Model Module

E3D

C:\Program

Aveva

PDMS

Files

By : Mansyur Usman ([email protected])

Type in Commnad Window


PML REHASH ALL
PML INDEX
SHOW!!MSRANIMATION

PML MANUAL

By : Mansyur Usman ([email protected])

PML MANUAL

In this case we wanted move that equipment to the up

Select Equipment and fill the animation form and click Moving button

By : Mansyur Usman ([email protected])

Next we wanted rotated something, in this case we choose the valve

Select valve and fill the animation form and click Rotate button

PML MANUAL

By : Mansyur Usman ([email protected])

- Open PDMS Design Module

PML MANUAL

By : Mansyur Usman ([email protected])

PML MANUAL

Type in Commnad Window


PML REHASH ALL
PML INDEX
SHOW!!MSRANIMATION

Select Equipment and fill the animation form and click Moving button

By : Mansyur Usman ([email protected])

Next we wanted rotated something, in this case we choose the valve

Select valve and fill the animation form and click Rotate button

PML MANUAL

By : Mansyur Usman ([email protected])

PML MANUAL

This is PML Code for MSRANIMATION.PMLFRM :


-- Created by : Mansyur Usman ([email protected])
-- PML for Animation Moving and Rotation
-- PML run in Aveva E3D and PDMS
-- Name : MSRANIMATION.pmlfrm
-- Created dated 21 - August - 2015
-- Chemical Engineering Sriwijaya University (UNSRI) Palembang (Indralaya-Ang 93)

setup form !!msranimation size 38 15


!this .formtitle='Animation Form'
path d
text .L1

'Masukan Nilai Start

text .L2 'Masukan Nilai End

' at 0 1 width 4 is REAL

' at 0 2 width 4 is REAL

text .L3

'Masukan Jarak Pergeseran ' at 0 3 width 4 is REAL

text .L4

'Masukan Arah

text .L5

'Masukan Sudut Putaran

' at 0 4 width 1 is STRING


' at 0 5 width 3 is REAL

frame .framepos 'Action' at 0 6


button .move 'Moving' at 0.5 1 callback '!this.gerak()' backg red
button .rotate 'Rotate' at 23 1 callback '!this.putar()' backg white
paragraph .p1 AT 0 2.5 text 'This PML is used for showing Animation of Moving and
Rotation in Aveva E3D and PDMS Model' width 34 lines 2
paragraph .p2 AT 0 4.2 text 'your faithfully
Mansyur Usman' width 34 lines 3
exit

By : Mansyur Usman ([email protected])

Define method .gerak()


!CENAM = !!CE.NAME
!VISI = !THIS.move.TAG
!L1 = !this.L1.val
!L2 = !this.L2.val
!L3 = !this.L3.val
!L4 = !this.L4.val
!L5 = !this.L5.val
IF !VISI.EQ( 'Moving' ) THEN
!THIS.move.TAG = 'Gerak'
!THIS.move.BACKGROUND = 9
!THIS.rotate.BACKGROUND = 9
!this.L5.val = 0
ELSEIF !VISI.EQ( 'Gerak' ) THEN
!THIS.move.TAG = 'Moving'
!THIS.move.BACKGROUND = 3
!THIS.rotate.BACKGROUND = 3
!this.L5.val = 0
Else
Endif
Handle any
Elsehandle none
Endhandle

DO !i FROM !L1 TO !L2 BY 1


IF !L4 EQ 'U' OR !L4 EQ 'u' then
by u $!L3
refresh
pause 0.3
by d $!L3
refresh
pause 0.3

PML MANUAL

By : Mansyur Usman ([email protected])

ELSEIF !L4 EQ 'D' OR !L4 EQ 'd' then


by d $!L3
refresh
pause 0.3
by u $!L3
refresh
pause 0.3

ELSEIF !L4 EQ 'N' OR !L4 EQ 'n' OR !L4 EQ 'S' OR !L4 EQ 's' then
by N $!L3
refresh
pause 0.3
by S $!L3
refresh
pause 0.3

ELSEIF !L4 EQ 'E' OR !L4 EQ 'e' OR !L4 EQ 'W' OR !L4 EQ 'w' then
by E $!L3
refresh
pause 0.3
by W $!L3
refresh
pause 0.3
ELSE
ENDIF

Enddo
Endmethod

PML MANUAL

By : Mansyur Usman ([email protected])

Define method .putar()

!CENAM = !!CE.NAME
!VISI = !THIS.rotate.TAG

!L1 = !this.L1.val
!L2 = !this.L2.val
!L3 = !this.L3.val
!L4 = !this.L4.val
!L5 = !this.L5.val

IF !VISI.EQ( 'Rotate' ) THEN


!THIS.rotate.TAG = 'Putar'
!THIS.move.BACKGROUND = 5
!THIS.rotate.BACKGROUND = 5
!this.L1.val = 0
!this.L3.val = 0
ELSEIF !VISI.EQ( 'Putar' ) THEN
!THIS.rotate.TAG = 'Rotate'
!THIS.move.BACKGROUND = 6
!THIS.rotate.BACKGROUND = 6
!this.L1.val = 0
!this.L3.val = 0

Else
Endif

Handle any
Elsehandle none
Endhandle

PML MANUAL

By : Mansyur Usman ([email protected])

DO !i FROM 1 TO !L2 BY 1
IF !L4 EQ 'N' or !L4 EQ 'n' then
rotate about n WRT /* by $!L5 thr ce
refresh
pause 0.3
ELSEIF !L4 EQ 'S' or !L4 EQ 's' then
rotate about s WRT /* by $!L5 thr ce
refresh
pause 0.3
ELSEIF !L4 EQ 'E' or !L4 EQ 'e' then
rotate about e WRT /* by $!L5 thr ce
refresh
pause 0.3
ELSEIF !L4 EQ 'W' or !L4 EQ 'w' then
rotate about w WRT /* by $!L5 thr ce
refresh
pause 0.3
ELSEIF !L4 EQ 'U' or !L4 EQ 'u' then
rotate about U WRT /* by $!L5 thr ce
refresh
pause 0.3
ELSEIF !L4 EQ 'D' or !L4 EQ 'd' then
rotate about D WRT /* by $!L5 thr ce
refresh
pause 0.3

Else
Endif

Enddo
Endmethod

PML MANUAL

By : Mansyur Usman ([email protected])

SEMOGA BERMANFAAT

PML MANUAL

You might also like