Advertisement
jsbsan

motorelectricoadapter

Dec 3rd, 2013
1,433
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
GAMBAS 0.46 KB | None | 0 0
  1. ' Gambas class file
  2.  
  3. Inherits Motor
  4.  
  5. Private mot_elec As MotorElectrico
  6.  
  7. Public Sub _new()
  8.  
  9.   mot_elec = New MotorElectrico
  10.  
  11. End
  12.  
  13. Public Sub encender()
  14.  
  15.   Print "Enciendo motor electrico"
  16.   mot_elec.concectar()
  17.   mot_elec.activar()
  18.  
  19. End
  20.  
  21. Public Sub acelerar()
  22.  
  23.   Print "Acelerando motor electrico"
  24.   mot_elec.moverMasRapido()
  25.  
  26. End
  27.  
  28. Public Sub apagar()
  29.  
  30.   Print "Apagando motor electrico"
  31.   mot_elec.desconectar()
  32.  
  33. End
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement